From: Ketmar Dark Date: Wed, 16 Aug 2017 07:42:42 +0000 (+0300) Subject: cosmetix X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=0cf82d25f7ffee01d662d9d11793077805a263cb;p=d2df-sdl.git cosmetix --- diff --git a/src/engine/e_textures.pas b/src/engine/e_textures.pas index 53ad6c6..8dfd2cc 100644 --- a/src/engine/e_textures.pas +++ b/src/engine/e_textures.pas @@ -75,8 +75,8 @@ function CreateTexture (var tex: GLTexture; Width, Height, aFormat: Word; pData: var Texture: GLuint; fmt: GLenum; - buf: PByte; - f, c: Integer; + //buf: PByte; + //f, c: Integer; begin tex.width := Width; tex.height := Height; @@ -215,12 +215,12 @@ end; function LoadTextureMem (pData: Pointer; dataSize: LongInt; var Texture: GLTexture; var pWidth, pHeight: Word; Fmt: PWord=nil): Boolean; var - image, ii: PByte; - width, height: Integer; - imageSize: Integer; + //image, ii: PByte; + //width, height: Integer; + //imageSize: Integer; img: TImageData; - x, y: Integer; - clr: TColor32Rec; + //x, y: Integer; + //clr: TColor32Rec; begin result := false; pWidth := 0; @@ -244,7 +244,7 @@ end; function LoadTextureMemEx (pData: Pointer; dataSize: LongInt; var Texture: GLTexture; fX, fY, fWidth, fHeight: Word; Fmt: PWord=nil): Boolean; var image, ii: PByte; - width, height: Integer; + //width, height: Integer; imageSize: Integer; img: TImageData; x, y: Integer;