|
|
@@ -221,7 +221,7 @@ unit glBitmap; |
|
|
|
|
|
|
|
// Please uncomment the defines below to configure the glBitmap to your preferences. |
|
|
|
// If you have configured the unit you can uncomment the warning above. |
|
|
|
{.$MESSAGE warn 'Hey. I''m the glBitmap.pas and i need to be configured. My master tell me your preferences! ;)'} |
|
|
|
{$MESSAGE error 'Hey. I''m the glBitmap.pas and i need to be configured. My master tell me your preferences! ;)'} |
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// |
|
|
|
// Preferences /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// |
|
|
@@ -238,7 +238,7 @@ unit glBitmap; |
|
|
|
// activate to enable the support for SDL_surfaces |
|
|
|
{.$DEFINE GLB_SDL} |
|
|
|
|
|
|
|
// activate to enable the support for TBitmap from Delphi (not lazarus) |
|
|
|
// activate to enable the support for Delphi (including support for Delphi's (not Lazarus') TBitmap) |
|
|
|
{.$DEFINE GLB_DELPHI} |
|
|
|
|
|
|
|
// activate to enable the support for TLazIntfImage from Lazarus |
|
|
@@ -1236,7 +1236,6 @@ implementation |
|
|
|
|
|
|
|
uses |
|
|
|
Math, syncobjs, typinfo |
|
|
|
{$IFDEF GLB_DELPHI}, Types{$ENDIF} |
|
|
|
{$IF DEFINED(GLB_SUPPORT_JPEG_READ) AND DEFINED(GLB_LAZ_JPEG)}, FPReadJPEG{$IFEND}; |
|
|
|
|
|
|
|
type |
|
|
|