From 0f172084a34a6e56ffc8d3669d3e025c8a9025c7 Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 17 Aug 2002 23:41:24 +0000 Subject: [PATCH] added included by to unitinfo and a few win32 functions git-svn-id: trunk@2478 - --- lcl/interfaces/gtk/gtkwinapih.inc | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lcl/interfaces/gtk/gtkwinapih.inc b/lcl/interfaces/gtk/gtkwinapih.inc index 53473f747e..eaed322f0e 100644 --- a/lcl/interfaces/gtk/gtkwinapih.inc +++ b/lcl/interfaces/gtk/gtkwinapih.inc @@ -167,7 +167,7 @@ function SetSysColors(cElements: Integer; const lpaElements; const lpaRgbValues) Function SetTextCharacterExtra(_hdc : hdc; nCharExtra : Integer):Integer; override; function SetTextColor(DC: HDC; Color: TColorRef): TColorRef; override; function SetWindowLong(Handle: HWND; Idx: Integer; NewLong : Longint): LongInt; override; -function SetWindowOrgEx(dc : hdc; NewX, NewY : Integer; var OldPoint: TPoint) : Boolean; override; +function SetWindowOrgEx(dc : hdc; NewX, NewY : Integer; OldPoint: PPoint) : Boolean; override; function SetWindowPos(hWnd: HWND; hWndInsertAfter: HWND; X, Y, cx, cy: Integer; uFlags: UINT): Boolean; override; function ShowCaret(hWnd: HWND): Boolean; override; @@ -190,6 +190,9 @@ Procedure DeleteCriticalSection(var CritSection: TCriticalSection); Override; { ============================================================================= $Log$ + Revision 1.57 2002/12/26 11:00:15 mattias + added included by to unitinfo and a few win32 functions + Revision 1.56 2002/12/25 13:30:37 mattias added more windows funcs and fixed jump to compiler error end of file