From 57a977b8f2804d0b8a661bab6b2c66abf91040d7 Mon Sep 17 00:00:00 2001 From: peter Date: Fri, 27 Dec 2002 18:13:38 +0000 Subject: [PATCH] * fix ChoosePixelFormat --- rtl/win32/wininc/func.inc | 7 +++++-- rtl/win32/wininc/redef.inc | 6 +++++- 2 files changed, 10 insertions(+), 3 deletions(-) diff --git a/rtl/win32/wininc/func.inc b/rtl/win32/wininc/func.inc index 3b3c7f6411..1beb458796 100644 --- a/rtl/win32/wininc/func.inc +++ b/rtl/win32/wininc/func.inc @@ -980,7 +980,7 @@ function QueryServiceStatus(hService:SC_HANDLE; lpServiceStatus:LPSERVICE_STATUS function SetServiceObjectSecurity(hService:SC_HANDLE; dwSecurityInformation:SECURITY_INFORMATION; lpSecurityDescriptor:PSECURITY_DESCRIPTOR):WINBOOL;external 'advapi32' name 'SetServiceObjectSecurity'; function SetServiceStatus(hServiceStatus:SERVICE_STATUS_HANDLE; lpServiceStatus:LPSERVICE_STATUS):WINBOOL; external 'advapi32' name 'SetServiceStatus'; function UnlockServiceDatabase(ScLock:SC_LOCK):WINBOOL; external 'advapi32' name 'UnlockServiceDatabase'; -function ChoosePixelFormat(_para1:HDC; var _para2:PIXELFORMATDESCRIPTOR):longint; external 'gdi32' name 'ChoosePixelFormat'; +function ChoosePixelFormat(_para1:HDC; _para2:PPIXELFORMATDESCRIPTOR):longint; external 'gdi32' name 'ChoosePixelFormat'; function DescribePixelFormat(_para1:HDC; _para2:longint; _para3:UINT; _para4:LPPIXELFORMATDESCRIPTOR):longint; external 'gdi32' name 'DescribePixelFormat'; {$ifdef Unknown_functions}{ WARNING: function is not in my gdi32.dll !! PM}function GetEnhMetaFilePixelFormat(_para1:HENHMETAFILE; _para2:DWORD; var _para3:PIXELFORMATDESCRIPTOR):UINT; external 'gdi32' name 'GetEnhMetaFilePixelFormat'; {$endif Unknown_functions}{ function GetPixelFormat(_para1:HDC):longint; external 'gdi32' name 'GetPixelFormat'; } @@ -2331,7 +2331,10 @@ end; { $Log$ - Revision 1.16 2002-12-15 20:24:17 peter + Revision 1.17 2002-12-27 18:13:38 peter + * fix ChoosePixelFormat + + Revision 1.16 2002/12/15 20:24:17 peter * some more C style functions Revision 1.15 2002/11/29 16:40:49 sg diff --git a/rtl/win32/wininc/redef.inc b/rtl/win32/wininc/redef.inc index 10dbf5d136..7784cf7e14 100644 --- a/rtl/win32/wininc/redef.inc +++ b/rtl/win32/wininc/redef.inc @@ -194,6 +194,7 @@ function ChangeDisplaySettingsExA(lpszDeviceName: LPCSTR; var lpDevMode: TDevice {$endif support_smartlink} //function ChangeDisplaySettingsW(var lpDevMode: TDeviceModeW; dwFlags: DWORD): Longint; external 'user32' name 'ChangeDisplaySettingsW'; //function CheckColorsInGamut(DC: HDC; var RGBQuads, Results; Count: DWORD): BOOL; external 'gdi32' name 'CheckColorsInGamut'; +function ChoosePixelFormat(_para1:HDC; var _para2:PIXELFORMATDESCRIPTOR):longint; external 'gdi32' name 'ChoosePixelFormat'; function ClearCommError(hFile: THandle; var lpErrors: DWORD; lpStat: PComStat): BOOL; external 'kernel32' name 'ClearCommError'; function ClientToScreen(hWnd: HWND; var lpPoint: TPoint): BOOL; external 'user32' name 'ClientToScreen'; //function CombineTransform(var p1: TXForm; const p2, p3: TXForm): BOOL; external 'gdi32' name 'CombineTransform'; @@ -925,7 +926,10 @@ function HResultFromNT(x : Longint) : HRESULT; { $Log$ - Revision 1.10 2002-12-15 20:24:17 peter + Revision 1.11 2002-12-27 18:13:38 peter + * fix ChoosePixelFormat + + Revision 1.10 2002/12/15 20:24:17 peter * some more C style functions Revision 1.9 2002/10/14 17:18:44 florian