paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-29 14:50:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

added constants for gtk1 version, fixes fpc 1.0.x compilation

Browse Source 
git-svn-id: trunk@6800 -
This commit is contained in:
vincents 2005-02-18 09:44:30 +00:00
parent 63b705cfd2
commit 18a391d3e5
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
lcl/interfaces/gtk/gtkdef.pp
View File

@ -354,7 +354,15 @@ const
GDKX_KEY_LaunchD = $1008FF4D;
GDKX_KEY_LaunchE = $1008FF4E;
GDKX_KEY_LaunchF = $1008FF4F;
// fpc 1.0.10 doesn't link exported variables correctly
// we fix this for gtk1 and define a constant
{$IFDEF VER1_0}
{$IFDEF gtk1}
GTK_MAJOR_VERSION = 1;
GTK_MINOR_VERSION = 2;
{$ENDIF}
{$ENDIF}
function NewPGDIObject: PGDIObject;
procedure DisposePGDIObject(GDIObject: PGdiObject);
@ -574,6 +582,9 @@ end.
{ =============================================================================
$Log$
Revision 1.64 2005/02/18 09:44:30 vincents
added constants for gtk1 version, fixes fpc 1.0.x compilation
Revision 1.63 2004/08/18 09:31:21 mattias
removed obsolete unit vclglobals