diff options
Diffstat (limited to 'plugins/Libs/KOL_FPC.inc')
| -rw-r--r-- | plugins/Libs/KOL_FPC.inc | 1416 |
1 files changed, 0 insertions, 1416 deletions
diff --git a/plugins/Libs/KOL_FPC.inc b/plugins/Libs/KOL_FPC.inc deleted file mode 100644 index ce0ad14efd..0000000000 --- a/plugins/Libs/KOL_FPC.inc +++ /dev/null @@ -1,1416 +0,0 @@ -{$IFDEF interface_part}
-const
- INPUT_MOUSE = 0;
- INPUT_KEYBOARD = 1;
- INPUT_HARDWARE = 2;
-
-type
- tagMOUSEINPUT = record
- dx:LONG;
- dy:LONG;
- mouseData:DWORD;
- dwFlags:DWORD;
- time:DWORD;
- dwExtraInfo:DWORD;
- end;
- MOUSEINPUT = tagMOUSEINPUT;
- PMOUSEINPUT = ^tagMOUSEINPUT;
- LPMOUSEINPUT = ^tagMOUSEINPUT;
-
- tagKEYBDINPUT = record
- wVk:word;
- wScan:word;
- dwFlags:DWORD;
- time:DWORD;
- dwExtraInfo:DWORD;
- end;
- KEYBDINPUT = tagKEYBDINPUT;
- PKEYBDINPUT = ^tagKEYBDINPUT;
- LPKEYBDINPUT = ^tagKEYBDINPUT;
-
- tagHARDWAREINPUT = record
- uMsg:DWORD;
- wParamL:word;
- wParamH:word;
- dwExtraInfo:DWORD;
- end;
- HARDWAREINPUT = tagHARDWAREINPUT;
- PHARDWAREINPUT = ^tagHARDWAREINPUT;
- LPHARDWAREINPUT = ^tagHARDWAREINPUT;
-
- tagINPUT = record
- Itype:DWORD;
- case longint of
- 0: (mi:MOUSEINPUT);
- 1: (ki:KEYBDINPUT);
- 2: (hi:HARDWAREINPUT);
- end;
- TInput = tagINPUT;
- PInput = ^tagINPUT;
- LPINPUT = ^tagINPUT;
-type
- TFindexInfoLevels = _FINDEX_INFO_LEVELS;
- TFindexSearchOps = _FINDEX_SEARCH_OPS;
-const
-ID_YES = IDYES;
-ID_NO = IDNO;
-ID_CANCEL = IDCANCEL;
-type
-TEditStreamCallBack = function (dwCookie: DWORD_PTR; pbBuff: PByte;
- cb: Longint; var pcb: Longint): Longint; stdcall;
-
- EDITSTREAM = packed record
- dwCookie: DWORD_PTR;
- dwError: Longint;
- pfnCallback: TEditStreamCallBack;
- end;
- TEditStream = EDITSTREAM;
-
-{$IFNDEF UNICODE_CTRLS}
-{LOGFONTA = record
- lfHeight: LONG;
- lfWidth: LONG;
- lfEscapement: LONG;
- lfOrientation: LONG;
- lfWeight: LONG;
- lfItalic: BYTE;
- lfUnderline: BYTE;
- lfStrikeOut: BYTE;
- lfCharSet: BYTE;
- lfOutPrecision: BYTE;
- lfClipPrecision: BYTE;
- lfQuality: BYTE;
- lfPitchAndFamily: BYTE;
- lfFaceName: array [0..LF_FACESIZE - 1] of CHAR;
-end;
-LPLOGFONTA = ^LOGFONTA;
-NPLOGFONTA = ^LOGFONTA;
-_LOGFONTA = LOGFONTA;
-TLogFontA = LOGFONTA;
-PLogFontA = ^TLOGFONTA;
-LOGFONT = LOGFONTA;
-LPLOGFONT = ^LOGFONTA;
-_LOGFONT = LOGFONTA;
-TLOGFONT = LOGFONTA;
-PLOGFONT = ^LOGFONTA;
-}
-TCHOOSEFONTA = record
- lStructSize : DWORD;
- hwndOwner : HWND;
- hDC : HDC;
- lpLogFont : LPLOGFONT;
- iPointSize : WINT;
- Flags : DWORD;
- rgbColors : DWORD;
- lCustData : LPARAM;
- lpfnHook : LPCFHOOKPROC;
- lpTemplateName : LPCWSTR;
- hInstance : HINST;
- lpszStyle : LPTSTR;
- nFontType : WORD;
- ___MISSING_ALIGNMENT__ : WORD;
- nSizeMin : WINT;
- nSizeMax : WINT;
- end;
-LPCHOOSEFONTA = ^TCHOOSEFONTA;
-{$ENDIF}
-TMsgBoxParamsW = record
- cbSize: Cardinal;
- hwndOwner: HWND;
- hInstance: HINST;
- lpszText: PWideChar;
- lpszCaption: PWideChar;
- dwStyle: DWord;
- lpszIcon: PWideChar;
- dwContextHelpId: DWORD_PTR;
- lpfnMsgBoxCallback: Pointer;
- dwLanguageId: DWord;
-end;
-TCHOOSEFONTW = record
- lStructSize : DWORD;
- hwndOwner : HWND;
- hDC : HDC;
- lpLogFont : LPLOGFONT;
- iPointSize : WINT;
- Flags : DWORD;
- rgbColors : DWORD;
- lCustData : LPARAM;
- lpfnHook : LPCFHOOKPROC;
- lpTemplateName : LPCWSTR;
- hInstance : HINST;
- lpszStyle : LPTSTR;
- nFontType : WORD;
- ___MISSING_ALIGNMENT__ : WORD;
- nSizeMin : WINT;
- nSizeMax : WINT;
- end;
-LPCHOOSEFONTW = ^TCHOOSEFONTW;
-{$IFDEF UNICODE_CTRLS}
-PCHOOSEFONT = ^TCHOOSEFONTW;
-{$ELSE}
-PCHOOSEFONT = ^TCHOOSEFONTA;
-{$ENDIF}
-
-type
- TFNProgressRoutine = TFarProc;
- TFNLocaleEnumProc = TFarProc;
- TFNCodepageEnumProc = TFarProc;
- TFNDateFmtEnumProc = TFarProc;
- TFNTimeFmtEnumProc = TFarProc;
- TFNCalInfoEnumProc = TFarProc;
- TFNFontEnumProc = TFarProc;
- TFNICMEnumProc = TFarProc;
- TFNDrawStateProc = TFarProc;
- TFNDeskTopEnumProc = TFarProc;
- TFNPropEnumProc = TFarProc;
- TFNPropEnumProcEx = TFarProc;
- TFNWinStaEnumProc = TFarProc;
- TFNGrayStringProc = TFarProc;
- TFNSendAsyncProc = TFarProc;
-
-{$IFDEF UNICODE_CTRLS}
- PWndClass = PWndClassW;
- TWndClass = TWndClassW;
- {$IFDEF _D4orHigher}
- WNDCLASS = WNDCLASSW;
- {$ENDIF}
- LOGFONTW = record
- lfHeight: LONG;
- lfWidth: LONG;
- lfEscapement: LONG;
- lfOrientation: LONG;
- lfWeight: LONG;
- lfItalic: BYTE;
- lfUnderline: BYTE;
- lfStrikeOut: BYTE;
- lfCharSet: BYTE;
- lfOutPrecision: BYTE;
- lfClipPrecision: BYTE;
- lfQuality: BYTE;
- lfPitchAndFamily: BYTE;
- lfFaceName: array [0..LF_FACESIZE - 1] of WCHAR;
- end;
- LPLOGFONTW = ^LOGFONTW;
- NPLOGFONTW = ^LOGFONTW;
- _LOGFONTW = LOGFONTW;
- TLogFontW = LOGFONTW;
- PLogFontW = ^TLOGFONTW;
- LOGFONT = LOGFONTW;
- LPLOGFONT = ^LOGFONTW;
- _LOGFONT = LOGFONTW;
- TLOGFONT = LOGFONTW;
- PLOGFONT = ^LOGFONTW;
- NONCLIENTMETRICS = record
- cbSize : UINT;
- iBorderWidth : longint;
- iScrollWidth : longint;
- iScrollHeight : longint;
- iCaptionWidth : longint;
- iCaptionHeight : longint;
- lfCaptionFont : LOGFONT;
- iSmCaptionWidth : longint;
- iSmCaptionHeight : longint;
- lfSmCaptionFont : LOGFONT;
- iMenuWidth : longint;
- iMenuHeight : longint;
- lfMenuFont : LOGFONT;
- lfStatusFont : LOGFONT;
- lfMessageFont : LOGFONT;
- end;
- LPNONCLIENTMETRICS = ^NONCLIENTMETRICS;
- tagNONCLIENTMETRICS = NONCLIENTMETRICS;
- TNONCLIENTMETRICS = NONCLIENTMETRICS;
- PNONCLIENTMETRICS = ^NONCLIENTMETRICS;
-
- ENUMLOGFONT = record
- elfLogFont : LOGFONTW;
- elfFullName : array[0..(LF_FULLFACESIZE)-1] of WCHAR;
- elfStyle : array[0..(LF_FACESIZE)-1] of WCHAR;
- end;
- tagENUMLOGFONT = ENUMLOGFONT;
- TENUMLOGFONT = ENUMLOGFONT;
- PENUMLOGFONT = ^ENUMLOGFONT;
-{$ENDIF}
-
-{$IFDEF UNICODE_CTRLS}
-type
- MakeIntResource = MakeIntResourceW;
-const
- SizeOfKOLChar = SizeOf(WideChar);
-
-type
- KOLString = KOLWideString;
- KOL_String = type KOLWideString;
- KOLChar = type WideChar;
- PKOLChar = PWideChar;
- PKOL_Char = type PWideChar;
-{$ELSE}
-const
- SizeOfKOLChar = SizeOf(AnsiChar);
-
-type
- KOLString = AnsiString;
- KOL_String = type AnsiString;
- KOLChar = type AnsiChar;
- PKOLChar = PAnsiChar;
- PKOL_Char = type PAnsiChar;
-{$ENDIF}
-type
- PMenuitemInfoW = ^TMenuItemInfoW;
- TMenuitemInfoW = record
- cbSize: UINT;
- fMask: UINT;
- fType: UINT; { used if MIIM_TYPE}
- fState: UINT; { used if MIIM_STATE}
- wID: UINT; { used if MIIM_ID}
- hSubMenu: HMENU; { used if MIIM_SUBMENU}
- hbmpChecked: HBITMAP; { used if MIIM_CHECKMARKS}
- hbmpUnchecked: HBITMAP; { used if MIIM_CHECKMARKS}
- dwItemData: ULONG_PTR; { used if MIIM_DATA}
- dwTypeData: PWideChar; { used if MIIM_TYPE}
- cch: UINT; { used if MIIM_TYPE}
- hbmpItem: HBITMAP; { used if MIIM_BITMAP - not exists under Windows95 }
- end;
-
-const
-{ GetIconInfo }
- IDC_ARROW = MAKEINTRESOURCE(32512);
- IDC_IBEAM = MAKEINTRESOURCE(32513);
- IDC_WAIT = MAKEINTRESOURCE(32514);
- IDC_CROSS = MAKEINTRESOURCE(32515);
- IDC_UPARROW = MAKEINTRESOURCE(32516);
- IDC_SIZENWSE = MAKEINTRESOURCE(32642);
- IDC_SIZENESW = MAKEINTRESOURCE(32643);
- IDC_SIZEWE = MAKEINTRESOURCE(32644);
- IDC_SIZENS = MAKEINTRESOURCE(32645);
- IDC_SIZEALL = MAKEINTRESOURCE(32646);
- IDC_NO = MAKEINTRESOURCE(32648);
- IDC_APPSTARTING = MAKEINTRESOURCE(32650);
- IDC_HELP = MAKEINTRESOURCE(32651);
-
- IDI_APPLICATION = MAKEINTRESOURCE(32512);
- IDI_HAND = MAKEINTRESOURCE(32513);
- IDI_QUESTION = MAKEINTRESOURCE(32514);
- IDI_EXCLAMATION = MAKEINTRESOURCE(32515);
- IDI_ASTERISK = MAKEINTRESOURCE(32516);
- IDI_WINLOGO = MAKEINTRESOURCE(32517);
-
- IDC_SIZE = MAKEINTRESOURCE(32640);
- IDC_ICON = MAKEINTRESOURCE(32641);
- IDC_HAND = MAKEINTRESOURCE(32649);
-
-function SetTimer(hWnd:HWND; nIDEvent:UINT_PTR; uElapse:UINT; lpTimerFunc:TIMERPROC):UINT_PTR; stdcall;
-function KillTimer(hWnd:HWND; uIDEvent:UINT_PTR):BOOL; stdcall;
-function GetProcessWorkingSetSize(hProcess:HANDLE; lpMinimumWorkingSetSize: PULONG_PTR; lpMaximumWorkingSetSize: PULONG_PTR):WINBOOL;
-function SetProcessWorkingSetSize(hProcess:HANDLE; dwMinimumWorkingSetSize:ULONG_PTR; dwMaximumWorkingSetSize:ULONG_PTR):WINBOOL;
-function SendInput(nInputs:UINT; var pInputs:TINPUT; cbSize:longint):UINT;
-{$IFDEF UNICODE_CTRLS}
-function AbortSystemShutdown(lpMachineName: PKOLChar): BOOL; stdcall;
-function AccessCheckAndAuditAlarm(SubsystemName: PKOLChar;
- HandleId: Pointer; ObjectTypeName, ObjectName: PKOLChar;
- SecurityDescriptor: PSecurityDescriptor; DesiredAccess: DWORD;
- const GenericMapping: TGenericMapping; ObjectCreation: BOOL;
- var GrantedAccess: DWORD; var AccessStatus, pfGenerateOnClose: BOOL): BOOL; stdcall;
-{$IFDEF _D4orHigher}
-function AccessCheckByTypeAndAuditAlarm(SubsystemName: PKOLChar;
- HandleId: Pointer; ObjectTypeName, ObjectName: PKOLChar;
- SecurityDescriptor: PSecurityDescriptor; PrincipalSelfSid: PSID; DesiredAccess: DWORD;
- AuditType: AUDIT_EVENT_TYPE; Flags: DWORD; ObjectTypeList: PObjectTypeList;
- ObjectTypeListLength: DWORD; const GenericMapping: TGenericMapping; ObjectCreation: BOOL;
- var GrantedAccess: DWORD; var AccessStatus, pfGenerateOnClose: BOOL): BOOL; stdcall;
-function AccessCheckByTypeResultListAndAuditAlarm(SubsystemName: PKOLChar;
- HandleId: Pointer; ObjectTypeName, ObjectName: PKOLChar;
- SecurityDescriptor: PSecurityDescriptor; PrincipalSelfSid: PSID; DesiredAccess: DWORD;
- AuditType: AUDIT_EVENT_TYPE; Flags: DWORD; ObjectTypeList: PObjectTypeList;
- ObjectTypeListLength: DWORD; const GenericMapping: TGenericMapping; ObjectCreation: BOOL;
- var GrantedAccess: DWORD; var AccessStatusList: DWORD; var pfGenerateOnClose: BOOL): BOOL; stdcall;
-{$ENDIF}
-function BackupEventLog(hEventLog: THandle; lpBackupFileName: PKOLChar): BOOL; stdcall;
-function ClearEventLog(hEventLog: THandle; lpBackupFileName: PKOLChar): BOOL; stdcall;
-function CreateProcessAsUser(hToken: THandle; lpApplicationName: PKOLChar;
- lpCommandLine: PKOLChar; lpProcessAttributes: PSecurityAttributes;
- lpThreadAttributes: PSecurityAttributes; bInheritHandles: BOOL;
- dwCreationFlags: DWORD; lpEnvironment: Pointer; lpCurrentDirectory: PKOLChar;
- const lpStartupInfo: TStartupInfo; var lpProcessInformation: TProcessInformation): BOOL; stdcall;
-//function GetCurrentHwProfile(var lpHwProfileInfo: THWProfileInfo): BOOL; stdcall;
-function GetFileSecurity(lpFileName: PKOLChar; RequestedInformation: SECURITY_INFORMATION;
- pSecurityDescriptor: PSecurityDescriptor; nLength: DWORD; var lpnLengthNeeded: DWORD): BOOL; stdcall;
-function GetUserName(lpBuffer: PKOLChar; var nSize: DWORD): BOOL; stdcall;
-function InitiateSystemShutdown(lpMachineName, lpMessage: PKOLChar;
- dwTimeout: DWORD; bForceAppsClosed, bRebootAfterShutdown: BOOL): BOOL; stdcall;
-function LogonUser(lpszUsername, lpszDomain, lpszPassword: PKOLChar;
- dwLogonType, dwLogonProvider: DWORD; var phToken: THandle): BOOL; stdcall;
-function LookupAccountName(lpSystemName, lpAccountName: PKOLChar;
- Sid: PSID; var cbSid: DWORD; ReferencedDomainName: PKOLChar;
- var cbReferencedDomainName: DWORD; var peUse: SID_NAME_USE): BOOL; stdcall;
-function LookupAccountSid(lpSystemName: PKOLChar; Sid: PSID;
- Name: PKOLChar; var cbName: DWORD; ReferencedDomainName: PKOLChar;
- var cbReferencedDomainName: DWORD; var peUse: SID_NAME_USE): BOOL; stdcall;
-function LookupPrivilegeDisplayName(lpSystemName, lpName: PKOLChar;
- lpDisplayName: PKOLChar; var cbDisplayName, lpLanguageId: DWORD): BOOL; stdcall;
-function LookupPrivilegeName(lpSystemName: PKOLChar;
- var lpLuid: TLargeInteger; lpName: PKOLChar; var cbName: DWORD): BOOL; stdcall;
-function LookupPrivilegeValue(lpSystemName, lpName: PKOLChar;
- var lpLuid: TLargeInteger): BOOL; stdcall;
-function ObjectCloseAuditAlarm(SubsystemName: PKOLChar;
- HandleId: Pointer; GenerateOnClose: BOOL): BOOL; stdcall;
-function ObjectDeleteAuditAlarm(SubsystemName: PKOLChar;
- HandleId: Pointer; GenerateOnClose: BOOL): BOOL; stdcall;
-function ObjectOpenAuditAlarm(SubsystemName: PKOLChar; HandleId: Pointer;
- ObjectTypeName: PKOLChar; ObjectName: PKOLChar; pSecurityDescriptor: PSecurityDescriptor;
- ClientToken: THandle; DesiredAccess, GrantedAccess: DWORD;
- var Privileges: TPrivilegeSet; ObjectCreation, AccessGranted: BOOL;
- var GenerateOnClose: BOOL): BOOL; stdcall;
-function ObjectPrivilegeAuditAlarm(SubsystemName: PKOLChar;
- HandleId: Pointer; ClientToken: THandle; DesiredAccess: DWORD;
- var Privileges: TPrivilegeSet; AccessGranted: BOOL): BOOL; stdcall;
-function OpenBackupEventLog(lpUNCServerName, lpFileName: PKOLChar): THandle; stdcall;
-function OpenEventLog(lpUNCServerName, lpSourceName: PKOLChar): THandle; stdcall;
-function PrivilegedServiceAuditAlarm(SubsystemName, ServiceName: PKOLChar;
- ClientToken: THandle; var Privileges: TPrivilegeSet; AccessGranted: BOOL): BOOL; stdcall;
-function ReadEventLog(hEventLog: THandle; dwReadFlags, dwRecordOffset: DWORD;
- lpBuffer: Pointer; nNumberOfBytesToRead: DWORD;
- var pnBytesRead, pnMinNumberOfBytesNeeded: DWORD): BOOL; stdcall;
-function RegConnectRegistry(lpMachineName: PKOLChar; hKey: HKEY;
- var phkResult: HKEY): Longint; stdcall;
-function RegCreateKey(hKey: HKEY; lpSubKey: PKOLChar;
- var phkResult: HKEY): Longint; stdcall;
-function RegCreateKeyEx(hKey: HKEY; lpSubKey: PKOLChar;
- Reserved: DWORD; lpClass: PKOLChar; dwOptions: DWORD; samDesired: REGSAM;
- lpSecurityAttributes: PSecurityAttributes; var phkResult: HKEY;
- lpdwDisposition: PDWORD): Longint; stdcall;
-function RegDeleteKey(hKey: HKEY; lpSubKey: PKOLChar): Longint; stdcall;
-function RegDeleteValue(hKey: HKEY; lpValueName: PKOLChar): Longint; stdcall;
-function RegEnumKeyEx(hKey: HKEY; dwIndex: DWORD; lpName: PKOLChar;
- var lpcbName: DWORD; lpReserved: Pointer; lpClass: PKOLChar;
- lpcbClass: PDWORD; lpftLastWriteTime: PFileTime): Longint; stdcall;
-function RegEnumKey(hKey: HKEY; dwIndex: DWORD; lpName: PKOLChar; cbName: DWORD): Longint; stdcall;
-function RegEnumValue(hKey: HKEY; dwIndex: DWORD; lpValueName: PKOLChar;
- var lpcbValueName: DWORD; lpReserved: Pointer; lpType: PDWORD;
- lpData: PByte; lpcbData: PDWORD): Longint; stdcall;
-function RegLoadKey(hKey: HKEY; lpSubKey, lpFile: PKOLChar): Longint; stdcall;
-function RegOpenKey(hKey: HKEY; lpSubKey: PKOLChar; var phkResult: HKEY): Longint; stdcall;
-function RegOpenKeyEx(hKey: HKEY; lpSubKey: PKOLChar;
- ulOptions: DWORD; samDesired: REGSAM; var phkResult: HKEY): Longint; stdcall;
-function RegQueryInfoKey(hKey: HKEY; lpClass: PKOLChar;
- lpcbClass: PDWORD; lpReserved: Pointer;
- lpcSubKeys, lpcbMaxSubKeyLen, lpcbMaxClassLen, lpcValues,
- lpcbMaxValueNameLen, lpcbMaxValueLen, lpcbSecurityDescriptor: PDWORD;
- lpftLastWriteTime: PFileTime): Longint; stdcall;
-function RegQueryMultipleValues(hKey: HKEY; var ValList;
- NumVals: DWORD; lpValueBuf: PKOLChar; var ldwTotsize: DWORD): Longint; stdcall;
-function RegQueryValue(hKey: HKEY; lpSubKey: PKOLChar;
- lpValue: PKOLChar; var lpcbValue: Longint): Longint; stdcall;
-function RegQueryValueEx(hKey: HKEY; lpValueName: PKOLChar;
- lpReserved: Pointer; lpType: PDWORD; lpData: PByte; lpcbData: PDWORD): Longint; stdcall;
-function RegReplaceKey(hKey: HKEY; lpSubKey: PKOLChar;
- lpNewFile: PKOLChar; lpOldFile: PKOLChar): Longint; stdcall;
-function RegRestoreKey(hKey: HKEY; lpFile: PKOLChar; dwFlags: DWORD): Longint; stdcall;
-function RegSaveKey(hKey: HKEY; lpFile: PKOLChar;
- lpSecurityAttributes: PSecurityAttributes): Longint; stdcall;
-function RegSetValue(hKey: HKEY; lpSubKey: PKOLChar;
- dwType: DWORD; lpData: PKOLChar; cbData: DWORD): Longint; stdcall;
-function RegSetValueEx(hKey: HKEY; lpValueName: PKOLChar;
- Reserved: DWORD; dwType: DWORD; lpData: Pointer; cbData: DWORD): Longint; stdcall;
-function RegUnLoadKey(hKey: HKEY; lpSubKey: PKOLChar): Longint; stdcall;
-function RegisterEventSource(lpUNCServerName, lpSourceName: PKOLChar): THandle; stdcall;
-function ReportEvent(hEventLog: THandle; wType, wCategory: Word;
- dwEventID: DWORD; lpUserSid: Pointer; wNumStrings: Word;
- dwDataSize: DWORD; lpStrings, lpRawData: Pointer): BOOL; stdcall;
-function SetFileSecurity(lpFileName: PKOLChar; SecurityInformation: SECURITY_INFORMATION;
- pSecurityDescriptor: PSecurityDescriptor): BOOL; stdcall;
-function AddAtom(lpString: PKOLChar): ATOM; stdcall;
-function BeginUpdateResource(pFileName: PKOLChar; bDeleteExistingResources: BOOL): THandle; stdcall;
-function BuildCommDCB(lpDef: PKOLChar; var lpDCB: TDCB): BOOL; stdcall;
-function BuildCommDCBAndTimeouts(lpDef: PKOLChar; var lpDCB: TDCB;
- var lpCommTimeouts: TCommTimeouts): BOOL; stdcall;
-function CallNamedPipe(lpNamedPipeName: PKOLChar; lpInBuffer: Pointer;
- nInBufferSize: DWORD; lpOutBuffer: Pointer; nOutBufferSize: DWORD;
- var lpBytesRead: DWORD; nTimeOut: DWORD): BOOL; stdcall;
-function CommConfigDialog(lpszName: PKOLChar; hWnd: HWND; var lpCC: TCommConfig): BOOL; stdcall;
-function CompareString(Locale: LCID; dwCmpFlags: DWORD; lpString1: PKOLChar;
- cchCount1: Integer; lpString2: PKOLChar; cchCount2: Integer): Integer; stdcall;
-function CopyFile(lpExistingFileName, lpNewFileName: PKOLChar; bFailIfExists: BOOL): BOOL; stdcall;
-function CopyFileEx(lpExistingFileName, lpNewFileName: PKOLChar;
- lpProgressRoutine: TFNProgressRoutine; lpData: Pointer; pbCancel: PBool;
- dwCopyFlags: DWORD): BOOL; stdcall;
-function CreateDirectory(lpPathName: PKOLChar;
- lpSecurityAttributes: PSecurityAttributes): BOOL; stdcall;
-function CreateDirectoryEx(lpTemplateDirectory, lpNewDirectory: PKOLChar;
- lpSecurityAttributes: PSecurityAttributes): BOOL; stdcall;
-function CreateEvent(lpEventAttributes: PSecurityAttributes;
- bManualReset, bInitialState: BOOL; lpName: PKOLChar): THandle; stdcall;
-function CreateFile(lpFileName: PKOLChar; dwDesiredAccess, dwShareMode: DWORD;
- lpSecurityAttributes: PSecurityAttributes; dwCreationDisposition, dwFlagsAndAttributes: DWORD;
- hTemplateFile: THandle): THandle; stdcall;
-function CreateFileMapping(hFile: THandle; lpFileMappingAttributes: PSecurityAttributes;
- flProtect, dwMaximumSizeHigh, dwMaximumSizeLow: DWORD; lpName: PKOLChar): THandle; stdcall;
-function CreateHardLink(lpFileName, lpExistingFileName: PKOLChar;
- lpSecurityAttributes: PSecurityAttributes): BOOL; stdcall;
-function CreateMailslot(lpName: PKOLChar; nMaxMessageSize: DWORD;
- lReadTimeout: DWORD; lpSecurityAttributes: PSecurityAttributes): THandle; stdcall;
-function CreateNamedPipe(lpName: PKOLChar;
- dwOpenMode, dwPipeMode, nMaxInstances, nOutBufferSize, nInBufferSize, nDefaultTimeOut: DWORD;
- lpSecurityAttributes: PSecurityAttributes): THandle; stdcall;
-function CreateProcess(lpApplicationName: PKOLChar; lpCommandLine: PKOLChar;
- lpProcessAttributes, lpThreadAttributes: PSecurityAttributes;
- bInheritHandles: BOOL; dwCreationFlags: DWORD; lpEnvironment: Pointer;
- lpCurrentDirectory: PKOLChar; const lpStartupInfo: TStartupInfo;
- var lpProcessInformation: TProcessInformation): BOOL; stdcall;
-function CreateSemaphore(lpSemaphoreAttributes: PSecurityAttributes;
- lInitialCount, lMaximumCount: Longint; lpName: PKOLChar): THandle; stdcall;
-function CreateWaitableTimer(lpTimerAttributes: PSecurityAttributes; bManualReset: BOOL; lpTimerName: PKOLChar): THandle; stdcall;
-function DefineDosDevice(dwFlags: DWORD; lpDeviceName, lpTargetPath: PKOLChar): BOOL; stdcall;
-function DeleteFile(lpFileName: PKOLChar): BOOL; stdcall;
-function EndUpdateResource(hUpdate: THandle; fDiscard: BOOL): BOOL; stdcall;
-function EnumCalendarInfo(lpCalInfoEnumProc: TFNCalInfoEnumProc; Locale: LCID;
- Calendar: CALID; CalType: CALTYPE): BOOL; stdcall;
-function EnumDateFormats(lpDateFmtEnumProc: TFNDateFmtEnumProc;
- Locale: LCID; dwFlags: DWORD): BOOL; stdcall;
-function EnumResourceLanguages(hModule: HMODULE; lpType, lpName: PKOLChar;
- lpEnumFunc: ENUMRESLANGPROC; lParam: Longint): BOOL; stdcall;
-function EnumResourceNames(hModule: HMODULE; lpType: PKOLChar;
- lpEnumFunc: ENUMRESNAMEPROC; lParam: Longint): BOOL; stdcall;
-function EnumResourceTypes(hModule: HMODULE; lpEnumFunc: ENUMRESTYPEPROC;
- lParam: Longint): BOOL; stdcall;
-function EnumSystemCodePages(lpCodePageEnumProc: TFNCodepageEnumProc; dwFlags: DWORD): BOOL; stdcall;
-function EnumSystemLocales(lpLocaleEnumProc: TFNLocaleEnumProc; dwFlags: DWORD): BOOL; stdcall;
-function EnumTimeFormats(lpTimeFmtEnumProc: TFNTimeFmtEnumProc;
- Locale: LCID; dwFlags: DWORD): BOOL; stdcall;
-function ExpandEnvironmentStrings(lpSrc: PKOLChar; lpDst: PKOLChar; nSize: DWORD): DWORD; stdcall;
-procedure FatalAppExit(uAction: UINT; lpMessageText: PKOLChar); stdcall;
-function FillConsoleOutputCharacter(hConsoleOutput: THandle; cCharacter: KOLChar;
- nLength: DWORD; dwWriteCoord: TCoord; var lpNumberOfCharsWritten: DWORD): BOOL; stdcall;
-function FindAtom(lpString: PKOLChar): ATOM; stdcall;
-function FindFirstChangeNotification(lpPathName: PKOLChar;
- bWatchSubtree: BOOL; dwNotifyFilter: DWORD): THandle; stdcall;
-function FindFirstFile(lpFileName: PKOLChar; var lpFindFileData: TWIN32FindDataW): THandle; stdcall;
-function FindFirstFileEx(lpFileName: PKOLChar; fInfoLevelId: FINDEX_INFO_LEVELS;
- lpFindFileData: Pointer; fSearchOp: FINDEX_SEARCH_OPS; lpSearchFilter: Pointer;
- dwAdditionalFlags: DWORD): BOOL; stdcall;
-function FindNextFile(hFindFile: THandle; var lpFindFileData: TWIN32FindDataW): BOOL; stdcall;
-function FindResource(hModule: HMODULE; lpName, lpType: PKOLChar): HRSRC; stdcall;
-function FindResourceEx(hModule: HMODULE; lpType, lpName: PKOLChar; wLanguage: Word): HRSRC; stdcall;
-function FoldString(dwMapFlags: DWORD; lpSrcStr: PKOLChar; cchSrc: Integer;
- lpDestStr: PKOLChar; cchDest: Integer): Integer; stdcall;
-function FormatMessage(dwFlags: DWORD; lpSource: Pointer; dwMessageId: DWORD; dwLanguageId: DWORD;
- lpBuffer: PKOLChar; nSize: DWORD; Arguments: Pointer): DWORD; stdcall;
-function FreeEnvironmentStrings(EnvBlock: PKOLChar): BOOL; stdcall;
-function GetAtomName(nAtom: ATOM; lpBuffer: PKOLChar; nSize: Integer): UINT; stdcall;
-function GetBinaryType(lpApplicationName: PKOLChar; var lpBinaryType: DWORD): BOOL; stdcall;
-function GetCommandLine: PKOLChar; stdcall;
-function GetCompressedFileSize(lpFileName: PKOLChar; lpFileSizeHigh: PDWORD): DWORD; stdcall;
-function GetComputerName(lpBuffer: PKOLChar; var nSize: DWORD): BOOL; stdcall;
-function GetConsoleTitle(lpConsoleTitle: PKOLChar; nSize: DWORD): DWORD; stdcall;
-function GetCurrencyFormat(Locale: LCID; dwFlags: DWORD; lpValue: PKOLChar;
- lpFormat: PCurrencyFmt; lpCurrencyStr: PKOLChar; cchCurrency: Integer): Integer; stdcall;
-function GetCurrentDirectory(nBufferLength: DWORD; lpBuffer: PKOLChar): DWORD; stdcall;
-function GetDateFormat(Locale: LCID; dwFlags: DWORD; lpDate: PSystemTime;
- lpFormat: PKOLChar; lpDateStr: PKOLChar; cchDate: Integer): Integer; stdcall;
-function GetDefaultCommConfig(lpszName: PKOLChar;
- var lpCC: TCommConfig; var lpdwSize: DWORD): BOOL; stdcall;
-function GetDiskFreeSpace(lpRootPathName: PKOLChar;
- var lpSectorsPerCluster, lpBytesPerSector, lpNumberOfFreeClusters, lpTotalNumberOfClusters: DWORD): BOOL; stdcall;
-function GetDiskFreeSpaceEx(lpDirectoryName: PKOLChar;
- var lpFreeBytesAvailableToCaller, lpTotalNumberOfBytes; lpTotalNumberOfFreeBytes: PLargeInteger): BOOL; stdcall;
-function GetDriveType(lpRootPathName: PKOLChar): UINT; stdcall;
-function GetEnvironmentStrings: PKOLChar; stdcall;
-function GetEnvironmentVariable(lpName: PKOLChar; lpBuffer: PKOLChar; nSize: DWORD): DWORD; stdcall;
- {$IFDEF _D4orHigher} overload; {$ENDIF}
-function GetFileAttributes(lpFileName: PKOLChar): DWORD; stdcall;
-function GetFileAttributesEx(lpFileName: PKOLChar;
- fInfoLevelId: TGetFileExInfoLevels; lpFileInformation: Pointer): BOOL; stdcall;
-function GetFullPathName(lpFileName: PKOLChar; nBufferLength: DWORD;
- lpBuffer: PKOLChar; var lpFilePart: PKOLChar): DWORD; stdcall;
-function GetLocaleInfo(Locale: LCID; LCType: LCTYPE; lpLCData: PKOLChar; cchData: Integer): Integer; stdcall;
-function GetLogicalDriveStrings(nBufferLength: DWORD; lpBuffer: PKOLChar): DWORD; stdcall;
-function GetModuleFileName(hModule: HINST; lpFilename: PKOLChar; nSize: DWORD): DWORD; stdcall;
-function GetModuleHandle(lpModuleName: PKOLChar): HMODULE; stdcall;
-function GetNamedPipeHandleState(hNamedPipe: THandle;
- lpState, lpCurInstances, lpMaxCollectionCount, lpCollectDataTimeout: PDWORD;
- lpUserName: PKOLChar; nMaxUserNameSize: DWORD): BOOL; stdcall;
-function GetNumberFormat(Locale: LCID; dwFlags: DWORD; lpValue: PKOLChar;
- lpFormat: PNumberFmt; lpNumberStr: PKOLChar; cchNumber: Integer): Integer; stdcall;
-function GetPrivateProfileInt(lpAppName, lpKeyName: PKOLChar; nDefault: Integer; lpFileName: PKOLChar): UINT; stdcall;
-function GetPrivateProfileSection(lpAppName: PKOLChar; lpReturnedString: PKOLChar; nSize: DWORD; lpFileName: PKOLChar): DWORD; stdcall;
-function GetPrivateProfileSectionNames(lpszReturnBuffer: PKOLChar; nSize: DWORD; lpFileName: PKOLChar): DWORD; stdcall;
-function GetPrivateProfileString(lpAppName, lpKeyName, lpDefault: PKOLChar;
- lpReturnedString: PKOLChar; nSize: DWORD; lpFileName: PKOLChar): DWORD; stdcall;
-function GetProfileInt(lpAppName, lpKeyName: PKOLChar; nDefault: Integer): UINT; stdcall;
-function GetProfileSection(lpAppName: PKOLChar; lpReturnedString: PKOLChar; nSize: DWORD): DWORD; stdcall;
-function GetProfileString(lpAppName, lpKeyName, lpDefault: PKOLChar;
- lpReturnedString: PKOLChar; nSize: DWORD): DWORD; stdcall;
-function GetShortPathName(lpszLongPath: PKOLChar; lpszShortPath: PKOLChar;
- cchBuffer: DWORD): DWORD; stdcall;
-procedure GetStartupInfo(var lpStartupInfo: TStartupInfo); stdcall;
-function GetStringTypeEx(Locale: LCID; dwInfoType: DWORD;
- lpSrcStr: PKOLChar; cchSrc: Integer; var lpCharType): BOOL; stdcall;
-function GetSystemDirectory(lpBuffer: PKOLChar; uSize: UINT): UINT; stdcall;
-function GetTempFileName(lpPathName, lpPrefixString: PKOLChar;
- uUnique: UINT; lpTempFileName: PKOLChar): UINT; stdcall;
-function GetTempPath(nBufferLength: DWORD; lpBuffer: PKOLChar): DWORD; stdcall;
-function GetTimeFormat(Locale: LCID; dwFlags: DWORD; lpTime: PSystemTime;
- lpFormat: PKOLChar; lpTimeStr: PKOLChar; cchTime: Integer): Integer; stdcall;
-function GetVersionEx(var lpVersionInformation: TOSVersionInfo): BOOL; stdcall;
-function GetVolumeInformation(lpRootPathName: PKOLChar;
- lpVolumeNameBuffer: PKOLChar; nVolumeNameSize: DWORD; lpVolumeSerialNumber: PDWORD;
- var lpMaximumComponentLength, lpFileSystemFlags: DWORD;
- lpFileSystemNameBuffer: PKOLChar; nFileSystemNameSize: DWORD): BOOL; stdcall;
-function GetWindowsDirectory(lpBuffer: PKOLChar; uSize: UINT): UINT; stdcall;
-function GlobalAddAtom(lpString: PKOLChar): ATOM; stdcall;
-function GlobalFindAtom(lpString: PKOLChar): ATOM; stdcall;
-function GlobalGetAtomName(nAtom: ATOM; lpBuffer: PKOLChar; nSize: Integer): UINT; stdcall;
-function IsBadStringPtr(lpsz: PKOLChar; ucchMax: UINT): BOOL; stdcall;
-function LCMapString(Locale: LCID; dwMapFlags: DWORD; lpSrcStr: PKOLChar;
- cchSrc: Integer; lpDestStr: PKOLChar; cchDest: Integer): Integer; stdcall;
-function LoadLibrary(lpLibFileName: PKOLChar): HMODULE; stdcall;
-function LoadLibraryEx(lpLibFileName: PKOLChar; hFile: THandle; dwFlags: DWORD): HMODULE; stdcall;
-function MoveFile(lpExistingFileName, lpNewFileName: PKOLChar): BOOL; stdcall;
-function MoveFileEx(lpExistingFileName, lpNewFileName: PKOLChar; dwFlags: DWORD): BOOL; stdcall;
-function MoveFileWithProgress(lpExistingFileName, lpNewFileName: PKOLChar; lpProgressRoutine: TFNProgressRoutine;
- lpData: Pointer; dwFlags: DWORD): BOOL; stdcall;
-function OpenEvent(dwDesiredAccess: DWORD; bInheritHandle: BOOL; lpName: PKOLChar): THandle; stdcall;
-function OpenFileMapping(dwDesiredAccess: DWORD; bInheritHandle: BOOL; lpName: PKOLChar): THandle; stdcall;
-function OpenMutex(dwDesiredAccess: DWORD; bInheritHandle: BOOL; lpName: PKOLChar): THandle; stdcall;
-function OpenSemaphore(dwDesiredAccess: DWORD; bInheritHandle: BOOL; lpName: PKOLChar): THandle; stdcall;
-function OpenWaitableTimer(dwDesiredAccess: DWORD; bInheritHandle: BOOL;
- lpTimerName: PKOLChar): THandle; stdcall;
-procedure OutputDebugString(lpOutputString: PKOLChar); stdcall;
-function PeekConsoleInput(hConsoleInput: THandle; var lpBuffer: TInputRecord;
- nLength: DWORD; var lpNumberOfEventsRead: DWORD): BOOL; stdcall;
-function QueryDosDevice(lpDeviceName: PKOLChar; lpTargetPath: PKOLChar; ucchMax: DWORD): DWORD; stdcall;
-{$IFDEF _D4orHigher}
-//function QueryRecoveryAgents(p1: PKOLChar; var p2: Pointer; var p3: TRecoveryAgentInformation): DWORD; stdcall;
-{$ENDIF}
-function ReadConsole(hConsoleInput: THandle; lpBuffer: Pointer;
- nNumberOfCharsToRead: DWORD; var lpNumberOfCharsRead: DWORD; lpReserved: Pointer): BOOL; stdcall;
-function ReadConsoleInput(hConsoleInput: THandle; var lpBuffer: TInputRecord;
- nLength: DWORD; var lpNumberOfEventsRead: DWORD): BOOL; stdcall;
-function ReadConsoleOutput(hConsoleOutput: THandle; lpBuffer: Pointer;
- dwBufferSize, dwBufferCoord: TCoord; var lpReadRegion: TSmallRect): BOOL; stdcall;
-function ReadConsoleOutputCharacter(hConsoleOutput: THandle; lpCharacter: PKOLChar;
- nLength: DWORD; dwReadCoord: TCoord; var lpNumberOfCharsRead: DWORD): BOOL; stdcall;
-function RemoveDirectory(lpPathName: PKOLChar): BOOL; stdcall;
-function ScrollConsoleScreenBuffer(hConsoleOutput: THandle;
- const lpScrollRectangle: TSmallRect; lpClipRectangle: PSmallRect;
- dwDestinationOrigin: TCoord; var lpFill: TCharInfo): BOOL; stdcall;
-function SearchPath(lpPath, lpFileName, lpExtension: PKOLChar;
- nBufferLength: DWORD; lpBuffer: PKOLChar; var lpFilePart: PKOLChar): DWORD; stdcall;
-function SetComputerName(lpComputerName: PKOLChar): BOOL; stdcall;
-function SetConsoleTitle(lpConsoleTitle: PKOLChar): BOOL; stdcall;
-function SetCurrentDirectory(lpPathName: PKOLChar): BOOL; stdcall;
-function SetDefaultCommConfig(lpszName: PKOLChar; lpCC: PCommConfig; dwSize: DWORD): BOOL; stdcall;
-function SetEnvironmentVariable(lpName, lpValue: PKOLChar): BOOL; stdcall;
-function SetFileAttributes(lpFileName: PKOLChar; dwFileAttributes: DWORD): BOOL; stdcall;
-function SetLocaleInfo(Locale: LCID; LCType: LCTYPE; lpLCData: PKOLChar): BOOL; stdcall;
-function SetVolumeLabel(lpRootPathName: PKOLChar; lpVolumeName: PKOLChar): BOOL; stdcall;
-function UpdateResource(hUpdate: THandle; lpType, lpName: PKOLChar;
- wLanguage: Word; lpData: Pointer; cbData: DWORD): BOOL; stdcall;
-function VerLanguageName(wLang: DWORD; szLang: PKOLChar; nSize: DWORD): DWORD; stdcall;
-function WaitNamedPipe(lpNamedPipeName: PKOLChar; nTimeOut: DWORD): BOOL; stdcall;
-function WriteConsole(hConsoleOutput: THandle; const lpBuffer: Pointer;
- nNumberOfCharsToWrite: DWORD; var lpNumberOfCharsWritten: DWORD; lpReserved: Pointer): BOOL; stdcall;
-function WriteConsoleInput(hConsoleInput: THandle; const lpBuffer: TInputRecord;
- nLength: DWORD; var lpNumberOfEventsWritten: DWORD): BOOL; stdcall;
-function WriteConsoleOutput(hConsoleOutput: THandle; lpBuffer: Pointer;
- dwBufferSize, dwBufferCoord: TCoord; var lpWriteRegion: TSmallRect): BOOL; stdcall;
-function WriteConsoleOutputCharacter(hConsoleOutput: THandle;lpCharacter: PKOLChar;
- nLength: DWORD; dwWriteCoord: TCoord; var lpNumberOfCharsWritten: DWORD): BOOL; stdcall;
-function WritePrivateProfileSection(lpAppName, lpString, lpFileName: PKOLChar): BOOL; stdcall;
-function WritePrivateProfileString(lpAppName, lpKeyName, lpString, lpFileName: PKOLChar): BOOL; stdcall;
-function WriteProfileSection(lpAppName, lpString: PKOLChar): BOOL; stdcall;
-function WriteProfileString(lpAppName, lpKeyName, lpString: PKOLChar): BOOL; stdcall;
-function lstrcat(lpString1, lpString2: PKOLChar): PKOLChar; stdcall;
-function lstrcmp(lpString1, lpString2: PKOLChar): Integer; stdcall;
-function lstrcmpi(lpString1, lpString2: PKOLChar): Integer; stdcall;
-function lstrcpy(lpString1, lpString2: PKOLChar): PKOLChar; stdcall;
-function lstrcpyn(lpString1, lpString2: PKOLChar; iMaxLength: Integer): PKOLChar; stdcall;
-function lstrlen(lpString: PKOLChar): Integer; stdcall;
-function MultinetGetConnectionPerformance(lpNetResource: PNetResource;
- lpNetConnectInfoStruc: PNetConnectInfoStruct): DWORD; stdcall;
-function WNetAddConnection2(var lpNetResource: TNetResource;
- lpPassword, lpUserName: PKOLChar; dwFlags: DWORD): DWORD; stdcall;
-function WNetAddConnection3(hwndOwner: HWND; var lpNetResource: TNetResource;
- lpPassword, lpUserName: PKOLChar; dwFlags: DWORD): DWORD; stdcall;
-function WNetAddConnection(lpRemoteName, lpPassword, lpLocalName: PKOLChar): DWORD; stdcall;
-function WNetCancelConnection2(lpName: PKOLChar; dwFlags: DWORD; fForce: BOOL): DWORD; stdcall;
-function WNetCancelConnection(lpName: PKOLChar; fForce: BOOL): DWORD; stdcall;
-function WNetConnectionDialog1(var lpConnDlgStruct: TConnectDlgStruct): DWORD; stdcall;
-function WNetDisconnectDialog1(var lpConnDlgStruct: TDiscDlgStruct): DWORD; stdcall;
-function WNetEnumResource(hEnum: THandle; var lpcCount: DWORD;
- lpBuffer: Pointer; var lpBufferSize: DWORD): DWORD; stdcall;
-function WNetGetConnection(lpLocalName: PKOLChar;
- lpRemoteName: PKOLChar; var lpnLength: DWORD): DWORD; stdcall;
-function WNetGetLastError(var lpError: DWORD; lpErrorBuf: PKOLChar;
- nErrorBufSize: DWORD; lpNameBuf: PKOLChar; nNameBufSize: DWORD): DWORD; stdcall;
-function WNetGetNetworkInformation(lpProvider: PKOLChar;
- var lpNetInfoStruct: TNetInfoStruct): DWORD; stdcall;
-function WNetGetProviderName(dwNetType: DWORD; lpProviderName: PKOLChar;
- var lpBufferSize: DWORD): DWORD; stdcall;
-function WNetGetResourceParent(lpNetResource: PNetResource;
- lpBuffer: Pointer; var cbBuffer: DWORD): DWORD; stdcall;
-function WNetGetUniversalName(lpLocalPath: PKOLChar; dwInfoLevel: DWORD;
- lpBuffer: Pointer; var lpBufferSize: DWORD): DWORD; stdcall;
-function WNetGetUser(lpName: PKOLChar; lpUserName: PKOLChar; var lpnLength: DWORD): DWORD; stdcall;
-function WNetOpenEnum(dwScope, dwType, dwUsage: DWORD;
- lpNetResource: PNetResource; var lphEnum: THandle): DWORD; stdcall;
-function WNetSetConnection(lpName: PKOLChar; dwProperties: DWORD; pvValues: Pointer): DWORD; stdcall;
-function WNetUseConnection(hwndOwner: HWND;
- var lpNetResource: TNetResource; lpUserID: PKOLChar;
- lpPassword: PKOLChar; dwFlags: DWORD; lpAccessName: PKOLChar;
- var lpBufferSize: DWORD; var lpResult: DWORD): DWORD; stdcall;
-function GetFileVersionInfo(lptstrFilename: PKOLChar; dwHandle, dwLen: DWORD;
- lpData: Pointer): BOOL; stdcall;
-function GetFileVersionInfoSize(lptstrFilename: PKOLChar; var lpdwHandle: DWORD): DWORD; stdcall;
-function VerFindFile(uFlags: DWORD; szFileName, szWinDir, szAppDir, szCurDir: PKOLChar;
- var lpuCurDirLen: UINT; szDestDir: PKOLChar; var lpuDestDirLen: UINT): DWORD; stdcall;
-function VerInstallFile(uFlags: DWORD;
- szSrcFileName, szDestFileName, szSrcDir, szDestDir, szCurDir, szTmpFile: PKOLChar;
- var lpuTmpFileLen: UINT): DWORD; stdcall;
-function VerQueryValue(pBlock: Pointer; lpSubBlock: PKOLChar;
- var lplpBuffer: Pointer; var puLen: UINT): BOOL; stdcall;
-function GetPrivateProfileStruct(lpszSection, lpszKey: PKOLChar;
- lpStruct: Pointer; uSizeStruct: UINT; szFile: PKOLChar): BOOL; stdcall;
-function WritePrivateProfileStruct(lpszSection, lpszKey: PKOLChar;
- lpStruct: Pointer; uSizeStruct: UINT; szFile: PKOLChar): BOOL; stdcall;
-function AddFontResource(FileName: PKOLChar): Integer; stdcall;
-{$IFDEF _D4orHigher}
-//function AddFontResourceEx(p1: PKOLChar; p2: DWORD; p3: PDesignVector): Integer; stdcall;
-{$ENDIF}
-function CopyEnhMetaFile(p1: HENHMETAFILE; p2: PKOLChar): HENHMETAFILE; stdcall;
-function CopyMetaFile(p1: HMETAFILE; p2: PKOLChar): HMETAFILE; stdcall;
-function CreateColorSpace(var ColorSpace: TLogColorSpace): HCOLORSPACE; stdcall;
-function CreateDC(lpszDriver, lpszDevice, lpszOutput: PKOLChar;
- lpdvmInit: PDeviceMode): HDC; stdcall;
-function CreateEnhMetaFile(DC: HDC; FileName: PKOLChar; Rect: PRect; Desc: PKOLChar): HDC; stdcall;
-function CreateFont(nHeight, nWidth, nEscapement, nOrientaion, fnWeight: Integer;
- fdwItalic, fdwUnderline, fdwStrikeOut, fdwCharSet, fdwOutputPrecision,
- fdwClipPrecision, fdwQuality, fdwPitchAndFamily: DWORD; lpszFace: PKOLChar): HFONT; stdcall;
-function CreateFontIndirect(const p1: TLogFont): HFONT; stdcall;
-{$IFDEF _D4orHigher}
-//function CreateFontIndirectEx(const p1: PEnumLogFontExDV): HFONT; stdcall;
-{$ENDIF}
-function CreateIC(lpszDriver, lpszDevice, lpszOutput: PKOLChar; lpdvmInit: PDeviceMode): HDC; stdcall;
-function CreateMetaFile(p1: PKOLChar): HDC; stdcall;
-function CreateScalableFontResource(p1: DWORD; p2, p3, p4: PKOLChar): BOOL; stdcall;
-function DeviceCapabilities(pDriverName, pDeviceName, pPort: PKOLChar;
- iIndex: Integer; pOutput: PKOLChar; DevMode: PDeviceMode): Integer; stdcall;
-function EnumFontFamilies(DC: HDC; p2: PKOLChar; p3: TFNFontEnumProc; p4: LPARAM): BOOL; stdcall;
-function EnumFontFamiliesEx(DC: HDC; var p2: TLogFont;
- p3: TFNFontEnumProc; p4: LPARAM; p5: DWORD): BOOL; stdcall;
-function EnumFonts(DC: HDC; lpszFace: PKOLChar; fntenmprc: TFNFontEnumProc;
- lpszData: PKOLChar): Integer; stdcall;
-function EnumICMProfiles(DC: HDC; ICMProc: TFNICMEnumProc; p3: LPARAM): Integer; stdcall;
-function ExtTextOut(DC: HDC; X, Y: Integer; Options: Longint;
- Rect: PRect; Str: PKOLChar; Count: Longint; Dx: PInteger): BOOL; stdcall;
-function GetCharABCWidths(DC: HDC; FirstChar, LastChar: UINT; const ABCStructs): BOOL; stdcall;
-function GetCharABCWidthsFloat(DC: HDC; FirstChar, LastChar: UINT; const ABCFloatSturcts): BOOL; stdcall;
-function GetCharWidth32(DC: HDC; FirstChar, LastChar: UINT; const Widths): BOOL; stdcall;
-function GetCharWidth(DC: HDC; FirstChar, LastChar: UINT; const Widths): BOOL; stdcall;
-function GetCharWidthFloat(DC: HDC; FirstChar, LastChar: UINT; const Widths): BOOL; stdcall;
-function GetCharacterPlacement(DC: HDC; p2: PKOLChar; p3, p4: BOOL;
- var p5: TGCPResults; p6: DWORD): DWORD; stdcall;
-function GetEnhMetaFile(p1: PKOLChar): HENHMETAFILE; stdcall;
-function GetEnhMetaFileDescription(p1: HENHMETAFILE; p2: UINT; p3: PKOLChar): UINT; stdcall;
-function GetGlyphIndices(DC: HDC; p2: PKOLChar; p3: Integer; p4: PWORD; p5: DWORD): DWORD; stdcall;
-function GetGlyphOutline(DC: HDC; uChar, uFormat: UINT;
- const lpgm: TGlyphMetrics; cbBuffer: DWORD; lpvBuffer: Pointer; const lpmat2: TMat2): DWORD; stdcall;
-function GetICMProfile(DC: HDC; var Size: DWORD; Name: PKOLChar): BOOL; stdcall;
-function GetLogColorSpace(p1: HCOLORSPACE; var ColorSpace: TLogColorSpace; Size: DWORD): BOOL; stdcall;
-function GetMetaFile(p1: PKOLChar): HMETAFILE; stdcall;
-function GetObject(p1: HGDIOBJ; p2: Integer; p3: Pointer): Integer; stdcall;
-function GetOutlineTextMetrics(DC: HDC; p2: UINT; OTMetricStructs: Pointer): UINT; stdcall;
-function GetTextExtentExPoint(DC: HDC; p2: PKOLChar;
- p3, p4: Integer; p5, p6: PInteger; var p7: TSize): BOOL; stdcall;
-function GetTextExtentPoint32(DC: HDC; Str: PKOLChar; Count: Integer;
- var Size: TSize): BOOL; stdcall;
-function GetTextExtentPoint(DC: HDC; Str: PKOLChar; Count: Integer;
- var Size: TSize): BOOL; stdcall;
-function GetTextFace(DC: HDC; Count: Integer; Buffer: PKOLChar): Integer; stdcall;
-function GetTextMetrics(DC: HDC; var TM: TTextMetric): BOOL; stdcall;
-function PolyTextOut(DC: HDC; const PolyTextArray; Strings: Integer): BOOL; stdcall;
-function RemoveFontResource(FileName: PKOLChar): BOOL; stdcall;
-{$IFDEF _D4orHigher}
-//function RemoveFontResourceEx(p1: PKOLChar; p2: DWORD; p3: PDesignVector): BOOL; stdcall;
-{$ENDIF}
-function ResetDC(DC: HDC; const InitData: TDeviceMode): HDC; stdcall;
-function SetICMProfile(DC: HDC; Name: PKOLChar): BOOL; stdcall;
-function StartDoc(DC: HDC; const p2: TDocInfo): Integer; stdcall;
-function TextOut(DC: HDC; X, Y: Integer; Str: PKOLChar; Count: Integer): BOOL; stdcall;
-function UpdateICMRegKey(p1: DWORD; p2, p3: PKOLChar; p4: UINT): BOOL; stdcall;
-function wglUseFontBitmaps(DC: HDC; p2, p3, p4: DWORD): BOOL; stdcall;
-function wglUseFontOutlines(p1: HDC; p2, p3, p4: DWORD;
- p5, p6: Single; p7: Integer; p8: PGlyphMetricsFloat): BOOL; stdcall;
-function AnsiToOem(const lpszSrc: LPCSTR; lpszDst: LPSTR): BOOL; stdcall;
-function AnsiToOemBuff(lpszSrc: LPCSTR; lpszDst: LPSTR; cchDstLength: DWORD): BOOL; stdcall;
-function AnsiUpper(lpsz: LPSTR): LPSTR; stdcall;
-function AnsiUpperBuff(lpsz: LPSTR; cchLength: DWORD): DWORD; stdcall;
-function AnsiLower(lpsz: LPSTR): LPSTR; stdcall;
-function AnsiLowerBuff(lpsz: LPSTR; cchLength: DWORD): DWORD; stdcall;
-function AnsiNext(const lpsz: LPCSTR): LPSTR; stdcall;
-function AnsiPrev(const lpszStart: LPCSTR; const lpszCurrent: LPCSTR): LPSTR; stdcall;
-function AppendMenu(hMenu: HMENU; uFlags, uIDNewItem: UINT;
- lpNewItem: PKOLChar): BOOL; stdcall;
-//function BroadcastSystemMessage(Flags: DWORD; Recipients: PDWORD;
-// uiMessage: UINT; wParam: WPARAM; lParam: LPARAM): Longint; stdcall;
-//function BroadcastSystemMessageW(Flags: DWORD; Recipients: PDWORD;
-// uiMessage: UINT; wParam: WPARAM; lParam: LPARAM): Longint; stdcall;
-function CallMsgFilter(var lpMsg: TMsg; nCode: Integer): BOOL; stdcall;
-function CallWindowProc(lpPrevWndFunc: TFNWndProc; hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
-function ChangeDisplaySettings(var lpDevMode: TDeviceMode; dwFlags: DWORD): Longint; stdcall;
-function ChangeDisplaySettingsEx(lpszDeviceName: PKOLChar; var lpDevMode: TDeviceMode;
- wnd: HWND; dwFlags: DWORD; lParam: Pointer): Longint; stdcall;
-function ChangeMenu(hMenu: HMENU; cmd: UINT; lpszNewItem: PKOLChar;
- cmdInsert: UINT; flags: UINT): BOOL; stdcall;
-function CharLower(lpsz: PKOLChar): PKOLChar; stdcall;
-function CharLowerBuff(lpsz: PKOLChar; cchLength: DWORD): DWORD; stdcall;
-function CharNext(lpsz: PKOLChar): PKOLChar; stdcall;
-function CharNextEx(CodePage: Word; lpCurrentChar: LPCSTR; dwFlags: DWORD): LPSTR; stdcall;
-function CharPrev(lpszStart: PKOLChar; lpszCurrent: PKOLChar): PKOLChar; stdcall;
-function CharPrevEx(CodePage: Word; lpStart, lpCurrentChar: LPCSTR; dwFlags: DWORD): LPSTR; stdcall;
-function CharToOem(lpszSrc: PKOLChar; lpszDst: PKOLChar): BOOL; stdcall;
-function CharToOemBuff(lpszSrc: PKOLChar; lpszDst: PKOLChar; cchDstLength: DWORD): BOOL; stdcall;
-function CharUpper(lpsz: PKOLChar): PKOLChar; stdcall;
-function CharUpperBuff(lpsz: PKOLChar; cchLength: DWORD): DWORD; stdcall;
-function CopyAcceleratorTable(hAccelSrc: HACCEL; var lpAccelDst; cAccelEntries: Integer): Integer; stdcall;
-function CreateAcceleratorTable(var Accel; Count: Integer): HACCEL; stdcall;
-function CreateDesktop(lpszDesktop, lpszDevice: PKOLChar;
- pDevmode: PDeviceMode; dwFlags: DWORD; dwDesiredAccess:
- DWORD; lpsa: PSecurityAttributes): HDESK; stdcall;
-function CreateDialogIndirectParam(hInstance: HINST; const lpTemplate: TDlgTemplate;
- hWndParent: HWND; lpDialogFunc: TFNDlgProc; dwInitParam: LPARAM): HWND; stdcall;
-function CreateDialogParam(hInstance: HINST; lpTemplateName: PKOLChar;
- hWndParent: HWND; lpDialogFunc: TFNDlgProc; dwInitParam: LPARAM): HWND; stdcall;
-function CreateMDIWindow(lpClassName, lpWindowName: PKOLChar;
- dwStyle: DWORD; X, Y, nWidth, nHeight: Integer;
- hWndParent: HWND; hInstance: HINST; lParam: LPARAM): HWND; stdcall;
-function CreateWindowEx(dwExStyle: DWORD; lpClassName: PKOLChar;
- lpWindowName: PKOLChar; dwStyle: DWORD; X, Y, nWidth, nHeight: Integer;
- hWndParent: HWND; hMenu: HMENU; hInstance: HINST; lpParam: Pointer): HWND; stdcall;
-function CreateWindowStation(lpwinsta: PKOLChar; dwReserved, dwDesiredAccess: DWORD;
- lpsa: PSecurityAttributes): HWINSTA; stdcall;
-function DefDlgProc(hDlg: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
-function DefFrameProc(hWnd, hWndMDIClient: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
-function DefMDIChildProc(hWnd: HWND; uMsg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
-function DefWindowProc(hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
-function DialogBoxIndirectParam(hInstance: HINST; const lpDialogTemplate: TDlgTemplate;
- hWndParent: HWND; lpDialogFunc: TFNDlgProc; dwInitParam: LPARAM): Integer; stdcall;
-function DialogBoxParam(hInstance: HINST; lpTemplateName: PKOLChar;
- hWndParent: HWND; lpDialogFunc: TFNDlgProc; dwInitParam: LPARAM): Integer; stdcall;
-function DispatchMessage(const lpMsg: TMsg): LRESULT; stdcall;
-function DlgDirList(hDlg: HWND; lpPathSpec: PKOLChar;
- nIDListBox, nIDStaticPath: Integer; uFileType: UINT): Integer; stdcall;
-function DlgDirListComboBox(hDlg: HWND; lpPathSpec: PKOLChar;
- nIDComboBox, nIDStaticPath: Integer; uFiletype: UINT): Integer; stdcall;
-function DlgDirSelectComboBoxEx(hDlg: HWND; lpString: PKOLChar;
- nCount, nIDComboBox: Integer): BOOL; stdcall;
-function DlgDirSelectEx(hDlg: HWND; lpString: PKOLChar; nCount, nIDListBox: Integer): BOOL; stdcall;
-function DrawState(DC: HDC; Brush: HBRUSH; CBFunc: TFNDrawStateProc;
- lData: LPARAM; wData: WPARAM; x, y, cx, cy: Integer; Flags: UINT): BOOL; stdcall;
-function DrawText(hDC: HDC; lpString: PKOLChar; nCount: Integer;
- var lpRect: TRect; uFormat: UINT): Integer; stdcall;
-function DrawTextEx(DC: HDC; lpchText: PKOLChar; cchText: Integer; var p4: TRect;
- dwDTFormat: UINT; DTParams: PDrawTextParams): Integer; stdcall;
-function EnumDesktops(hwinsta: HWINSTA; lpEnumFunc: TFNDeskTopEnumProc; lParam: LPARAM): BOOL; stdcall;
-function EnumDisplaySettings(lpszDeviceName: PKOLChar; iModeNum: DWORD;
- var lpDevMode: TDeviceMode): BOOL; stdcall;
-{$IFDEF _D4orHigher}
-//function EnumDisplayDevices(Unused: Pointer; iDevNum: DWORD;
-// var lpDisplayDevice: TDisplayDevice; dwFlags: DWORD): BOOL; stdcall;
-{$ENDIF}
-function EnumProps(hWnd: HWND; lpEnumFunc: TFNPropEnumProc): Integer; stdcall;
-function EnumPropsEx(hWnd: HWND; lpEnumFunc: TFNPropEnumProcEx; lParam: LPARAM): Integer; stdcall;
-function EnumWindowStations(lpEnumFunc: TFNWinStaEnumProc; lParam: LPARAM): BOOL; stdcall;
-function FindWindow(lpClassName, lpWindowName: PKOLChar): HWND; stdcall;
-function FindWindowEx(Parent, Child: HWND; ClassName, WindowName: PKOLChar): HWND; stdcall;
-{$IFDEF _D4orHigher}
-//function GetAltTabInfo(hwnd: HWND; iItem: Integer; var pati: TAltTabInfo;
-// pszItemText: PKOLChar; cchItemText: UINT): BOOL; stdcall;
-{$ENDIF}
-function GetClassInfo(hInstance: HINST; lpClassName: PKOLChar;
- var lpWndClass: TWndClass): BOOL; stdcall;
-function GetClassInfoEx(Instance: HINST; Classname: PKOLChar; var WndClass: TWndClassEx): BOOL; stdcall;
-function GetClassLong(hWnd: HWND; nIndex: Integer): DWORD; stdcall;
-function GetClassName(hWnd: HWND; lpClassName: PKOLChar; nMaxCount: Integer): Integer; stdcall;
-function GetClipboardFormatName(format: UINT; lpszFormatName: PKOLChar;
- cchMaxCount: Integer): Integer; stdcall;
-function GetDlgItemText(hDlg: HWND; nIDDlgItem: Integer;
- lpString: PKOLChar; nMaxCount: Integer): UINT; stdcall;
-function GetKeyNameText(lParam: Longint; lpString: PKOLChar; nSize: Integer): Integer; stdcall;
-function GetKeyboardLayoutName(pwszKLID: PKOLChar): BOOL; stdcall;
-function GetMenuItemInfo(p1: HMENU; p2: UINT; p3: BOOL; var p4: TMenuItemInfo): BOOL; stdcall;
-function GetMenuItemInfoW(p1: HMENU; p2: UINT; p3: BOOL; var p4: TMenuItemInfo): BOOL; stdcall;
-function GetMenuString(hMenu: HMENU; uIDItem: UINT; lpString: PKOLChar;
- nMaxCount: Integer; uFlag: UINT): Integer; stdcall;
-function GetMessage(var lpMsg: TMsg; hWnd: HWND;
- wMsgFilterMin, wMsgFilterMax: UINT): BOOL; stdcall;
-function GetProp(hWnd: HWND; lpString: PKOLChar): THandle; stdcall;
-function GetTabbedTextExtent(hDC: HDC; lpString: PKOLChar;
- nCount, nTabPositions: Integer; var lpnTabStopPositions): DWORD; stdcall;
-function GetUserObjectInformation(hObj: THandle; nIndex: Integer; pvInfo: Pointer;
- nLength: DWORD; var lpnLengthNeeded: DWORD): BOOL; stdcall;
-function GetWindowLong(hWnd: HWND; nIndex: Integer): Longint; stdcall;
-function GetWindowModuleFileName(hwnd: HWND; pszFileName: PKOLChar; cchFileNameMax: UINT): UINT; stdcall;
-function GetWindowText(hWnd: HWND; lpString: PKOLChar; nMaxCount: Integer): Integer; stdcall;
-function GetWindowTextLength(hWnd: HWND): Integer; stdcall;
-function GrayString(hDC: HDC; hBrush: HBRUSH; lpOutputFunc: TFNGrayStringProc;
- lpData: LPARAM; nCount, X, Y, nWidth, nHeight: Integer): BOOL; stdcall;
-function InsertMenu(hMenu: HMENU; uPosition, uFlags, uIDNewItem: UINT;
- lpNewItem: PKOLChar): BOOL; stdcall;
-function InsertMenuItem(p1: HMENU; p2: UINT; p3: BOOL; const p4: TMenuItemInfo): BOOL; stdcall;
-function IsCharAlpha(ch: KOLChar): BOOL; stdcall;
-function IsCharAlphaNumeric(ch: KOLChar): BOOL; stdcall;
-function IsCharLower(ch: KOLChar): BOOL; stdcall;
-function IsCharUpper(ch: KOLChar): BOOL; stdcall;
-function IsDialogMessage(hDlg: HWND; var lpMsg: TMsg): BOOL; stdcall;
-function LoadAccelerators(hInstance: HINST; lpTableName: PKOLChar): HACCEL; stdcall;
-function LoadBitmap(hInstance: HINST; lpBitmapName: PKOLChar): HBITMAP; stdcall;
-function LoadCursor(hInstance: HINST; lpCursorName: PKOLChar): HCURSOR; stdcall;
-function LoadCursorFromFile(lpFileName: PKOLChar): HCURSOR; stdcall;
-function LoadIcon(hInstance: HINST; lpIconName: PKOLChar): HICON; stdcall;
-function LoadImage(hInst: HINST; ImageName: PKOLChar; ImageType: UINT; X, Y: Integer; Flags: UINT): THandle; stdcall;
-function LoadKeyboardLayout(pwszKLID: PKOLChar; Flags: UINT): HKL; stdcall;
-function LoadMenu(hInstance: HINST; lpMenuName: PKOLChar): HMENU; stdcall;
-function LoadMenuIndirect(lpMenuTemplate: Pointer): HMENU; stdcall;
-function LoadString(hInstance: HINST; uID: UINT; lpBuffer: PKOLChar; nBufferMax: Integer): Integer; stdcall;
-function MapVirtualKey(uCode, uMapType: UINT): UINT; stdcall;
-function MapVirtualKeyEx(uCode, uMapType: UINT; dwhkl: HKL): UINT; stdcall;
-function MessageBox(hWnd: HWND; lpText, lpCaption: PKOLChar; uType: UINT): Integer; stdcall;
-function MessageBoxEx(hWnd: HWND; lpText, lpCaption: PKOLChar;
- uType: UINT; wLanguageId: Word): Integer; stdcall;
-function MessageBoxIndirect(const MsgBoxParams: TMsgBoxParams): BOOL; stdcall;
-function ModifyMenu(hMnu: HMENU; uPosition, uFlags, uIDNewItem: UINT;
- lpNewItem: PKOLChar): BOOL; stdcall;
-function OemToAnsi(const lpszSrc: LPCSTR; lpszDst: LPSTR): BOOL; stdcall;
-function OemToAnsiBuff(lpszSrc: LPCSTR; lpszDst: LPSTR; cchDstLength: DWORD): BOOL; stdcall;
-function OemToChar(lpszSrc: PKOLChar; lpszDst: PKOLChar): BOOL; stdcall;
-function OemToCharBuff(lpszSrc: PKOLChar; lpszDst: PKOLChar; cchDstLength: DWORD): BOOL; stdcall;
-function OpenDesktop(lpszDesktop: PKOLChar; dwFlags: DWORD; fInherit: BOOL;
- dwDesiredAccess: DWORD): HDESK; stdcall;
-function OpenWindowStation(lpszWinSta: PKOLChar; fInherit: BOOL;
- dwDesiredAccess: DWORD): HWINSTA; stdcall;
-function PeekMessage(var lpMsg: TMsg; hWnd: HWND;
- wMsgFilterMin, wMsgFilterMax, wRemoveMsg: UINT): BOOL; stdcall;
-function PostMessage(hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): BOOL; stdcall;
-function PostThreadMessage(idThread: DWORD; Msg: UINT; wParam: WPARAM; lParam: LPARAM): BOOL; stdcall;
-function RealGetWindowClass(hwnd: HWND; pszType: PKOLChar; cchType: UINT): UINT; stdcall;
-function RegisterClass(const lpWndClass: TWndClass): ATOM; stdcall;
-function RegisterClassEx(const WndClass: TWndClassEx): ATOM; stdcall;
-function RegisterClipboardFormat(lpszFormat: PKOLChar): UINT; stdcall;
-{$IFDEF _D4orHigher}
-//function RegisterDeviceNotification(hRecipient: THandle; NotificationFilter: Pointer; Flags: DWORD): HDEVNOTIFY; stdcall;
-{$ENDIF}
-function RegisterWindowMessage(lpString: PKOLChar): UINT; stdcall;
-function RemoveProp(hWnd: HWND; lpString: PKOLChar): THandle; stdcall;
-function SendDlgItemMessage(hDlg: HWND; nIDDlgItem: Integer;
- Msg: UINT; wParam: WPARAM; lParam: LPARAM): Longint; stdcall;
-function SendMessage(hWnd: HWND; Msg: UINT; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
-function SendMessageCallback(hWnd: HWND; Msg: UINT; wParam: WPARAM;
- lParam: LPARAM; lpResultCallBack: TFNSendAsyncProc; dwData: DWORD): BOOL; stdcall;
-function SendMessageTimeout(hWnd: HWND; Msg: UINT; wParam: WPARAM;
- lParam: LPARAM; fuFlags, uTimeout: UINT; var lpdwResult: DWORD_PTR): LRESULT; stdcall;
-function SendNotifyMessage(hWnd: HWND; Msg: UINT; wParam: WPARAM;
- lParam: LPARAM): BOOL; stdcall;
-function SetClassLong(hWnd: HWND; nIndex: Integer; dwNewLong: Longint): DWORD; stdcall;
-function SetDlgItemText(hDlg: HWND; nIDDlgItem: Integer; lpString: PKOLChar): BOOL; stdcall;
-function SetMenuItemInfoW(p1: HMENU; p2: UINT; p3: BOOL; const p4: TMenuItemInfo): BOOL; stdcall;
-function SetProp(hWnd: HWND; lpString: PKOLChar; hData: THandle): BOOL; stdcall;
-function SetUserObjectInformation(hObj: THandle; nIndex: Integer;
- pvInfo: Pointer; nLength: DWORD): BOOL; stdcall;
-function SetWindowLong(hWnd: HWND; nIndex: Integer; dwNewLong: Longint): Longint; stdcall;
-function SetWindowText(hWnd: HWND; lpString: PKOLChar): BOOL; stdcall;
-function SetWindowsHook(nFilterType: Integer; pfnFilterProc: TFNHookProc): HHOOK; stdcall;
-function SetWindowsHookEx(idHook: Integer; lpfn: TFNHookProc; hmod: HINST; dwThreadId: DWORD): HHOOK; stdcall;
-function SystemParametersInfo(uiAction, uiParam: UINT;
- pvParam: Pointer; fWinIni: UINT): BOOL; stdcall;
-function TabbedTextOut(hDC: HDC; X, Y: Integer; lpString: PKOLChar; nCount, nTabPositions: Integer;
- var lpnTabStopPositions; nTabOrigin: Integer): Longint; stdcall;
-function TranslateAccelerator(hWnd: HWND; hAccTable: HACCEL; var lpMsg: TMsg): Integer; stdcall;
-function UnregisterClass(lpClassName: PKOLChar; hInstance: HINST): BOOL; stdcall;
-function VkKeyScan(ch: KOLChar): SHORT; stdcall;
-function VkKeyScanEx(ch: KOLChar; dwhkl: HKL): SHORT; stdcall;
-function WinHelp(hWndMain: HWND; lpszHelp: PKOLChar; uCommand: UINT; dwData: DWORD): BOOL; stdcall;
-function wsprintf(Output: PKOLChar; Format: PKOLChar): Integer; stdcall;
-function wvsprintf(Output: PKOLChar; Format: PKOLChar; arglist: va_list): Integer; stdcall;
-function CreateMutex(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PWideChar): THandle;
-
-function GetWindowLongPtr(hWnd: HWND; nIndex: Integer): PtrInt; stdcall;
-function SetWindowLongPtr(hWnd: HWND; nIndex: Integer; dwNewLong: PtrInt): PtrInt; stdcall;
-function GetWindowLongPtrA(hWnd: HWND; nIndex: Integer): PtrInt; stdcall;
-function SetWindowLongPtrA(hWnd: HWND; nIndex: Integer; dwNewLong: PtrInt): PtrInt; stdcall;
-function GetWindowLongPtrW(hWnd: HWND; nIndex: Integer): PtrInt; stdcall;
-function SetWindowLongPtrW(hWnd: HWND; nIndex: Integer; dwNewLong: PtrInt): PtrInt; stdcall;
-function GetClassLongPtr(hWnd: HWND; nIndex: Integer): PtrUInt; stdcall;
-function SetClassLongPtr(hWnd: HWND; nIndex: Integer; dwNewLong: PtrInt): PtrUInt; stdcall;
-function GetClassLongPtrA(hWnd: HWND; nIndex: Integer): PtrUInt; stdcall;
-function SetClassLongPtrA(hWnd: HWND; nIndex: Integer; dwNewLong: PtrInt): PtrUInt; stdcall;
-function GetClassLongPtrW(hWnd: HWND; nIndex: Integer): PtrUInt; stdcall;
-function SetClassLongPtrW(hWnd: HWND; nIndex: Integer; dwNewLong: PtrInt): PtrUInt; stdcall;
-function ChooseFontW(var ChooseFont:TChooseFontW):WINBOOL; stdcall;
-{$ENDIF UNICODE_CTRLS}
-{$ENDIF interface_part} ////////////////////////////////////////////////////////
-
-{$IFDEF implementation_part} ///////////////////////////////////////////////////
-{$IFDEF UNICODE_CTRLS}
-
-function AbortSystemShutdown; external advapi32 name 'AbortSystemShutdownW';
-function AccessCheckAndAuditAlarm; external advapi32 name 'AccessCheckAndAuditAlarmW';
-{$IFDEF _D4orHigher}
-function AccessCheckByTypeAndAuditAlarm; external advapi32 name 'AccessCheckByTypeAndAuditAlarmW';
-function AccessCheckByTypeResultListAndAuditAlarm; external advapi32 name 'AccessCheckByTypeResultListAndAuditAlarmW';
-{$ENDIF}
-function BackupEventLog; external advapi32 name 'BackupEventLogW';
-function ClearEventLog; external advapi32 name 'ClearEventLogW';
-function CreateProcessAsUser; external advapi32 name 'CreateProcessAsUserW';
-//function GetCurrentHwProfile; external advapi32 name 'GetCurrentHwProfileW';
-function GetFileSecurity; external advapi32 name 'GetFileSecurityW';
-function GetUserName; external advapi32 name 'GetUserNameW';
-function InitiateSystemShutdown; external advapi32 name 'InitiateSystemShutdownW';
-function LogonUser; external advapi32 name 'LogonUserW';
-function LookupAccountName; external advapi32 name 'LookupAccountNameW';
-function LookupAccountSid; external advapi32 name 'LookupAccountSidW';
-function LookupPrivilegeDisplayName; external advapi32 name 'LookupPrivilegeDisplayNameW';
-function LookupPrivilegeName; external advapi32 name 'LookupPrivilegeNameW';
-function LookupPrivilegeValue; external advapi32 name 'LookupPrivilegeValueW';
-function ObjectCloseAuditAlarm; external advapi32 name 'ObjectCloseAuditAlarmW';
-function ObjectDeleteAuditAlarm; external advapi32 name 'ObjectDeleteAuditAlarmW';
-function ObjectOpenAuditAlarm; external advapi32 name 'ObjectOpenAuditAlarmW';
-function ObjectPrivilegeAuditAlarm; external advapi32 name 'ObjectPrivilegeAuditAlarmW';
-function OpenBackupEventLog; external advapi32 name 'OpenBackupEventLogW';
-function OpenEventLog; external advapi32 name 'OpenEventLogW';
-function PrivilegedServiceAuditAlarm; external advapi32 name 'PrivilegedServiceAuditAlarmW';
-function ReadEventLog; external advapi32 name 'ReadEventLogW';
-function RegConnectRegistry; external advapi32 name 'RegConnectRegistryW';
-function RegCreateKey; external advapi32 name 'RegCreateKeyW';
-function RegCreateKeyEx; external advapi32 name 'RegCreateKeyExW';
-function RegDeleteKey; external advapi32 name 'RegDeleteKeyW';
-function RegDeleteValue; external advapi32 name 'RegDeleteValueW';
-function RegEnumKeyEx; external advapi32 name 'RegEnumKeyExW';
-function RegEnumKey; external advapi32 name 'RegEnumKeyW';
-function RegEnumValue; external advapi32 name 'RegEnumValueW';
-function RegLoadKey; external advapi32 name 'RegLoadKeyW';
-function RegOpenKey; external advapi32 name 'RegOpenKeyW';
-function RegOpenKeyEx; external advapi32 name 'RegOpenKeyExW';
-function RegQueryInfoKey; external advapi32 name 'RegQueryInfoKeyW';
-function RegQueryMultipleValues; external advapi32 name 'RegQueryMultipleValuesW';
-function RegQueryValue; external advapi32 name 'RegQueryValueW';
-function RegQueryValueEx; external advapi32 name 'RegQueryValueExW';
-function RegReplaceKey; external advapi32 name 'RegReplaceKeyW';
-function RegRestoreKey; external advapi32 name 'RegRestoreKeyW';
-function RegSaveKey; external advapi32 name 'RegSaveKeyW';
-function RegSetValue; external advapi32 name 'RegSetValueW';
-function RegSetValueEx; external advapi32 name 'RegSetValueExW';
-function RegUnLoadKey; external advapi32 name 'RegUnLoadKeyW';
-function RegisterEventSource; external advapi32 name 'RegisterEventSourceW';
-function ReportEvent; external advapi32 name 'ReportEventW';
-function SetFileSecurity; external advapi32 name 'SetFileSecurityW';
-function AddAtom; external kernel32 name 'AddAtomW';
-function BeginUpdateResource; external kernel32 name 'BeginUpdateResourceW';
-function BuildCommDCB; external kernel32 name 'BuildCommDCBW';
-function BuildCommDCBAndTimeouts; external kernel32 name 'BuildCommDCBAndTimeoutsW';
-function CallNamedPipe; external kernel32 name 'CallNamedPipeW';
-function CommConfigDialog; external kernel32 name 'CommConfigDialogW';
-function CompareString; external kernel32 name 'CompareStringW';
-function CopyFile; external kernel32 name 'CopyFileW';
-function CopyFileEx; external kernel32 name 'CopyFileExW';
-function CreateDirectory; external kernel32 name 'CreateDirectoryW';
-function CreateDirectoryEx; external kernel32 name 'CreateDirectoryExW';
-function CreateEvent; external kernel32 name 'CreateEventW';
-function CreateFile; external kernel32 name 'CreateFileW';
-function CreateFileMapping; external kernel32 name 'CreateFileMappingW';
-function CreateHardLink; external kernel32 name 'CreateHardLinkW';
-function CreateMailslot; external kernel32 name 'CreateMailslotW';
-function CreateNamedPipe; external kernel32 name 'CreateNamedPipeW';
-function CreateProcess; external kernel32 name 'CreateProcessW';
-function CreateSemaphore; external kernel32 name 'CreateSemaphoreW';
-function CreateWaitableTimer; external kernel32 name 'CreateWaitableTimerW';
-function DefineDosDevice; external kernel32 name 'DefineDosDeviceW';
-function DeleteFile; external kernel32 name 'DeleteFileW';
-function EndUpdateResource; external kernel32 name 'EndUpdateResourceW';
-function EnumCalendarInfo; external kernel32 name 'EnumCalendarInfoW';
-function EnumDateFormats; external kernel32 name 'EnumDateFormatsW';
-function EnumResourceLanguages; external kernel32 name 'EnumResourceLanguagesW';
-function EnumResourceNames; external kernel32 name 'EnumResourceNamesW';
-function EnumResourceTypes; external kernel32 name 'EnumResourceTypesW';
-function EnumSystemCodePages; external kernel32 name 'EnumSystemCodePagesW';
-function EnumSystemLocales; external kernel32 name 'EnumSystemLocalesW';
-function EnumTimeFormats; external kernel32 name 'EnumTimeFormatsW';
-function ExpandEnvironmentStrings; external kernel32 name 'ExpandEnvironmentStringsW';
-procedure FatalAppExit; external kernel32 name 'FatalAppExitW';
-function FillConsoleOutputCharacter; external kernel32 name 'FillConsoleOutputCharacterW';
-function FindAtom; external kernel32 name 'FindAtomW';
-function FindFirstChangeNotification; external kernel32 name 'FindFirstChangeNotificationW';
-function FindFirstFile; external kernel32 name 'FindFirstFileW';
-function FindFirstFileEx; external kernel32 name 'FindFirstFileExW';
-function FindNextFile; external kernel32 name 'FindNextFileW';
-function FindResource; external kernel32 name 'FindResourceW';
-function FindResourceEx; external kernel32 name 'FindResourceExW';
-function FoldString; external kernel32 name 'FoldStringW';
-function FormatMessage; external kernel32 name 'FormatMessageW';
-function FreeEnvironmentStrings; external kernel32 name 'FreeEnvironmentStringsW';
-function GetAtomName; external kernel32 name 'GetAtomNameW';
-function GetBinaryType; external kernel32 name 'GetBinaryTypeW';
-function GetCommandLine; external kernel32 name 'GetCommandLineW';
-function GetCompressedFileSize; external kernel32 name 'GetCompressedFileSizeW';
-function GetComputerName; external kernel32 name 'GetComputerNameW';
-function GetConsoleTitle; external kernel32 name 'GetConsoleTitleW';
-function GetCurrencyFormat; external kernel32 name 'GetCurrencyFormatW';
-function GetCurrentDirectory; external kernel32 name 'GetCurrentDirectoryW';
-function GetDateFormat; external kernel32 name 'GetDateFormatW';
-function GetDefaultCommConfig; external kernel32 name 'GetDefaultCommConfigW';
-function GetDiskFreeSpace; external kernel32 name 'GetDiskFreeSpaceW';
-function GetDiskFreeSpaceEx; external kernel32 name 'GetDiskFreeSpaceExW';
-function GetDriveType; external kernel32 name 'GetDriveTypeW';
-function GetEnvironmentStrings; external kernel32 name 'GetEnvironmentStringsW';
-function GetEnvironmentVariable(lpName: PKOLChar; lpBuffer: PKOLChar;
- nSize: DWORD): DWORD; external kernel32 name 'GetEnvironmentVariableW';
-function GetFileAttributes; external kernel32 name 'GetFileAttributesW';
-function GetFileAttributesEx; external kernel32 name 'GetFileAttributesExW';
-function GetFullPathName; external kernel32 name 'GetFullPathNameW';
-function GetLocaleInfo; external kernel32 name 'GetLocaleInfoW';
-function GetLogicalDriveStrings; external kernel32 name 'GetLogicalDriveStringsW';
-function GetModuleFileName; external kernel32 name 'GetModuleFileNameW';
-function GetModuleHandle; external kernel32 name 'GetModuleHandleW';
-function GetNamedPipeHandleState; external kernel32 name 'GetNamedPipeHandleStateW';
-function GetNumberFormat; external kernel32 name 'GetNumberFormatW';
-function GetPrivateProfileInt; external kernel32 name 'GetPrivateProfileIntW';
-function GetPrivateProfileSection; external kernel32 name 'GetPrivateProfileSectionW';
-function GetPrivateProfileSectionNames; external kernel32 name 'GetPrivateProfileSectionNamesW';
-function GetPrivateProfileString; external kernel32 name 'GetPrivateProfileStringW';
-function GetProfileInt; external kernel32 name 'GetProfileIntW';
-function GetProfileSection; external kernel32 name 'GetProfileSectionW';
-function GetProfileString; external kernel32 name 'GetProfileStringW';
-function GetShortPathName; external kernel32 name 'GetShortPathNameW';
-procedure GetStartupInfo; external kernel32 name 'GetStartupInfoW';
-function GetStringTypeEx; external kernel32 name 'GetStringTypeExW';
-function GetSystemDirectory; external kernel32 name 'GetSystemDirectoryW';
-function GetTempFileName; external kernel32 name 'GetTempFileNameW';
-function GetTempPath; external kernel32 name 'GetTempPathW';
-function GetTimeFormat; external kernel32 name 'GetTimeFormatW';
-function GetVersionEx; external kernel32 name 'GetVersionExW';
-function GetVolumeInformation; external kernel32 name 'GetVolumeInformationW';
-function GetWindowsDirectory; external kernel32 name 'GetWindowsDirectoryW';
-function GlobalAddAtom; external kernel32 name 'GlobalAddAtomW';
-function GlobalFindAtom; external kernel32 name 'GlobalFindAtomW';
-function GlobalGetAtomName; external kernel32 name 'GlobalGetAtomNameW';
-function IsBadStringPtr; external kernel32 name 'IsBadStringPtrW';
-function LCMapString; external kernel32 name 'LCMapStringW';
-function LoadLibrary; external kernel32 name 'LoadLibraryW';
-function LoadLibraryEx; external kernel32 name 'LoadLibraryExW';
-function MoveFile; external kernel32 name 'MoveFileW';
-function MoveFileEx; external kernel32 name 'MoveFileExW';
-function MoveFileWithProgress; external kernel32 name 'MoveFileWithProgressW';
-function OpenEvent; external kernel32 name 'OpenEventW';
-function OpenFileMapping; external kernel32 name 'OpenFileMappingW';
-function OpenMutex; external kernel32 name 'OpenMutexW';
-function OpenSemaphore; external kernel32 name 'OpenSemaphoreW';
-function OpenWaitableTimer; external kernel32 name 'OpenWaitableTimerW';
-procedure OutputDebugString; external kernel32 name 'OutputDebugStringW';
-function PeekConsoleInput; external kernel32 name 'PeekConsoleInputW';
-function QueryDosDevice; external kernel32 name 'QueryDosDeviceW';
-{$IFDEF _D4orHigher}
-//function QueryRecoveryAgents; external kernel32 name 'QueryRecoveryAgentsW';
-{$ENDIF}
-function ReadConsole; external kernel32 name 'ReadConsoleW';
-function ReadConsoleInput; external kernel32 name 'ReadConsoleInputW';
-function ReadConsoleOutput; external kernel32 name 'ReadConsoleOutputW';
-function ReadConsoleOutputCharacter; external kernel32 name 'ReadConsoleOutputCharacterW';
-function RemoveDirectory; external kernel32 name 'RemoveDirectoryW';
-function ScrollConsoleScreenBuffer; external kernel32 name 'ScrollConsoleScreenBufferW';
-function SearchPath; external kernel32 name 'SearchPathW';
-function SetComputerName; external kernel32 name 'SetComputerNameW';
-function SetConsoleTitle; external kernel32 name 'SetConsoleTitleW';
-function SetCurrentDirectory; external kernel32 name 'SetCurrentDirectoryW';
-function SetDefaultCommConfig; external kernel32 name 'SetDefaultCommConfigW';
-function SetEnvironmentVariable; external kernel32 name 'SetEnvironmentVariableW';
-function SetFileAttributes; external kernel32 name 'SetFileAttributesW';
-function SetLocaleInfo; external kernel32 name 'SetLocaleInfoW';
-function SetVolumeLabel; external kernel32 name 'SetVolumeLabelW';
-function UpdateResource; external kernel32 name 'UpdateResourceW';
-function VerLanguageName; external kernel32 name 'VerLanguageNameW';
-function WaitNamedPipe; external kernel32 name 'WaitNamedPipeW';
-function WriteConsole; external kernel32 name 'WriteConsoleW';
-function WriteConsoleInput; external kernel32 name 'WriteConsoleInputW';
-function WriteConsoleOutput; external kernel32 name 'WriteConsoleOutputW';
-function WriteConsoleOutputCharacter; external kernel32 name 'WriteConsoleOutputCharacterW';
-function WritePrivateProfileSection; external kernel32 name 'WritePrivateProfileSectionW';
-function WritePrivateProfileString; external kernel32 name 'WritePrivateProfileStringW';
-function WriteProfileSection; external kernel32 name 'WriteProfileSectionW';
-function WriteProfileString; external kernel32 name 'WriteProfileStringW';
-function lstrcat; external kernel32 name 'lstrcatW';
-function lstrcmp; external kernel32 name 'lstrcmpW';
-function lstrcmpi; external kernel32 name 'lstrcmpiW';
-function lstrcpy; external kernel32 name 'lstrcpyW';
-function lstrcpyn; external kernel32 name 'lstrcpynW';
-function lstrlen; external kernel32 name 'lstrlenW';
-function MultinetGetConnectionPerformance; external mpr name 'MultinetGetConnectionPerformanceW';
-function WNetAddConnection2; external mpr name 'WNetAddConnection2W';
-function WNetAddConnection3; external mpr name 'WNetAddConnection3W';
-function WNetAddConnection; external mpr name 'WNetAddConnectionW';
-function WNetCancelConnection2; external mpr name 'WNetCancelConnection2W';
-function WNetCancelConnection; external mpr name 'WNetCancelConnectionW';
-function WNetConnectionDialog1; external mpr name 'WNetConnectionDialog1W';
-function WNetDisconnectDialog1; external mpr name 'WNetDisconnectDialog1W';
-function WNetEnumResource; external mpr name 'WNetEnumResourceW';
-function WNetGetConnection; external mpr name 'WNetGetConnectionW';
-function WNetGetLastError; external mpr name 'WNetGetLastErrorW';
-function WNetGetNetworkInformation; external mpr name 'WNetGetNetworkInformationW';
-function WNetGetProviderName; external mpr name 'WNetGetProviderNameW';
-function WNetGetResourceParent; external mpr name 'WNetGetResourceParentW';
-function WNetGetUniversalName; external mpr name 'WNetGetUniversalNameW';
-function WNetGetUser; external mpr name 'WNetGetUserW';
-function WNetOpenEnum; external mpr name 'WNetOpenEnumW';
-function WNetSetConnection; external mpr name 'WNetSetConnectionW';
-function WNetUseConnection; external mpr name 'WNetUseConnectionW';
-function GetFileVersionInfo; external version name 'GetFileVersionInfoW';
-function GetFileVersionInfoSize; external version name 'GetFileVersionInfoSizeW';
-function VerFindFile; external version name 'VerFindFileW';
-function VerInstallFile; external version name 'VerInstallFileW';
-function VerQueryValue; external version name 'VerQueryValueW';
-function GetPrivateProfileStruct; external kernel32 name 'GetPrivateProfileStructW';
-function WritePrivateProfileStruct; external kernel32 name 'WritePrivateProfileStructW';
-function AddFontResource; external gdi32 name 'AddFontResourceW';
-{$IFDEF _D4orHigher}
-//function AddFontResourceEx; external gdi32 name 'AddFontResourceExW';
-{$ENDIF}
-function CopyEnhMetaFile; external gdi32 name 'CopyEnhMetaFileW';
-function CopyMetaFile; external gdi32 name 'CopyMetaFileW';
-function CreateColorSpace; external gdi32 name 'CreateColorSpaceW';
-function CreateDC; external gdi32 name 'CreateDCW';
-function CreateEnhMetaFile; external gdi32 name 'CreateEnhMetaFileW';
-function CreateFont; external gdi32 name 'CreateFontW';
-function CreateFontIndirect; external gdi32 name 'CreateFontIndirectW';
-{$IFDEF _D4orHigher}
-//function CreateFontIndirectEx; external gdi32 name 'CreateFontIndirectExW';
-{$ENDIF}
-function CreateIC; external gdi32 name 'CreateICW';
-function CreateMetaFile; external gdi32 name 'CreateMetaFileW';
-function CreateScalableFontResource; external gdi32 name 'CreateScalableFontResourceW';
-function DeviceCapabilities; external gdi32 name 'DeviceCapabilitiesW';
-function EnumFontFamilies; external gdi32 name 'EnumFontFamiliesW';
-function EnumFontFamiliesEx; external gdi32 name 'EnumFontFamiliesExW';
-function EnumFonts; external gdi32 name 'EnumFontsW';
-function EnumICMProfiles; external gdi32 name 'EnumICMProfilesW';
-function ExtTextOut; external gdi32 name 'ExtTextOutW';
-function GetCharABCWidths; external gdi32 name 'GetCharABCWidthsW';
-function GetCharABCWidthsFloat; external gdi32 name 'GetCharABCWidthsFloatW';
-function GetCharWidth32; external gdi32 name 'GetCharWidth32W';
-function GetCharWidth; external gdi32 name 'GetCharWidthW';
-function GetCharWidthFloat; external gdi32 name 'GetCharWidthFloatW';
-function GetCharacterPlacement; external gdi32 name 'GetCharacterPlacementW';
-function GetEnhMetaFile; external gdi32 name 'GetEnhMetaFileW';
-function GetEnhMetaFileDescription; external gdi32 name 'GetEnhMetaFileDescriptionW';
-function GetGlyphIndices; external gdi32 name 'GetGlyphIndicesW';
-function GetGlyphOutline; external gdi32 name 'GetGlyphOutlineW';
-function GetICMProfile; external gdi32 name 'GetICMProfileW';
-function GetLogColorSpace; external gdi32 name 'GetLogColorSpaceW';
-function GetMetaFile; external gdi32 name 'GetMetaFileW';
-function GetObject; external gdi32 name 'GetObjectW';
-function GetOutlineTextMetrics; external gdi32 name 'GetOutlineTextMetricsW';
-function GetTextExtentExPoint; external gdi32 name 'GetTextExtentExPointW';
-function GetTextExtentPoint32; external gdi32 name 'GetTextExtentPoint32W';
-function GetTextExtentPoint; external gdi32 name 'GetTextExtentPointW';
-function GetTextFace; external gdi32 name 'GetTextFaceW';
-function GetTextMetrics; external gdi32 name 'GetTextMetricsW';
-function PolyTextOut; external gdi32 name 'PolyTextOutW';
-function RemoveFontResource; external gdi32 name 'RemoveFontResourceW';
-{$IFDEF _D4orHigher}
-//function RemoveFontResourceEx; external gdi32 name 'RemoveFontResourceExW';
-{$ENDIF}
-function ResetDC; external gdi32 name 'ResetDCW';
-function SetICMProfile; external gdi32 name 'SetICMProfileW';
-function StartDoc; external gdi32 name 'StartDocW';
-function TextOut; external gdi32 name 'TextOutW';
-function UpdateICMRegKey; external gdi32 name 'UpdateICMRegKeyW';
-function wglUseFontBitmaps; external opengl32 name 'wglUseFontBitmapsW';
-function wglUseFontOutlines; external opengl32 name 'wglUseFontOutlinesW';
-function AnsiToOem; external user32 name 'CharToOemW';
-function AnsiToOemBuff; external user32 name 'CharToOemBuffW';
-function AnsiUpper; external user32 name 'CharUpperW';
-function AnsiUpperBuff; external user32 name 'CharUpperBuffW';
-function AnsiLower; external user32 name 'CharLowerW';
-function AnsiLowerBuff; external user32 name 'CharLowerBuffW';
-function AnsiNext; external user32 name 'CharNextW';
-function AnsiPrev; external user32 name 'CharPrevW';
-function AppendMenu; external user32 name 'AppendMenuW';
-//function BroadcastSystemMessage; external user32 name 'BroadcastSystemMessageW';
-//function BroadcastSystemMessageW; external user32 name 'BroadcastSystemMessageW';
-function CallMsgFilter; external user32 name 'CallMsgFilterW';
-function CallWindowProc; external user32 name 'CallWindowProcW';
-function ChangeDisplaySettings; external user32 name 'ChangeDisplaySettingsW';
-function ChangeDisplaySettingsEx; external user32 name 'ChangeDisplaySettingsExW';
-function ChangeMenu; external user32 name 'ChangeMenuW';
-function CharLower; external user32 name 'CharLowerW';
-function CharLowerBuff; external user32 name 'CharLowerBuffW';
-function CharNext; external user32 name 'CharNextW';
-function CharNextEx; external user32 name 'CharNextExW';
-function CharPrev; external user32 name 'CharPrevW';
-function CharPrevEx; external user32 name 'CharPrevExW';
-function CharToOem; external user32 name 'CharToOemW';
-function CharToOemBuff; external user32 name 'CharToOemBuffW';
-function CharUpper; external user32 name 'CharUpperW';
-function CharUpperBuff; external user32 name 'CharUpperBuffW';
-function CopyAcceleratorTable; external user32 name 'CopyAcceleratorTableW';
-function CreateAcceleratorTable; external user32 name 'CreateAcceleratorTableW';
-function CreateDesktop; external user32 name 'CreateDesktopW';
-function CreateDialogIndirectParam; external user32 name 'CreateDialogIndirectParamW';
-function CreateDialogParam; external user32 name 'CreateDialogParamW';
-function CreateMDIWindow; external user32 name 'CreateMDIWindowW';
-function CreateWindowEx; external user32 name 'CreateWindowExW';
-function CreateWindowStation; external user32 name 'CreateWindowStationW';
-function DefDlgProc; external user32 name 'DefDlgProcW';
-function DefFrameProc; external user32 name 'DefFrameProcW';
-function DefMDIChildProc; external user32 name 'DefMDIChildProcW';
-function DefWindowProc; external user32 name 'DefWindowProcW';
-function DialogBoxIndirectParam; external user32 name 'DialogBoxIndirectParamW';
-function DialogBoxParam; external user32 name 'DialogBoxParamW';
-function DispatchMessage; external user32 name 'DispatchMessageW';
-function DlgDirList; external user32 name 'DlgDirListW';
-function DlgDirListComboBox; external user32 name 'DlgDirListComboBoxW';
-function DlgDirSelectComboBoxEx; external user32 name 'DlgDirSelectComboBoxExW';
-function DlgDirSelectEx; external user32 name 'DlgDirSelectExW';
-function DrawState; external user32 name 'DrawStateW';
-function DrawText; external user32 name 'DrawTextW';
-function DrawTextEx; external user32 name 'DrawTextExW';
-function EnumDesktops; external user32 name 'EnumDesktopsW';
-function EnumDisplaySettings; external user32 name 'EnumDisplaySettingsW';
-{$IFDEF _D4orHigher}
-//function EnumDisplayDevices; external user32 name 'EnumDisplayDevicesW';
-{$ENDIF}
-function EnumProps; external user32 name 'EnumPropsW';
-function EnumPropsEx; external user32 name 'EnumPropsExW';
-function EnumWindowStations; external user32 name 'EnumWindowStationsW';
-function FindWindow; external user32 name 'FindWindowW';
-function FindWindowEx; external user32 name 'FindWindowExW';
-{$IFDEF _D4orHigher}
-//function GetAltTabInfo; external user32 name 'GetAltTabInfoW';
-{$ENDIF}
-function GetClassInfo; external user32 name 'GetClassInfoW';
-function GetClassInfoEx; external user32 name 'GetClassInfoExW';
-function GetClassLong; external user32 name 'GetClassLongW';
-function GetClassName; external user32 name 'GetClassNameW';
-function GetClipboardFormatName; external user32 name 'GetClipboardFormatNameW';
-function GetDlgItemText; external user32 name 'GetDlgItemTextW';
-function GetKeyNameText; external user32 name 'GetKeyNameTextW';
-function GetKeyboardLayoutName; external user32 name 'GetKeyboardLayoutNameW';
-function GetMenuItemInfo; external user32 name 'GetMenuItemInfoW';
-function GetMenuItemInfoW; external user32 name 'GetMenuItemInfoW';
-function GetMenuString; external user32 name 'GetMenuStringW';
-function GetMessage; external user32 name 'GetMessageW';
-function GetProp; external user32 name 'GetPropW';
-function GetTabbedTextExtent; external user32 name 'GetTabbedTextExtentW';
-function GetUserObjectInformation; external user32 name 'GetUserObjectInformationW';
-function GetWindowLong; external user32 name 'GetWindowLongW';
-function GetWindowModuleFileName; external user32 name 'GetWindowModuleFileNameW';
-function GetWindowText; external user32 name 'GetWindowTextW';
-function GetWindowTextLength; external user32 name 'GetWindowTextLengthW';
-function GrayString; external user32 name 'GrayStringW';
-function InsertMenu; external user32 name 'InsertMenuW';
-function InsertMenuItem; external user32 name 'InsertMenuItemW';
-function IsCharAlpha; external user32 name 'IsCharAlphaW';
-function IsCharAlphaNumeric; external user32 name 'IsCharAlphaNumericW';
-function IsCharLower; external user32 name 'IsCharLowerW';
-function IsCharUpper; external user32 name 'IsCharUpperW';
-function IsDialogMessage; external user32 name 'IsDialogMessageW';
-function LoadAccelerators; external user32 name 'LoadAcceleratorsW';
-function LoadBitmap; external user32 name 'LoadBitmapW';
-function LoadCursor; external user32 name 'LoadCursorW';
-function LoadCursorFromFile; external user32 name 'LoadCursorFromFileW';
-function LoadIcon; external user32 name 'LoadIconW';
-function LoadImage; external user32 name 'LoadImageW';
-function LoadKeyboardLayout; external user32 name 'LoadKeyboardLayoutW';
-function LoadMenu; external user32 name 'LoadMenuW';
-function LoadMenuIndirect; external user32 name 'LoadMenuIndirectW';
-function LoadString; external user32 name 'LoadStringW';
-function MapVirtualKey; external user32 name 'MapVirtualKeyW';
-function MapVirtualKeyEx; external user32 name 'MapVirtualKeyExW';
-function MessageBox; external user32 name 'MessageBoxW';
-function MessageBoxEx; external user32 name 'MessageBoxExW';
-function MessageBoxIndirect; external user32 name 'MessageBoxIndirectW';
-function ModifyMenu; external user32 name 'ModifyMenuW';
-function OemToAnsi; external user32 name 'OemToCharW';
-function OemToAnsiBuff; external user32 name 'OemToCharBuffW';
-function OemToChar; external user32 name 'OemToCharW';
-function OemToCharBuff; external user32 name 'OemToCharBuffW';
-function OpenDesktop; external user32 name 'OpenDesktopW';
-function OpenWindowStation; external user32 name 'OpenWindowStationW';
-function PeekMessage; external user32 name 'PeekMessageW';
-function PostMessage; external user32 name 'PostMessageW';
-function PostThreadMessage; external user32 name 'PostThreadMessageW';
-function RealGetWindowClass; external user32 name 'RealGetWindowClassW';
-function RegisterClass; external user32 name 'RegisterClassW';
-function RegisterClassEx; external user32 name 'RegisterClassExW';
-function RegisterClipboardFormat; external user32 name 'RegisterClipboardFormatW';
-{$IFDEF _D4orHigher}
-//function RegisterDeviceNotification; external user32 name 'RegisterDeviceNotificationW';
-{$ENDIF}
-function RegisterWindowMessage; external user32 name 'RegisterWindowMessageW';
-function RemoveProp; external user32 name 'RemovePropW';
-function SendDlgItemMessage; external user32 name 'SendDlgItemMessageW';
-function SendMessage; external user32 name 'SendMessageW';
-function SendMessageCallback; external user32 name 'SendMessageCallbackW';
-function SendMessageTimeout; external user32 name 'SendMessageTimeoutW';
-function SendNotifyMessage; external user32 name 'SendNotifyMessageW';
-function SetClassLong; external user32 name 'SetClassLongW';
-function SetDlgItemText; external user32 name 'SetDlgItemTextW';
-function SetMenuItemInfoW; external user32 name 'SetMenuItemInfoW';
-function SetProp; external user32 name 'SetPropW';
-function SetUserObjectInformation; external user32 name 'SetUserObjectInformationW';
-function SetWindowLong; external user32 name 'SetWindowLongW';
-function SetWindowText; external user32 name 'SetWindowTextW';
-function SetWindowsHook; external user32 name 'SetWindowsHookW';
-function SetWindowsHookEx; external user32 name 'SetWindowsHookExW';
-function SystemParametersInfo; external user32 name 'SystemParametersInfoW';
-function TabbedTextOut; external user32 name 'TabbedTextOutW';
-function TranslateAccelerator; external user32 name 'TranslateAcceleratorW';
-function UnregisterClass; external user32 name 'UnregisterClassW';
-function VkKeyScan; external user32 name 'VkKeyScanW';
-function VkKeyScanEx; external user32 name 'VkKeyScanExW';
-function WinHelp; external user32 name 'WinHelpW';
-function wsprintf; external user32 name 'wsprintfW';
-function wvsprintf; external user32 name 'wvsprintfW';
-// NT 4.0 bug workaround - NT 4.0 doesn't test bInitialOwner for zero/nonzero, it tests for 1
-function _CreateMutex(lpMutexAttributes: PSecurityAttributes;
- bInitialOwner: Integer; lpName: PWideChar): THandle; stdcall;
- external kernel32 name 'CreateMutexW';
-function CreateMutex(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PWideChar): THandle;
-begin
- Result := _CreateMutex(lpMutexAttributes, Integer(Boolean(bInitialOwner)), lpName);
-end;
-{$IFDEF WIN64}
-function GetWindowLongPtr; external user32 name 'GetWindowLongPtrW';
-function SetWindowLongPtr; external user32 name 'SetWindowLongPtrW';
-function GetClassLongPtr; external user32 name 'GetClassLongPtrW';
-function SetClassLongPtr; external user32 name 'SetClassLongPtrW';
-function GetWindowLongPtrA; external user32 name 'GetWindowLongPtrA';
-function SetWindowLongPtrA; external user32 name 'SetWindowLongPtrA';
-function GetClassLongPtrA; external user32 name 'GetClassLongPtrA';
-function SetClassLongPtrA; external user32 name 'SetClassLongPtrA';
-function GetWindowLongPtrW; external user32 name 'GetWindowLongPtrW';
-function SetWindowLongPtrW; external user32 name 'SetWindowLongPtrW';
-function GetClassLongPtrW; external user32 name 'GetClassLongPtrW';
-function SetClassLongPtrW; external user32 name 'SetClassLongPtrW';
-{$ELSE}
-function GetWindowLongPtr; external user32 name 'GetWindowLongW';
-function SetWindowLongPtr; external user32 name 'SetWindowLongW';
-function GetClassLongPtr; external user32 name 'GetClassLongW';
-function SetClassLongPtr; external user32 name 'SetClassLongW';
-function GetWindowLongPtrA; external user32 name 'GetWindowLongA';
-function SetWindowLongPtrA; external user32 name 'SetWindowLongA';
-function GetClassLongPtrA; external user32 name 'GetClassLongA';
-function SetClassLongPtrA; external user32 name 'SetClassLongA';
-function GetWindowLongPtrW; external user32 name 'GetWindowLongW';
-function SetWindowLongPtrW; external user32 name 'SetWindowLongW';
-function GetClassLongPtrW; external user32 name 'GetClassLongW';
-function SetClassLongPtrW; external user32 name 'SetClassLongW';
-{$ENDIF}
-function ChooseFontW; external 'comdlg32' name 'ChooseFontW';
-{$ENDIF UNICODE_CTRLS}
-function SetTimer; external user32 name 'SetTimer';
-function KillTimer; external user32 name 'KillTimer';
-function GetProcessWorkingSetSize; external KernelDLL name 'GetProcessWorkingSetSize';
-function SetProcessWorkingSetSize; external KernelDLL name 'SetProcessWorkingSetSize';
-function SendInput; external user32 name 'SendInput';
-
-
-{$ENDIF implementation_part} ///////////////////////////////////////////////////
|