From efb0e8990cab0179623f177549c0b4c84812cd93 Mon Sep 17 00:00:00 2001 From: paul Date: Wed, 11 Jun 2008 15:35:58 +0000 Subject: [PATCH] gtk2: ifdef SetCW, ResetCW only for windows git-svn-id: trunk@15388 - --- lcl/interfaces/gtk2/gtk2winapi.inc | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lcl/interfaces/gtk2/gtk2winapi.inc b/lcl/interfaces/gtk2/gtk2winapi.inc index 0218bc493e..33a781a24d 100644 --- a/lcl/interfaces/gtk2/gtk2winapi.inc +++ b/lcl/interfaces/gtk2/gtk2winapi.inc @@ -74,6 +74,8 @@ var Width, Height: integer; MaxWidth, MaxHeight: guint; pixbuf, masked_pixbuf: PGdkPixbuf; + +{$ifdef Windows} Old80807CW: Word; procedure SetCW; inline; @@ -86,7 +88,8 @@ var begin Set8087CW(Old80807CW); end; - +{$endif} + begin Result := 0; if not IsValidGDIObject(ACursorInfo^.hbmColor) then Exit;