paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-19 21:48:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed gtk2 compilation

Browse Source 
git-svn-id: trunk@9256 -
This commit is contained in:
mattias 2006-05-09 07:57:41 +00:00
parent 260a95030f
commit 173f5c5a42
2 changed files with 2 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lcl/interfaces/gtk/gtkproc.pp
View File

@ -37,17 +37,12 @@ uses
{$endif} {$endif}
SysUtils, Classes, FPCAdds, SysUtils, Classes, FPCAdds,
{$IFDEF UNIX} {$IFDEF UNIX}
baseunix, unix, baseunix, unix, XAtom,
{$IFDEF GTK1} X, XLib, XUtil, //Font retrieval and Keyboard handling
X, XLib, XUtil, XAtom, //Font retrieval and Keyboard handling
{$ENDIF not Gtk1}
{$ENDIF} {$ENDIF}
InterfaceBase, InterfaceBase,
{$IFDEF gtk2} {$IFDEF gtk2}
glib2, gdk2pixbuf, gdk2, gtk2, Pango, glib2, gdk2pixbuf, gdk2, gtk2, Pango,
{$IFDEF UNIX}
X, XLib, XUtil, //Keyboard handling
{$ENDIF}
{$ELSE} {$ELSE}
glib, gdk, gtk, {$Ifndef NoGdkPixbufLib}gdkpixbuf,{$EndIf} GtkFontCache, glib, gdk, gtk, {$Ifndef NoGdkPixbufLib}gdkpixbuf,{$EndIf} GtkFontCache,
{$ENDIF} {$ENDIF}

2
lcl/interfaces/gtk2/gtk2winapi.inc
View File

@ -417,8 +417,6 @@ var
Underline, Underline,
StrikeOut : Boolean; StrikeOut : Boolean;
RGBColor : Longint;
Layout : PPangoLayout; Layout : PPangoLayout;
UseFontDesc : PPangoFontDescription; UseFontDesc : PPangoFontDescription;
AttrList : PPangoAttrList; AttrList : PPangoAttrList;