index 53ad6c64ee378ac6512170b2cb32243ec289b18c..8dfd2cc8392a4796b6714787e49b920fb5bbbf65 100644 (file)
var
Texture: GLuint;
fmt: GLenum;
- buf: PByte;
- f, c: Integer;
+ //buf: PByte;
+ //f, c: Integer;
begin
tex.width := Width;
tex.height := Height;
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;
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;