X-Git-Url: https://git.delphigl.com/?p=LazOpenGLCore.git;a=blobdiff_plain;f=uglcBitmap.pas;fp=uglcBitmap.pas;h=7d537330f6146ce3d46fb48a180401f6f514041e;hp=0388f4667eaa1d4608ab3e9db3649c493f82eabc;hb=f6ca47eeb2c217505d9c1babe79d46b6668d3881;hpb=dfa7064d827360dd9a3ce0467fadb3f1c32a36c1

diff --git a/uglcBitmap.pas b/uglcBitmap.pas
index 0388f46..7d53733 100644
--- a/uglcBitmap.pas
+++ b/uglcBitmap.pas
@@ -22,7 +22,7 @@
   - download texture data from video card
   - manipulate texture data (e.g. add alpha, remove alpha, convert to other format, switch RGB, ...) }
 
-unit glBitmap;
+unit uglcBitmap;
 
 {$I glBitmapConf.inc}
 
@@ -1207,6 +1207,7 @@ type
 
   TglcBitmapFormat    = TglBitmapFormat;
   TglcBitmap2D        = TglBitmap2D;
+  TglcBitmapData      = TglBitmapData;
 {$IF NOT DEFINED(OPENGL_ES)}
   TglcBitmap1D        = TglBitmap1D;
   TglcBitmapCubeMap   = TglBitmapCubeMap;
@@ -8164,14 +8165,14 @@ begin
   aBuildWithGlu := false;
   if (MipMap = mmMipmap) then begin
     if (GL_VERSION_1_4 or GL_SGIS_generate_mipmap) then
-      glTexParameteri(Target, GL_GENERATE_MIPMAP, GL_TRUE)
+      glTexParameteri(Target, GL_GENERATE_MIPMAP, GLint(GL_TRUE))
     else
       aBuildWithGlu := true;
   end else if (MipMap = mmMipmapGlu) then
     aBuildWithGlu := true;
 {$ELSE}
   if (MipMap = mmMipmap) then
-    glTexParameteri(Target, GL_GENERATE_MIPMAP, GL_TRUE);
+    glTexParameteri(Target, GL_GENERATE_MIPMAP, GLint(GL_TRUE));
 {$ENDIF}
 end;