| changeset 788 | 00720357601f |
| parent 785 | ac538f1a629e |
| child 802 | ed5450a89b96 |
| 787:5064d72fa0e2 | 788:00720357601f |
|---|---|
321 glTexImage2D(GL_TEXTURE_2D, 0, mode, surf^.w, surf^.h, 0, mode, GL_UNSIGNED_BYTE, surf^.pixels); |
321 glTexImage2D(GL_TEXTURE_2D, 0, mode, surf^.w, surf^.h, 0, mode, GL_UNSIGNED_BYTE, surf^.pixels); |
322 |
322 |
323 if SDL_MustLock(surf) then |
323 if SDL_MustLock(surf) then |
324 SDL_UnlockSurface(surf); |
324 SDL_UnlockSurface(surf); |
325 |
325 |
326 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST); |
326 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR); |
327 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST) |
327 glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR) |
328 end; |
328 end; |
329 |
329 |
330 procedure FreeTexture(tex: PTexture); |
330 procedure FreeTexture(tex: PTexture); |
331 begin |
331 begin |
332 glDeleteTextures(1, @tex^.id); |
332 glDeleteTextures(1, @tex^.id); |