paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-28 09:43:42 +02:00
Code Issues Packages Projects Releases Wiki Activity
77bd6071b3
fpc/rtl/win32/defines.pp
peter 77bd6071b3 * type HINSTANCE -> HINST
1998-10-27 11:17:07 +00:00

5749 lines
155 KiB
ObjectPascal
Raw Blame History

{
$Id$
This file is part of the Free Pascal run time library.
This unit contains the constant definitions for the Win32 API
Copyright (c) 1993,97 by Florian Klaempfl,
member of the Free Pascal development team.
See the file COPYING.FPC, included in this distribution,
for details about the copyright.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
{$ifndef windows_include_files}
{$define read_interface}
{$define read_implementation}
{$endif not windows_include_files}
{$ifndef windows_include_files}
unit defines;
{ Automatically converted by H2PAS.EXE from defines.h
Utility made by Florian Klaempfl 25th-28th september 96
Improvements made by Mark A. Malakanov 22nd-25th may 97
Further improvements by Michael Van Canneyt, April 1998
define handling and error recovery by Pierre Muller, June 1998 }
interface
{ C default packing is dword }
{$PACKRECORDS 4}
{
Defines.h
Windows32 API definitions
Copyright (C) 1996, 1997 Free Software Foundation, Inc.
Author: Scott Christley <scottc@net-community.com>
This file is part of the Windows32 API Library.
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
If you are interested in a warranty or support for this source code,
contact Scott Christley <scottc@net-community.com> for more information.
You should have received a copy of the GNU Library General Public
License along with this library; see the file COPYING.LIB.
If not, write to the Free Software Foundation,
59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
}
{ WARNING: This file is automatically generated. }
uses base;
{$endif not windows_include_files}
{$ifdef read_interface}
{$ifndef _GNU_H_WINDOWS32_DEFINES}
{$define _GNU_H_WINDOWS32_DEFINES}
{ Not convertable by H2PAS
#ifdef __cplusplus
extern "C"
#endif __cplusplus }
const
MAX_PATH = 260;
{ was #define dname def_expr }
function UNICODE_NULL : WCHAR;
const
LF_FACESIZE = 32;
LF_FULLFACESIZE = 64;
ELF_VENDOR_SIZE = 4;
SECURITY_STATIC_TRACKING = 0;
SECURITY_DYNAMIC_TRACKING = 1;
MAX_DEFAULTCHAR = 2;
MAX_LEADBYTES = 12;
EXCEPTION_MAXIMUM_PARAMETERS = 15;
CCHDEVICENAME = 32;
CCHFORMNAME = 32;
MENU_TEXT_LEN = 40;
MAX_LANA = 254;
NCBNAMSZ = 16;
NETBIOS_NAME_LEN = 16;
OFS_MAXPATHNAME = 128;
MAX_TAB_STOPS = 32;
ANYSIZE_ARRAY = 1;
RAS_MaxCallbackNumber = 128;
RAS_MaxDeviceName = 128;
RAS_MaxDeviceType = 16;
RAS_MaxEntryName = 256;
RAS_MaxIpAddress = 15;
RAS_MaxIpxAddress = 21;
RAS_MaxPhoneNumber = 128;
UNLEN = 256;
PWLEN = 256;
CNLEN = 15;
DNLEN = 15;
{ Unsigned types max }
MAXDWORD = $FFFFFFFF;
MAXWORD = $FFFF;
MAXBYTE = $FF;
{ Signed types max/min }
MINCHAR = $80;
MAXCHAR = $7F;
MINSHORT = $8000;
MAXSHORT = $7FFF;
MINLONG = $80000000;
MAXLONG = $7FFFFFFF;
{ _llseek }
FILE_BEGIN = 0;
FILE_CURRENT = 1;
FILE_END = 2;
{ _lopen, LZOpenFile, OpenFile }
OF_READ = 0;
OF_READWRITE = 2;
OF_WRITE = 1;
OF_SHARE_COMPAT = 0;
OF_SHARE_DENY_NONE = 64;
OF_SHARE_DENY_READ = 48;
OF_SHARE_DENY_WRITE = 32;
OF_SHARE_EXCLUSIVE = 16;
OF_CANCEL = 2048;
OF_CREATE = 4096;
OF_DELETE = 512;
OF_EXIST = 16384;
OF_PARSE = 256;
OF_PROMPT = 8192;
OF_REOPEN = 32768;
OF_VERIFY = 1024;
{ ActivateKeyboardLayout, LoadKeyboardLayout }
HKL_NEXT = 1;
HKL_PREV = 0;
KLF_REORDER = 8;
KLF_UNLOADPREVIOUS = 4;
KLF_ACTIVATE = 1;
KLF_NOTELLSHELL = 128;
KLF_REPLACELANG = 16;
KLF_SUBSTITUTE_OK = 2;
{ AppendMenu }
MF_BITMAP = $4;
MF_DISABLED = $2;
MF_ENABLED = 0;
MF_GRAYED = $1;
MF_HELP = $4000;
MF_MENUBARBREAK = $20;
MF_MENUBREAK = $40;
MF_MOUSESELECT = $8000;
MF_OWNERDRAW = $100;
MF_POPUP = $10;
MF_SEPARATOR = $800;
MF_STRING = 0;
MF_SYSMENU = $2000;
MF_USECHECKBITMAPS = $200;
{ Ternary Raster Operations - BitBlt }
BLACKNESS = $00000042;
NOTSRCERASE = $001100A6;
NOTSRCCOPY = $00330008;
SRCERASE = $00440328;
DSTINVERT = $00550009;
PATINVERT = $005A0049;
SRCINVERT = $00660046;
SRCAND = $008800C6;
MERGEPAINT = $00BB0226;
MERGECOPY = $00C000CA;
SRCCOPY = $00CC0020;
SRCPAINT = $00EE0086;
PATCOPY = $00F00021;
PATPAINT = $00FB0A09;
WHITENESS = $00FF0062;
{ Binary Raster Operations }
R2_BLACK = 1;
R2_COPYPEN = 13;
R2_MASKNOTPEN = 3;
R2_MASKPEN = 9;
R2_MASKPENNOT = 5;
R2_MERGENOTPEN = 12;
R2_MERGEPEN = 15;
R2_MERGEPENNOT = 14;
R2_NOP = 11;
R2_NOT = 6;
R2_NOTCOPYPEN = 4;
R2_NOTMASKPEN = 8;
R2_NOTMERGEPEN = 2;
R2_NOTXORPEN = 10;
R2_WHITE = 16;
R2_XORPEN = 7;
{ BroadcastSystemMessage }
BSF_FLUSHDISK = 4;
BSF_FORCEIFHUNG = 32;
BSF_IGNORECURRENTTASK = 2;
BSF_NOHANG = 8;
BSF_POSTMESSAGE = 16;
BSF_QUERY = 1;
BSM_ALLCOMPONENTS = 0;
BSM_APPLICATIONS = 8;
BSM_INSTALLABLEDRIVERS = 4;
BSM_NETDRIVER = 2;
BSM_VXDS = 1;
BROADCAST_QUERY_DENY = 1112363332;
{ BrowseCallbackProc }
{ CallNamedPipe }
NMPWAIT_NOWAIT = 1;
NMPWAIT_WAIT_FOREVER = -(1);
NMPWAIT_USE_DEFAULT_WAIT = 0;
{ CascadeWindows, TileWindows }
MDITILE_SKIPDISABLED = 2;
MDITILE_HORIZONTAL = 1;
MDITILE_VERTICAL = 0;
{ CBTProc }
HCBT_ACTIVATE = 5;
HCBT_CLICKSKIPPED = 6;
HCBT_CREATEWND = 3;
HCBT_DESTROYWND = 4;
HCBT_KEYSKIPPED = 7;
HCBT_MINMAX = 1;
HCBT_MOVESIZE = 0;
HCBT_QS = 2;
HCBT_SETFOCUS = 9;
HCBT_SYSCOMMAND = 8;
{ ChangeDisplaySettings }
DM_BITSPERPEL = $40000;
DM_PELSWIDTH = $80000;
DM_PELSHEIGHT = $100000;
DM_DISPLAYFLAGS = $200000;
DM_DISPLAYFREQUENCY = $400000;
CDS_UPDATEREGISTRY = 1;
CDS_TEST = 2;
DISP_CHANGE_SUCCESSFUL = 0;
DISP_CHANGE_RESTART = 1;
DISP_CHANGE_BADFLAGS = -(4);
DISP_CHANGE_FAILED = -(1);
DISP_CHANGE_BADMODE = -(2);
DISP_CHANGE_NOTUPDATED = -(3);
{ ChangeServiceConfig }
SERVICE_NO_CHANGE = -(1);
SERVICE_WIN32_OWN_PROCESS = 16;
SERVICE_WIN32_SHARE_PROCESS = 32;
SERVICE_KERNEL_DRIVER = 1;
SERVICE_FILE_SYSTEM_DRIVER = 2;
SERVICE_INTERACTIVE_PROCESS = 256;
SERVICE_BOOT_START = 0;
SERVICE_SYSTEM_START = 1;
SERVICE_AUTO_START = 2;
SERVICE_DEMAND_START = 3;
SERVICE_DISABLED = 4;
{ SERVICE_STATUS structure }
SERVICE_STOPPED = 1;
SERVICE_START_PENDING = 2;
SERVICE_STOP_PENDING = 3;
SERVICE_RUNNING = 4;
SERVICE_CONTINUE_PENDING = 5;
SERVICE_PAUSE_PENDING = 6;
SERVICE_PAUSED = 7;
SERVICE_ACCEPT_STOP = 1;
SERVICE_ACCEPT_PAUSE_CONTINUE = 2;
SERVICE_ACCEPT_SHUTDOWN = 4;
{ CheckDlgButton }
BST_CHECKED = 1;
BST_INDETERMINATE = 2;
BST_UNCHECKED = 0;
BST_FOCUS = 8;
BST_PUSHED = 4;
{ CheckMenuItem, HiliteMenuItem }
MF_BYCOMMAND = 0;
MF_BYPOSITION = $400;
MF_CHECKED = $8;
MF_UNCHECKED = 0;
MF_HILITE = $80;
MF_UNHILITE = 0;
{ ChildWindowFromPointEx }
CWP_ALL = 0;
CWP_SKIPINVISIBLE = 1;
CWP_SKIPDISABLED = 2;
CWP_SKIPTRANSPARENT = 4;
{ ClearCommError }
CE_BREAK = 16;
CE_DNS = 2048;
CE_FRAME = 8;
CE_IOE = 1024;
CE_MODE = 32768;
CE_OOP = 4096;
CE_OVERRUN = 2;
CE_PTO = 512;
CE_RXOVER = 1;
CE_RXPARITY = 4;
CE_TXFULL = 256;
{ ChooseMatchToTarget }
{ CombineRgn }
RGN_AND = 1;
RGN_COPY = 5;
RGN_DIFF = 4;
RGN_OR = 2;
RGN_XOR = 3;
NULLREGION = 1;
SIMPLEREGION = 2;
COMPLEXREGION = 3;
ERROR = 0;
{ CommonDlgExtendedError }
CDERR_DIALOGFAILURE = $ffff;
CDERR_FINDRESFAILURE = 6;
CDERR_INITIALIZATION = 2;
CDERR_LOADRESFAILURE = 7;
CDERR_LOADSTRFAILURE = 5;
CDERR_LOCKRESFAILURE = 8;
CDERR_MEMALLOCFAILURE = 9;
CDERR_MEMLOCKFAILURE = 10;
CDERR_NOHINSTANCE = 4;
CDERR_NOHOOK = 11;
CDERR_NOTEMPLATE = 3;
CDERR_REGISTERMSGFAIL = 12;
CDERR_STRUCTSIZE = 1;
PDERR_CREATEICFAILURE = $1000 + 10;
PDERR_DEFAULTDIFFERENT = $1000 + 12;
PDERR_DNDMMISMATCH = $1000 + 9;
PDERR_GETDEVMODEFAIL = $1000 + 5;
PDERR_INITFAILURE = $1000 + 6;
PDERR_LOADDRVFAILURE = $1000 + 4;
PDERR_NODEFAULTPRN = $1000 + 8;
PDERR_NODEVICES = $1000 + 7;
PDERR_PARSEFAILURE = $1000 + 2;
PDERR_PRINTERNOTFOUND = $1000 + 11;
PDERR_RETDEFFAILURE = $1000 + 3;
PDERR_SETUPFAILURE = $1000 + 1;
CFERR_MAXLESSTHANMIN = $2000 + 2;
CFERR_NOFONTS = $2000 + 1;
FNERR_BUFFERTOOSMALL = $3000 + 3;
FNERR_INVALIDFILENAME = $3000 + 2;
FNERR_SUBCLASSFAILURE = $3000 + 1;
FRERR_BUFFERLENGTHZERO = $4000 + 1;
{ CompareString, LCMapString }
LOCALE_SYSTEM_DEFAULT = $800;
LOCALE_USER_DEFAULT = $400;
NORM_IGNORECASE = 1;
NORM_IGNOREKANATYPE = 65536;
NORM_IGNORENONSPACE = 2;
NORM_IGNORESYMBOLS = 4;
NORM_IGNOREWIDTH = 131072;
SORT_STRINGSORT = 4096;
LCMAP_BYTEREV = 2048;
LCMAP_FULLWIDTH = 8388608;
LCMAP_HALFWIDTH = 4194304;
LCMAP_HIRAGANA = 1048576;
LCMAP_KATAKANA = 2097152;
LCMAP_LOWERCASE = 256;
LCMAP_SORTKEY = 1024;
LCMAP_UPPERCASE = 512;
{ ContinueDebugEvent }
DBG_CONTINUE = $10002;
DBG_CONTROL_BREAK = $40010008;
DBG_CONTROL_C = $40010005;
DBG_EXCEPTION_NOT_HANDLED = $80010001;
DBG_TERMINATE_THREAD = $40010003;
DBG_TERMINATE_PROCESS = $40010004;
{ ControlService }
SERVICE_CONTROL_STOP = 1;
SERVICE_CONTROL_PAUSE = 2;
SERVICE_CONTROL_CONTINUE = 3;
SERVICE_CONTROL_INTERROGATE = 4;
SERVICE_CONTROL_SHUTDOWN = 5;
{ CopyImage, LoadImage }
IMAGE_BITMAP = 0;
IMAGE_CURSOR = 2;
IMAGE_ENHMETAFILE = 1;
IMAGE_ICON = 1;
LR_COPYDELETEORG = 8;
LR_COPYRETURNORG = 4;
LR_MONOCHROME = 1;
LR_CREATEDIBSECTION = 8192;
LR_DEFAULTSIZE = 64;
{ CreateDesktop }
DF_ALLOWOTHERACCOUNTHOOK = $1;
DESKTOP_CREATEMENU = $4;
DESKTOP_CREATEWINDOW = $2;
DESKTOP_ENUMERATE = $40;
DESKTOP_HOOKCONTROL = $8;
DESKTOP_JOURNALPLAYBACK = $20;
DESKTOP_JOURNALRECORD = $10;
DESKTOP_READOBJECTS = $1;
DESKTOP_SWITCHDESKTOP = $100;
DESKTOP_WRITEOBJECTS = $80;
WSF_VISIBLE = $1;
{ CreateDIBitmap }
CBM_INIT = $4;
DIB_PAL_COLORS = 1;
DIB_RGB_COLORS = 0;
{ CreateFile, GetFileAttributes, SetFileAttributes }
GENERIC_READ = $80000000;
GENERIC_WRITE = $40000000;
{ file & pipe }
FILE_READ_DATA = $0001;
{ directory }
FILE_LIST_DIRECTORY = $0001;
{ file & pipe }
FILE_WRITE_DATA = $0002;
{ directory }
FILE_ADD_FILE = $0002;
{ file }
FILE_APPEND_DATA = $0004;
{ directory }
FILE_ADD_SUBDIRECTORY = $0004;
{ named pipe }
FILE_CREATE_PIPE_INSTANCE = $0004;
{ file & directory }
FILE_READ_EA = $0008;
FILE_READ_PROPERTIES = FILE_READ_EA;
{ file & directory }
FILE_WRITE_EA = $0010;
FILE_WRITE_PROPERTIES = FILE_WRITE_EA;
{ file }
FILE_EXECUTE = $0020;
{ directory }
FILE_TRAVERSE = $0020;
{ directory }
FILE_DELETE_CHILD = $0040;
{ all }
FILE_READ_ATTRIBUTES = $0080;
{ all }
FILE_WRITE_ATTRIBUTES = $0100;
{ displaced lower
#define FILE_ALL_ACCESS (STANDARD_RIGHTS_REQUIRED | SYNCHRONIZE | 0x1FF)
#define FILE_GENERIC_READ (STANDARD_RIGHTS_READ |\
FILE_READ_DATA |\
FILE_READ_ATTRIBUTES |\
FILE_READ_EA |\
SYNCHRONIZE)
#define FILE_GENERIC_WRITE (STANDARD_RIGHTS_WRITE |\
FILE_WRITE_DATA |\
FILE_WRITE_ATTRIBUTES |\
FILE_WRITE_EA |\
FILE_APPEND_DATA |\
SYNCHRONIZE)
#define FILE_GENERIC_EXECUTE (STANDARD_RIGHTS_EXECUTE |\
FILE_READ_ATTRIBUTES |\
FILE_EXECUTE |\
SYNCHRONIZE)
}
FILE_SHARE_DELETE = 4;
FILE_SHARE_READ = 1;
FILE_SHARE_WRITE = 2;
CONSOLE_TEXTMODE_BUFFER = 1;
CREATE_NEW = 1;
CREATE_ALWAYS = 2;
OPEN_EXISTING = 3;
OPEN_ALWAYS = 4;
TRUNCATE_EXISTING = 5;
FILE_ATTRIBUTE_ARCHIVE = 32;
FILE_ATTRIBUTE_COMPRESSED = 2048;
FILE_ATTRIBUTE_NORMAL = 128;
FILE_ATTRIBUTE_DIRECTORY = 16;
FILE_ATTRIBUTE_HIDDEN = 2;
FILE_ATTRIBUTE_READONLY = 1;
FILE_ATTRIBUTE_SYSTEM = 4;
FILE_ATTRIBUTE_TEMPORARY = 256;
FILE_FLAG_WRITE_THROUGH = 2147483648;
FILE_FLAG_OVERLAPPED = 1073741824;
FILE_FLAG_NO_BUFFERING = 536870912;
FILE_FLAG_RANDOM_ACCESS = 268435456;
FILE_FLAG_SEQUENTIAL_SCAN = 134217728;
FILE_FLAG_DELETE_ON_CLOSE = 67108864;
FILE_FLAG_BACKUP_SEMANTICS = 33554432;
FILE_FLAG_POSIX_SEMANTICS = 16777216;
SECURITY_ANONYMOUS = 0;
SECURITY_IDENTIFICATION = 65536;
SECURITY_IMPERSONATION = 131072;
SECURITY_DELEGATION = 196608;
SECURITY_CONTEXT_TRACKING = 262144;
SECURITY_EFFECTIVE_ONLY = 524288;
SECURITY_SQOS_PRESENT = 1048576;
{ CreateFileMapping, VirtualAlloc, VirtualFree, VirtualProtect }
SEC_COMMIT = 134217728;
SEC_IMAGE = 16777216;
SEC_NOCACHE = 268435456;
SEC_RESERVE = 67108864;
PAGE_READONLY = 2;
PAGE_READWRITE = 4;
PAGE_WRITECOPY = 8;
PAGE_EXECUTE = 16;
PAGE_EXECUTE_READ = 32;
PAGE_EXECUTE_READWRITE = 64;
PAGE_EXECUTE_WRITECOPY = 128;
PAGE_GUARD = 256;
PAGE_NOACCESS = 1;
PAGE_NOCACHE = 512;
MEM_COMMIT = 4096;
MEM_FREE = 65536;
MEM_RESERVE = 8192;
MEM_IMAGE = 16777216;
MEM_MAPPED = 262144;
MEM_PRIVATE = 131072;
MEM_DECOMMIT = 16384;
MEM_RELEASE = 32768;
MEM_TOP_DOWN = 1048576;
EXCEPTION_GUARD_PAGE = $80000001;
SECTION_EXTEND_SIZE = $10;
SECTION_MAP_READ = $4;
SECTION_MAP_WRITE = $2;
SECTION_QUERY = $1;
SECTION_ALL_ACCESS = $f001f;
{ CreateFont }
FW_DONTCARE = 0;
FW_THIN = 100;
FW_EXTRALIGHT = 200;
FW_LIGHT = 300;
FW_NORMAL = 400;
FW_REGULAR = FW_NORMAL;
FW_MEDIUM = 500;
FW_SEMIBOLD = 600;
FW_BOLD = 700;
FW_EXTRABOLD = 800;
FW_HEAVY = 900;
ANSI_CHARSET = 0;
DEFAULT_CHARSET = 1;
SYMBOL_CHARSET = 2;
SHIFTJIS_CHARSET = 128;
HANGEUL_CHARSET = 129;
GB2312_CHARSET = 134;
CHINESEBIG5_CHARSET = 136;
GREEK_CHARSET = 161;
TURKISH_CHARSET = 162;
HEBREW_CHARSET = 177;
ARABIC_CHARSET = 178;
BALTIC_CHARSET = 186;
RUSSIAN_CHARSET = 204;
THAI_CHARSET = 222;
EASTEUROPE_CHARSET = 238;
OEM_CHARSET = 255;
OUT_DEFAULT_PRECIS = 0;
OUT_STRING_PRECIS = 1;
OUT_CHARACTER_PRECIS = 2;
OUT_STROKE_PRECIS = 3;
OUT_TT_PRECIS = 4;
OUT_DEVICE_PRECIS = 5;
OUT_RASTER_PRECIS = 6;
OUT_TT_ONLY_PRECIS = 7;
OUT_OUTLINE_PRECIS = 8;
CLIP_DEFAULT_PRECIS = 0;
CLIP_CHARACTER_PRECIS = 1;
CLIP_STROKE_PRECIS = 2;
CLIP_MASK = 15;
CLIP_LH_ANGLES = 16;
CLIP_TT_ALWAYS = 32;
CLIP_EMBEDDED = 128;
DEFAULT_QUALITY = 0;
DRAFT_QUALITY = 1;
PROOF_QUALITY = 2;
DEFAULT_PITCH = 0;
FIXED_PITCH = 1;
VARIABLE_PITCH = 2;
FF_DECORATIVE = 80;
FF_DONTCARE = 0;
FF_MODERN = 48;
FF_ROMAN = 16;
FF_SCRIPT = 64;
FF_SWISS = 32;
{ CreateHatchBrush }
HS_BDIAGONAL = 3;
HS_CROSS = 4;
HS_DIAGCROSS = 5;
HS_FDIAGONAL = 2;
HS_HORIZONTAL = 0;
HS_VERTICAL = 1;
{ CreateIconFromResourceEx }
LR_DEFAULTCOLOR = 0;
LR_LOADREALSIZE = 128;
{ already defined above !!
#define LR_MONOCHROME (1)
}
{ CreateMailslot, GetMailslotInfo }
MAILSLOT_WAIT_FOREVER = $ffffffff;
MAILSLOT_NO_MESSAGE = $ffffffff;
{ CreateMappedBitmap }
CMB_MASKED = 2;
{ CreateNamedPipe }
PIPE_ACCESS_DUPLEX = 3;
PIPE_ACCESS_INBOUND = 1;
PIPE_ACCESS_OUTBOUND = 2;
WRITE_DAC = $40000;
WRITE_OWNER = $80000;
ACCESS_SYSTEM_SECURITY = $1000000;
PIPE_TYPE_BYTE = 0;
PIPE_TYPE_MESSAGE = 4;
PIPE_READMODE_BYTE = 0;
PIPE_READMODE_MESSAGE = 2;
PIPE_WAIT = 0;
PIPE_NOWAIT = 1;
{ CreatePen, ExtCreatePen }
PS_GEOMETRIC = 65536;
PS_COSMETIC = 0;
PS_ALTERNATE = 8;
PS_SOLID = 0;
PS_DASH = 1;
PS_DOT = 2;
PS_DASHDOT = 3;
PS_DASHDOTDOT = 4;
PS_NULL = 5;
PS_USERSTYLE = 7;
PS_INSIDEFRAME = 6;
PS_ENDCAP_ROUND = 0;
PS_ENDCAP_SQUARE = 256;
PS_ENDCAP_FLAT = 512;
PS_JOIN_BEVEL = 4096;
PS_JOIN_MITER = 8192;
PS_JOIN_ROUND = 0;
PS_STYLE_MASK = 15;
PS_ENDCAP_MASK = 3840;
PS_TYPE_MASK = 983040;
{ CreatePolygonRgn }
ALTERNATE = 1;
WINDING = 2;
{ CreateProcess }
CREATE_DEFAULT_ERROR_MODE = 67108864;
CREATE_NEW_CONSOLE = 16;
CREATE_NEW_PROCESS_GROUP = 512;
CREATE_SEPARATE_WOW_VDM = 2048;
CREATE_SUSPENDED = 4;
CREATE_UNICODE_ENVIRONMENT = 1024;
DEBUG_PROCESS = 1;
DEBUG_ONLY_THIS_PROCESS = 2;
DETACHED_PROCESS = 8;
HIGH_PRIORITY_CLASS = 128;
IDLE_PRIORITY_CLASS = 64;
NORMAL_PRIORITY_CLASS = 32;
REALTIME_PRIORITY_CLASS = 256;
{ CreateService }
SERVICE_ALL_ACCESS = $f01ff;
SERVICE_CHANGE_CONFIG = 2;
SERVICE_ENUMERATE_DEPENDENTS = 8;
SERVICE_INTERROGATE = 128;
SERVICE_PAUSE_CONTINUE = 64;
SERVICE_QUERY_CONFIG = 1;
SERVICE_QUERY_STATUS = 4;
SERVICE_START = 16;
SERVICE_STOP = 32;
SERVICE_USER_DEFINED_CONTROL = 256;
DELETE = $10000;
READ_CONTROL = $20000;
GENERIC_EXECUTE = $20000000;
{ already defined above !!
#define SERVICE_WIN32_OWN_PROCESS (16)
#define SERVICE_WIN32_SHARE_PROCESS (32)
#define SERVICE_KERNEL_DRIVER (1)
#define SERVICE_FILE_SYSTEM_DRIVER (2)
#define SERVICE_INTERACTIVE_PROCESS (256)
#define SERVICE_BOOT_START (0)
#define SERVICE_SYSTEM_START (1)
#define SERVICE_AUTO_START (2)
#define SERVICE_DEMAND_START (3)
#define SERVICE_DISABLED (4)
}
SERVICE_ERROR_IGNORE = 0;
SERVICE_ERROR_NORMAL = 1;
SERVICE_ERROR_SEVERE = 2;
SERVICE_ERROR_CRITICAL = 3;
{ CreateTapePartition, WriteTapemark }
TAPE_FIXED_PARTITIONS = 0;
TAPE_INITIATOR_PARTITIONS = $2;
TAPE_SELECT_PARTITIONS = $1;
TAPE_FILEMARKS = $1;
TAPE_LONG_FILEMARKS = $3;
TAPE_SETMARKS = 0;
TAPE_SHORT_FILEMARKS = $2;
{ CreateWindow }
CW_USEDEFAULT = $80000000;
WS_BORDER = $800000;
WS_CAPTION = $c00000;
WS_CHILD = $40000000;
WS_CHILDWINDOW = $40000000;
WS_CLIPCHILDREN = $2000000;
WS_CLIPSIBLINGS = $4000000;
WS_DISABLED = $8000000;
WS_DLGFRAME = $400000;
WS_GROUP = $20000;
WS_HSCROLL = $100000;
WS_ICONIC = $20000000;
WS_MAXIMIZE = $1000000;
WS_MAXIMIZEBOX = $10000;
WS_MINIMIZE = $20000000;
WS_MINIMIZEBOX = $20000;
WS_OVERLAPPED = 0;
WS_OVERLAPPEDWINDOW = $cf0000;
WS_POPUP = $80000000;
WS_POPUPWINDOW = $80880000;
WS_SIZEBOX = $40000;
WS_SYSMENU = $80000;
WS_TABSTOP = $10000;
WS_THICKFRAME = $40000;
WS_TILED = 0;
WS_TILEDWINDOW = $cf0000;
WS_VISIBLE = $10000000;
WS_VSCROLL = $200000;
MDIS_ALLCHILDSTYLES = $1;
BS_3STATE = $5;
BS_AUTO3STATE = $6;
BS_AUTOCHECKBOX = $3;
BS_AUTORADIOBUTTON = $9;
BS_BITMAP = $80;
BS_BOTTOM = $800;
BS_CENTER = $300;
BS_CHECKBOX = $2;
BS_DEFPUSHBUTTON = $1;
BS_GROUPBOX = $7;
BS_ICON = $40;
BS_LEFT = $100;
BS_LEFTTEXT = $20;
BS_MULTILINE = $2000;
BS_NOTIFY = $4000;
BS_OWNERDRAW = $b;
BS_PUSHBUTTON = 0;
BS_PUSHLIKE = $1000;
BS_RADIOBUTTON = $4;
BS_RIGHT = $200;
BS_RIGHTBUTTON = $20;
BS_TEXT = 0;
BS_TOP = $400;
BS_USERBUTTON = $8;
BS_VCENTER = $c00;
CBS_AUTOHSCROLL = $40;
CBS_DISABLENOSCROLL = $800;
CBS_DROPDOWN = $2;
CBS_DROPDOWNLIST = $3;
CBS_HASSTRINGS = $200;
CBS_LOWERCASE = $4000;
CBS_NOINTEGRALHEIGHT = $400;
CBS_OEMCONVERT = $80;
CBS_OWNERDRAWFIXED = $10;
CBS_OWNERDRAWVARIABLE = $20;
CBS_SIMPLE = $1;
CBS_SORT = $100;
CBS_UPPERCASE = $2000;
ES_AUTOHSCROLL = $80;
ES_AUTOVSCROLL = $40;
ES_CENTER = $1;
ES_LEFT = 0;
ES_LOWERCASE = $10;
ES_MULTILINE = $4;
ES_NOHIDESEL = $100;
ES_NUMBER = $2000;
ES_OEMCONVERT = $400;
ES_PASSWORD = $20;
ES_READONLY = $800;
ES_RIGHT = $2;
ES_UPPERCASE = $8;
ES_WANTRETURN = $1000;
LBS_DISABLENOSCROLL = $1000;
LBS_EXTENDEDSEL = $800;
LBS_HASSTRINGS = $40;
LBS_MULTICOLUMN = $200;
LBS_MULTIPLESEL = $8;
LBS_NODATA = $2000;
LBS_NOINTEGRALHEIGHT = $100;
LBS_NOREDRAW = $4;
LBS_NOSEL = $4000;
LBS_NOTIFY = $1;
LBS_OWNERDRAWFIXED = $10;
LBS_OWNERDRAWVARIABLE = $20;
LBS_SORT = $2;
LBS_STANDARD = $a00003;
LBS_USETABSTOPS = $80;
LBS_WANTKEYBOARDINPUT = $400;
SBS_BOTTOMALIGN = $4;
SBS_HORZ = 0;
SBS_LEFTALIGN = $2;
SBS_RIGHTALIGN = $4;
SBS_SIZEBOX = $8;
SBS_SIZEBOXBOTTOMRIGHTALIGN = $4;
SBS_SIZEBOXTOPLEFTALIGN = $2;
SBS_SIZEGRIP = $10;
SBS_TOPALIGN = $2;
SBS_VERT = $1;
SS_BITMAP = $e;
SS_BLACKFRAME = $7;
SS_BLACKRECT = $4;
SS_CENTER = $1;
SS_CENTERIMAGE = $200;
SS_ENHMETAFILE = $f;
SS_ETCHEDFRAME = $12;
SS_ETCHEDHORZ = $10;
SS_ETCHEDVERT = $11;
SS_GRAYFRAME = $8;
SS_GRAYRECT = $5;
SS_ICON = $3;
SS_LEFT = 0;
SS_LEFTNOWORDWRAP = $c;
SS_NOPREFIX = $80;
SS_NOTIFY = $100;
SS_OWNERDRAW = $d;
SS_REALSIZEIMAGE = $800;
SS_RIGHT = $2;
SS_RIGHTJUST = $400;
SS_SIMPLE = $b;
SS_SUNKEN = $1000;
SS_USERITEM = $a;
SS_WHITEFRAME = $9;
SS_WHITERECT = $6;
DS_3DLOOK = $4;
DS_ABSALIGN = $1;
DS_CENTER = $800;
DS_CENTERMOUSE = $1000;
DS_CONTEXTHELP = $2000;
DS_CONTROL = $400;
DS_FIXEDSYS = $8;
DS_LOCALEDIT = $20;
DS_MODALFRAME = $80;
DS_NOFAILCREATE = $10;
DS_NOIDLEMSG = $100;
DS_SETFONT = $40;
DS_SETFOREGROUND = $200;
DS_SYSMODAL = $2;
{ CreateWindowEx }
WS_EX_ACCEPTFILES = $10;
WS_EX_APPWINDOW = $40000;
WS_EX_CLIENTEDGE = $200;
WS_EX_CONTEXTHELP = $400;
WS_EX_CONTROLPARENT = $10000;
WS_EX_DLGMODALFRAME = $1;
WS_EX_LEFT = 0;
WS_EX_LEFTSCROLLBAR = $4000;
WS_EX_LTRREADING = 0;
WS_EX_MDICHILD = $40;
WS_EX_NOPARENTNOTIFY = $4;
WS_EX_OVERLAPPEDWINDOW = $300;
WS_EX_PALETTEWINDOW = $188;
WS_EX_RIGHT = $1000;
WS_EX_RIGHTSCROLLBAR = 0;
WS_EX_RTLREADING = $2000;
WS_EX_STATICEDGE = $20000;
WS_EX_TOOLWINDOW = $80;
WS_EX_TOPMOST = $8;
WS_EX_TRANSPARENT = $20;
WS_EX_WINDOWEDGE = $100;
{ CreateWindowStation }
WINSTA_ACCESSCLIPBOARD = $4;
WINSTA_ACCESSGLOBALATOMS = $20;
WINSTA_CREATEDESKTOP = $8;
WINSTA_ENUMDESKTOPS = $1;
WINSTA_ENUMERATE = $100;
WINSTA_EXITWINDOWS = $40;
WINSTA_READATTRIBUTES = $2;
WINSTA_READSCREEN = $200;
WINSTA_WRITEATTRIBUTES = $10;
{ DdeCallback }
{ DdeClientTransaction }
{ DdeEnableCallback }
{ DdeGetLastError }
{ DdeInitialize }
{ DdeNameService }
{ DebugProc }
WH_CALLWNDPROC = 4;
WH_CALLWNDPROCRET = 12;
WH_CBT = 5;
WH_DEBUG = 9;
WH_GETMESSAGE = 3;
WH_JOURNALPLAYBACK = 1;
WH_JOURNALRECORD = 0;
WH_KEYBOARD = 2;
WH_MOUSE = 7;
WH_MSGFILTER = -(1);
WH_SHELL = 10;
WH_SYSMSGFILTER = 6;
{ already defined above !!
#define WH_MSGFILTER (-1) }
WH_FOREGROUNDIDLE = 11;
{ DefineDosDevice }
DDD_RAW_TARGET_PATH = 1;
DDD_REMOVE_DEFINITION = 2;
DDD_EXACT_MATCH_ON_REMOVE = 4;
{ DeviceCapbilities }
DC_BINNAMES = 12;
DC_BINS = 6;
DC_COPIES = 18;
DC_DRIVER = 11;
DC_DATATYPE_PRODUCED = 21;
DC_DUPLEX = 7;
DC_EMF_COMPLIANT = 20;
DC_ENUMRESOLUTIONS = 13;
DC_EXTRA = 9;
DC_FIELDS = 1;
DC_FILEDEPENDENCIES = 14;
DC_MAXEXTENT = 5;
DC_MINEXTENT = 4;
DC_ORIENTATION = 17;
DC_PAPERNAMES = 16;
DC_PAPERS = 2;
DC_PAPERSIZE = 3;
DC_SIZE = 8;
DC_TRUETYPE = 15;
DCTT_BITMAP = $1;
DCTT_DOWNLOAD = $2;
DCTT_SUBDEV = $4;
DC_VERSION = 10;
DC_BINADJUST = 19;
{ already defined above !!
#define DC_DATATYPE_PRODUCED (21)
}
{ DeviceIoControl }
{ DlgDirList }
DDL_ARCHIVE = 32;
DDL_DIRECTORY = 16;
DDL_DRIVES = 16384;
DDL_EXCLUSIVE = 32768;
DDL_HIDDEN = 2;
DDL_READONLY = 1;
DDL_READWRITE = 0;
DDL_SYSTEM = 4;
DDL_POSTMSGS = 8192;
{ DllEntryPoint }
DLL_PROCESS_ATTACH = 1;
DLL_THREAD_ATTACH = 2;
DLL_PROCESS_DETACH = 0;
DLL_THREAD_DETACH = 3;
{ DocumentProperties }
DM_IN_BUFFER = 8;
DM_MODIFY = 8;
DM_IN_PROMPT = 4;
DM_PROMPT = 4;
DM_OUT_BUFFER = 2;
DM_COPY = 2;
DM_UPDATE = 1;
{ DrawAnimatedRects }
IDANI_OPEN = 1;
IDANI_CLOSE = 2;
{ DrawCaption }
DC_ACTIVE = 1;
DC_SMALLCAP = 2;
{ DrawEdge }
BDR_RAISEDINNER = 4;
BDR_SUNKENINNER = 8;
BDR_RAISEDOUTER = 1;
BDR_SUNKENOUTER = 1;
EDGE_BUMP = 9;
EDGE_ETCHED = 6;
EDGE_RAISED = 5;
EDGE_SUNKEN = 10;
BF_ADJUST = 8192;
BF_BOTTOM = 8;
BF_BOTTOMLEFT = 9;
BF_BOTTOMRIGHT = 12;
BF_DIAGONAL = 16;
BF_DIAGONAL_ENDBOTTOMLEFT = 25;
BF_DIAGONAL_ENDBOTTOMRIGHT = 28;
BF_DIAGONAL_ENDTOPLEFT = 19;
BF_DIAGONAL_ENDTOPRIGHT = 22;
BF_FLAT = 16384;
BF_LEFT = 1;
BF_MIDDLE = 2048;
BF_MONO = 32768;
BF_RECT = 15;
BF_RIGHT = 4;
BF_SOFT = 4096;
BF_TOP = 2;
BF_TOPLEFT = 3;
BF_TOPRIGHT = 6;
{ DrawFrameControl }
DFC_BUTTON = 4;
DFC_CAPTION = 1;
DFC_MENU = 2;
DFC_SCROLL = 3;
DFCS_BUTTON3STATE = 8;
DFCS_BUTTONCHECK = 0;
DFCS_BUTTONPUSH = 16;
DFCS_BUTTONRADIO = 4;
DFCS_BUTTONRADIOIMAGE = 1;
DFCS_BUTTONRADIOMASK = 2;
DFCS_CAPTIONCLOSE = 0;
DFCS_CAPTIONHELP = 4;
DFCS_CAPTIONMAX = 2;
DFCS_CAPTIONMIN = 1;
DFCS_CAPTIONRESTORE = 3;
DFCS_MENUARROW = 0;
DFCS_MENUBULLET = 2;
DFCS_MENUCHECK = 1;
DFCS_SCROLLCOMBOBOX = 5;
DFCS_SCROLLDOWN = 1;
DFCS_SCROLLLEFT = 2;
DFCS_SCROLLRIGHT = 3;
DFCS_SCROLLSIZEGRIP = 8;
DFCS_SCROLLUP = 0;
DFCS_ADJUSTRECT = 8192;
DFCS_CHECKED = 1024;
DFCS_FLAT = 16384;
DFCS_INACTIVE = 256;
DFCS_MONO = 32768;
DFCS_PUSHED = 512;
{ DrawIconEx }
DI_COMPAT = 4;
DI_DEFAULTSIZE = 8;
DI_IMAGE = 2;
DI_MASK = 1;
DI_NORMAL = 3;
{ DrawState }
DST_BITMAP = 4;
DST_COMPLEX = 0;
DST_ICON = 3;
DST_PREFIXTEXT = 2;
DST_TEXT = 1;
DSS_NORMAL = 0;
DSS_UNION = 16;
DSS_DISABLED = 32;
DSS_MONO = 128;
{ DrawStatusText }
SBT_NOBORDERS = 256;
SBT_OWNERDRAW = 4096;
SBT_POPOUT = 512;
SBT_RTLREADING = 1024;
{ DrawText, DrawTextEx }
DT_BOTTOM = 8;
DT_CALCRECT = 1024;
DT_CENTER = 1;
DT_EDITCONTROL = 8192;
DT_END_ELLIPSIS = 32768;
DT_PATH_ELLIPSIS = 16384;
DT_EXPANDTABS = 64;
DT_EXTERNALLEADING = 512;
DT_LEFT = 0;
DT_MODIFYSTRING = 65536;
DT_NOCLIP = 256;
DT_NOPREFIX = 2048;
DT_RIGHT = 2;
DT_RTLREADING = 131072;
DT_SINGLELINE = 32;
DT_TABSTOP = 128;
DT_TOP = 0;
DT_VCENTER = 4;
DT_WORDBREAK = 16;
DT_INTERNAL = 4096;
{ DuplicateHandle, MapViewOfFile }
DUPLICATE_CLOSE_SOURCE = 1;
DUPLICATE_SAME_ACCESS = 2;
FILE_MAP_ALL_ACCESS = $f001f;
FILE_MAP_READ = 4;
FILE_MAP_WRITE = 2;
FILE_MAP_COPY = 1;
MUTEX_ALL_ACCESS = $1f0001;
MUTEX_MODIFY_STATE = 1;
SYNCHRONIZE = $100000;
SEMAPHORE_ALL_ACCESS = $1f0003;
SEMAPHORE_MODIFY_STATE = 2;
EVENT_ALL_ACCESS = $1f0003;
EVENT_MODIFY_STATE = 2;
KEY_ALL_ACCESS = $f003f;
KEY_CREATE_LINK = 32;
KEY_CREATE_SUB_KEY = 4;
KEY_ENUMERATE_SUB_KEYS = 8;
KEY_EXECUTE = $20019;
KEY_NOTIFY = 16;
KEY_QUERY_VALUE = 1;
KEY_READ = $20019;
KEY_SET_VALUE = 2;
KEY_WRITE = $20006;
PROCESS_ALL_ACCESS = $1f0fff;
PROCESS_CREATE_PROCESS = 128;
PROCESS_CREATE_THREAD = 2;
PROCESS_DUP_HANDLE = 64;
PROCESS_QUERY_INFORMATION = 1024;
PROCESS_SET_INFORMATION = 512;
PROCESS_TERMINATE = 1;
PROCESS_VM_OPERATION = 8;
PROCESS_VM_READ = 16;
PROCESS_VM_WRITE = 32;
THREAD_ALL_ACCESS = $1f03ff;
THREAD_DIRECT_IMPERSONATION = 512;
THREAD_GET_CONTEXT = 8;
THREAD_IMPERSONATE = 256;
THREAD_QUERY_INFORMATION = 64;
THREAD_SET_CONTEXT = 16;
THREAD_SET_INFORMATION = 32;
THREAD_SET_THREAD_TOKEN = 128;
THREAD_SUSPEND_RESUME = 2;
THREAD_TERMINATE = 1;
{ EditWordBreakProc }
WB_ISDELIMITER = 2;
WB_LEFT = 0;
WB_RIGHT = 1;
{ EnableScrollBar }
SB_BOTH = 3;
SB_CTL = 2;
SB_HORZ = 0;
SB_VERT = 1;
ESB_DISABLE_BOTH = 3;
ESB_DISABLE_DOWN = 2;
ESB_DISABLE_LEFT = 1;
ESB_DISABLE_LTUP = 1;
ESB_DISABLE_RIGHT = 2;
ESB_DISABLE_RTDN = 2;
ESB_DISABLE_UP = 1;
ESB_ENABLE_BOTH = 0;
{ Scroll Bar notifications }
SB_LINEUP = 0;
SB_LINEDOWN = 1;
SB_LINELEFT = 0;
SB_LINERIGHT = 1;
SB_PAGEUP = 2;
SB_PAGEDOWN = 3;
SB_PAGELEFT = 2;
SB_PAGERIGHT = 3;
SB_THUMBPOSITION = 4;
SB_THUMBTRACK = 5;
SB_ENDSCROLL = 8;
SB_LEFT = 6;
SB_RIGHT = 7;
SB_BOTTOM = 7;
SB_TOP = 6;
{ EnumCalendarInfo }
ENUM_ALL_CALENDARS = -(1);
{ EnumDateFormats }
DATE_SHORTDATE = 1;
DATE_LONGDATE = 2;
{ EnumDependentServices }
SERVICE_ACTIVE = 1;
SERVICE_INACTIVE = 2;
{ EnumFontFamExProc }
DEVICE_FONTTYPE = 2;
RASTER_FONTTYPE = 1;
TRUETYPE_FONTTYPE = 4;
{ EnumObjects, GetCurrentObject, GetObjectType }
OBJ_BRUSH = 2;
OBJ_PEN = 1;
OBJ_PAL = 5;
OBJ_FONT = 6;
OBJ_BITMAP = 7;
OBJ_EXTPEN = 11;
OBJ_REGION = 8;
OBJ_DC = 3;
OBJ_MEMDC = 10;
OBJ_METAFILE = 9;
OBJ_METADC = 4;
OBJ_ENHMETAFILE = 13;
OBJ_ENHMETADC = 12;
{ EnumPrinters }
{ EnumProtocols }
{ EnumResLangProc }
{ was #define dname def_expr }
function RT_ACCELERATOR : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_BITMAP : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_DIALOG : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_FONT : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_FONTDIR : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_MENU : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_RCDATA : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_STRING : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_MESSAGETABLE : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_CURSOR : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_GROUP_CURSOR : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_ICON : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_GROUP_ICON : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function RT_VERSION : LPTSTR;
{ return type might be wrong }
{ EnumServicesStatus }
const
SERVICE_WIN32 = 48;
SERVICE_DRIVER = 11;
{ EnumSystemCodePages }
CP_INSTALLED = 1;
CP_SUPPORTED = 2;
{ EnumSystemLocales }
LCID_INSTALLED = 1;
LCID_SUPPORTED = 2;
{ EraseTape }
TAPE_ERASE_LONG = $1;
TAPE_ERASE_SHORT = 0;
{ Escape }
SP_ERROR = -(1);
SP_OUTOFDISK = -(4);
SP_OUTOFMEMORY = -(5);
SP_USERABORT = -(3);
PHYSICALWIDTH = 110;
PHYSICALHEIGHT = 111;
PHYSICALOFFSETX = 112;
PHYSICALOFFSETY = 113;
SCALINGFACTORX = 114;
SCALINGFACTORY = 115;
QUERYESCSUPPORT = 8;
{ABORTDOC = 2; conflicts with AbortDoc function }
cABORTDOC = 2;
{ENDDOC = 11; conflicts with AbortDoc function }
cENDDOC = 11;
GETPHYSPAGESIZE = 12;
GETPRINTINGOFFSET = 13;
GETSCALINGFACTOR = 14;
NEWFRAME = 1;
NEXTBAND = 3;
PASSTHROUGH = 19;
{SETABORTPROC = 9; conflicts with AbortDoc function }
cSETABORTPROC = 9;
{STARTDOC = 10; conflicts with AbortDoc function }
cSTARTDOC = 10;
{ EscapeCommFunction }
CLRDTR = 6;
CLRRTS = 4;
SETDTR = 5;
SETRTS = 3;
SETXOFF = 1;
SETXON = 2;
SETBREAK = 8;
CLRBREAK = 9;
{ ExitWindowsEx }
EWX_FORCE = 4;
EWX_LOGOFF = 0;
EWX_POWEROFF = 8;
EWX_REBOOT = 2;
EWX_SHUTDOWN = 1;
{ ExtFloodFill }
FLOODFILLBORDER = 0;
FLOODFILLSURFACE = 1;
{ ExtTextOut }
ETO_CLIPPED = 4;
ETO_GLYPH_INDEX = 16;
ETO_OPAQUE = 2;
ETO_RTLREADING = 128;
{ FillConsoleOutputAttribute }
FOREGROUND_BLUE = 1;
FOREGROUND_GREEN = 2;
FOREGROUND_RED = 4;
FOREGROUND_INTENSITY = 8;
BACKGROUND_BLUE = 16;
BACKGROUND_GREEN = 32;
BACKGROUND_RED = 64;
BACKGROUND_INTENSITY = 128;
{ FindFirstChangeNotification }
FILE_NOTIFY_CHANGE_FILE_NAME = 1;
FILE_NOTIFY_CHANGE_DIR_NAME = 2;
FILE_NOTIFY_CHANGE_ATTRIBUTES = 4;
FILE_NOTIFY_CHANGE_SIZE = 8;
FILE_NOTIFY_CHANGE_LAST_WRITE = 16;
FILE_NOTIFY_CHANGE_SECURITY = 256;
{ FindFirstPrinterChangeNotification }
{ FindNextPrinterNotification }
{ FMExtensionProc }
{ FoldString }
MAP_FOLDCZONE = 16;
MAP_FOLDDIGITS = 128;
MAP_PRECOMPOSED = 32;
MAP_COMPOSITE = 64;
{ ForegroundIdleProc }
HC_ACTION = 0;
{ FormatMessage }
FORMAT_MESSAGE_ALLOCATE_BUFFER = 256;
FORMAT_MESSAGE_IGNORE_INSERTS = 512;
FORMAT_MESSAGE_FROM_STRING = 1024;
FORMAT_MESSAGE_FROM_HMODULE = 2048;
FORMAT_MESSAGE_FROM_SYSTEM = 4096;
FORMAT_MESSAGE_ARGUMENT_ARRAY = 8192;
FORMAT_MESSAGE_MAX_WIDTH_MASK = 255;
{ GdiComment }
GDICOMMENT_WINDOWS_METAFILE = -(2147483647);
GDICOMMENT_BEGINGROUP = 2;
GDICOMMENT_ENDGROUP = 3;
GDICOMMENT_MULTIFORMATS = 1073741828;
GDICOMMENT_IDENTIFIER = 1128875079;
{ GenerateConsoleCtrlEvent, HandlerRoutine }
CTRL_C_EVENT = 0;
CTRL_BREAK_EVENT = 1;
CTRL_CLOSE_EVENT = 2;
CTRL_LOGOFF_EVENT = 5;
CTRL_SHUTDOWN_EVENT = 6;
{ GetAddressByName }
{ GetArcDirection }
AD_COUNTERCLOCKWISE = 1;
AD_CLOCKWISE = 2;
{ GetBinaryTypes }
SCS_32BIT_BINARY = 0;
SCS_DOS_BINARY = 1;
SCS_OS216_BINARY = 5;
SCS_PIF_BINARY = 3;
SCS_POSIX_BINARY = 4;
SCS_WOW_BINARY = 2;
{ GetBoundsRect, SetBoundsRect }
DCB_DISABLE = 8;
DCB_ENABLE = 4;
DCB_RESET = 1;
DCB_SET = 3;
DCB_ACCUMULATE = 2;
{ GetCharacterPlacement, GetFontLanguageInfo }
GCP_DBCS = 1;
GCP_ERROR = $8000;
GCP_CLASSIN = $80000;
GCP_DIACRITIC = 256;
GCP_DISPLAYZWG = $400000;
GCP_GLYPHSHAPE = 16;
GCP_JUSTIFY = $10000;
GCP_JUSTIFYIN = $200000;
GCP_KASHIDA = 1024;
GCP_LIGATE = 32;
GCP_MAXEXTENT = $100000;
GCP_NEUTRALOVERRIDE = $2000000;
GCP_NUMERICOVERRIDE = $1000000;
GCP_NUMERICSLATIN = $4000000;
GCP_NUMERICSLOCAL = $8000000;
GCP_REORDER = 2;
GCP_SYMSWAPOFF = $800000;
GCP_USEKERNING = 8;
FLI_GLYPHS = $40000;
FLI_MASK = $103b;
{ GetClassLong, GetClassWord }
GCW_ATOM = -(32);
GCL_CBCLSEXTRA = -(20);
GCL_CBWNDEXTRA = -(18);
GCL_HBRBACKGROUND = -(10);
GCL_HCURSOR = -(12);
GCL_HICON = -(14);
GCL_HICONSM = -(34);
GCL_HMODULE = -(16);
GCL_MENUNAME = -(8);
GCL_STYLE = -(26);
GCL_WNDPROC = -(24);
{ GetClipboardFormat, SetClipboardData }
CF_BITMAP = 2;
CF_DIB = 8;
CF_PALETTE = 9;
CF_ENHMETAFILE = 14;
CF_METAFILEPICT = 3;
CF_OEMTEXT = 7;
CF_TEXT = 1;
CF_UNICODETEXT = 13;
CF_DIF = 5;
CF_DSPBITMAP = 130;
CF_DSPENHMETAFILE = 142;
CF_DSPMETAFILEPICT = 131;
CF_DSPTEXT = 129;
CF_GDIOBJFIRST = 768;
CF_GDIOBJLAST = 1023;
CF_HDROP = 15;
CF_LOCALE = 16;
CF_OWNERDISPLAY = 128;
CF_PENDATA = 10;
CF_PRIVATEFIRST = 512;
CF_PRIVATELAST = 767;
CF_RIFF = 11;
CF_SYLK = 4;
CF_WAVE = 12;
CF_TIFF = 6;
{ GetCommMask }
EV_BREAK = 64;
EV_CTS = 8;
EV_DSR = 16;
EV_ERR = 128;
EV_EVENT1 = 2048;
EV_EVENT2 = 4096;
EV_PERR = 512;
EV_RING = 256;
EV_RLSD = 32;
EV_RX80FULL = 1024;
EV_RXCHAR = 1;
EV_RXFLAG = 2;
EV_TXEMPTY = 4;
{ GetCommModemStatus }
MS_CTS_ON = $10;
MS_DSR_ON = $20;
MS_RING_ON = $40;
MS_RLSD_ON = $80;
{ GetComputerName }
MAX_COMPUTERNAME_LENGTH = 15;
{ GetConsoleMode }
ENABLE_LINE_INPUT = 2;
ENABLE_ECHO_INPUT = 4;
ENABLE_PROCESSED_INPUT = 1;
ENABLE_WINDOW_INPUT = 8;
ENABLE_MOUSE_INPUT = 16;
ENABLE_PROCESSED_OUTPUT = 1;
ENABLE_WRAP_AT_EOL_OUTPUT = 2;
{ GetCPInfo }
CP_ACP = 0;
CP_MACCP = 2;
CP_OEMCP = 1;
{ GetDateFormat }
{ already defined above !!
#define DATE_SHORTDATE (1)
#define DATE_LONGDATE (2)
}
DATE_USE_ALT_CALENDAR = 4;
{ GetDCEx }
DCX_WINDOW = $1;
DCX_CACHE = $2;
DCX_PARENTCLIP = $20;
DCX_CLIPSIBLINGS = $10;
DCX_CLIPCHILDREN = $8;
DCX_NORESETATTRS = $4;
DCX_LOCKWINDOWUPDATE = $400;
DCX_EXCLUDERGN = $40;
DCX_INTERSECTRGN = $80;
DCX_VALIDATE = $200000;
{ GetDeviceCaps }
DRIVERVERSION = 0;
TECHNOLOGY = 2;
DT_PLOTTER = 0;
DT_RASDISPLAY = 1;
DT_RASPRINTER = 2;
DT_RASCAMERA = 3;
DT_CHARSTREAM = 4;
DT_METAFILE = 5;
DT_DISPFILE = 6;
HORZSIZE = 4;
VERTSIZE = 6;
HORZRES = 8;
VERTRES = 10;
LOGPIXELSX = 88;
LOGPIXELSY = 90;
BITSPIXEL = 12;
PLANES = 14;
NUMBRUSHES = 16;
NUMPENS = 18;
NUMFONTS = 22;
NUMCOLORS = 24;
ASPECTX = 40;
ASPECTY = 42;
ASPECTXY = 44;
PDEVICESIZE = 26;
CLIPCAPS = 36;
SIZEPALETTE = 104;
NUMRESERVED = 106;
COLORRES = 108;
{ already defined above !!
#define PHYSICALWIDTH (110)
#define PHYSICALHEIGHT (111)
#define PHYSICALOFFSETX (112)
#define PHYSICALOFFSETY (113)
#define SCALINGFACTORX (114)
#define SCALINGFACTORY (115)
}
VREFRESH = 116;
DESKTOPHORZRES = 118;
DESKTOPVERTRES = 117;
BLTALIGNMENT = 119;
RASTERCAPS = 38;
RC_BANDING = 2;
RC_BITBLT = 1;
RC_BITMAP64 = 8;
RC_DI_BITMAP = 128;
RC_DIBTODEV = 512;
RC_FLOODFILL = 4096;
RC_GDI20_OUTPUT = 16;
RC_PALETTE = 256;
RC_SCALING = 4;
RC_STRETCHBLT = 2048;
RC_STRETCHDIB = 8192;
CURVECAPS = 28;
CC_NONE = 0;
CC_CIRCLES = 1;
CC_PIE = 2;
CC_CHORD = 4;
CC_ELLIPSES = 8;
CC_WIDE = 16;
CC_STYLED = 32;
CC_WIDESTYLED = 64;
CC_INTERIORS = 128;
CC_ROUNDRECT = 256;
LINECAPS = 30;
LC_NONE = 0;
LC_POLYLINE = 2;
LC_MARKER = 4;
LC_POLYMARKER = 8;
LC_WIDE = 16;
LC_STYLED = 32;
LC_WIDESTYLED = 64;
LC_INTERIORS = 128;
POLYGONALCAPS = 32;
PC_NONE = 0;
PC_POLYGON = 1;
PC_RECTANGLE = 2;
PC_WINDPOLYGON = 4;
PC_SCANLINE = 8;
PC_WIDE = 16;
PC_STYLED = 32;
PC_WIDESTYLED = 64;
PC_INTERIORS = 128;
TEXTCAPS = 34;
TC_OP_CHARACTER = 1;
TC_OP_STROKE = 2;
TC_CP_STROKE = 4;
TC_CR_90 = 8;
TC_CR_ANY = 16;
TC_SF_X_YINDEP = 32;
TC_SA_DOUBLE = 64;
TC_SA_INTEGER = 128;
TC_SA_CONTIN = 256;
TC_EA_DOUBLE = 512;
TC_IA_ABLE = 1024;
TC_UA_ABLE = 2048;
TC_SO_ABLE = 4096;
TC_RA_ABLE = 8192;
TC_VA_ABLE = 16384;
TC_RESERVED = 32768;
TC_SCROLLBLT = 65536;
PC_PATHS = 512;
{ GetDriveType }
DRIVE_REMOVABLE = 2;
DRIVE_FIXED = 3;
DRIVE_REMOTE = 4;
DRIVE_CDROM = 5;
DRIVE_RAMDISK = 6;
DRIVE_UNKNOWN = 0;
DRIVE_NO_ROOT_DIR = 1;
{ GetExceptionCode }
EXCEPTION_ACCESS_VIOLATION = $c0000005;
EXCEPTION_BREAKPOINT = $80000003;
EXCEPTION_DATATYPE_MISALIGNMENT = $80000002;
EXCEPTION_SINGLE_STEP = $80000004;
EXCEPTION_ARRAY_BOUNDS_EXCEEDED = $c000008c;
EXCEPTION_FLT_DENORMAL_OPERAND = $c000008d;
EXCEPTION_FLT_DIVIDE_BY_ZERO = $c000008e;
EXCEPTION_FLT_INEXACT_RESULT = $c000008f;
EXCEPTION_FLT_INVALID_OPERATION = $c0000090;
EXCEPTION_FLT_OVERFLOW = $c0000091;
EXCEPTION_FLT_STACK_CHECK = $c0000092;
EXCEPTION_FLT_UNDERFLOW = $c0000093;
EXCEPTION_INT_DIVIDE_BY_ZERO = $c0000094;
EXCEPTION_INT_OVERFLOW = $c0000095;
EXCEPTION_INVALID_HANDLE = $c0000008;
EXCEPTION_PRIV_INSTRUCTION = $c0000096;
EXCEPTION_NONCONTINUABLE_EXCEPTION = $c0000025;
EXCEPTION_NONCONTINUABLE = $1;
EXCEPTION_STACK_OVERFLOW = $c00000fd;
EXCEPTION_INVALID_DISPOSITION = $c0000026;
{ GetFileType }
FILE_TYPE_UNKNOWN = 0;
FILE_TYPE_DISK = 1;
FILE_TYPE_CHAR = 2;
FILE_TYPE_PIPE = 3;
{ GetGlyphOutline }
GGO_BITMAP = 1;
GGO_NATIVE = 2;
GGO_METRICS = 0;
GGO_GRAY2_BITMAP = 4;
GGO_GRAY4_BITMAP = 5;
GGO_GRAY8_BITMAP = 6;
GDI_ERROR = $ffffffff;
{ GetGraphicsMode }
GM_COMPATIBLE = 1;
GM_ADVANCED = 2;
{ GetHandleInformation }
HANDLE_FLAG_INHERIT = 1;
HANDLE_FLAG_PROTECT_FROM_CLOSE = 2;
{ GetIconInfo }
{ was #define dname def_expr }
function IDC_ARROW : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_IBEAM : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_WAIT : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_CROSS : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_UPARROW : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_SIZENWSE : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_SIZENESW : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_SIZEWE : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_SIZENS : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_SIZEALL : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_NO : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_APPSTARTING : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_HELP : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDI_APPLICATION : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDI_HAND : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDI_QUESTION : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDI_EXCLAMATION : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDI_ASTERISK : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDI_WINLOGO : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_SIZE : LPTSTR;
{ return type might be wrong }
{ was #define dname def_expr }
function IDC_ICON : LPTSTR;
{ return type might be wrong }
{ GetMapMode }
const
MM_ANISOTROPIC = 8;
MM_HIENGLISH = 5;
MM_HIMETRIC = 3;
MM_ISOTROPIC = 7;
MM_LOENGLISH = 4;
MM_LOMETRIC = 2;
MM_TEXT = 1;
MM_TWIPS = 6;
{ GetMenuDefaultItem }
GMDI_GOINTOPOPUPS = $2;
GMDI_USEDISABLED = $1;
{ PeekMessage }
PM_NOREMOVE = 0;
PM_REMOVE = 1;
PM_NOYIELD = 2;
{ GetNamedPipeHandleState }
{ PIPE_NOWAIT = 1; already above }
{ PIPE_READMODE_MESSAGE = 2;already above }
{ GetNamedPipeInfo }
PIPE_CLIENT_END = 0;
PIPE_SERVER_END = 1;
{ PIPE_TYPE_MESSAGE = 4;already above }
{ GetNextWindow, GetWindow }
GW_HWNDNEXT = 2;
GW_HWNDPREV = 3;
GW_CHILD = 5;
GW_HWNDFIRST = 0;
GW_HWNDLAST = 1;
GW_OWNER = 4;
{ GetPath }
PT_MOVETO = 6;
PT_LINETO = 2;
PT_BEZIERTO = 4;
PT_CLOSEFIGURE = 1;
{ GetProcessShutdownParameters }
SHUTDOWN_NORETRY = 1;
{ GetQueueStatus }
QS_ALLEVENTS = 191;
QS_ALLINPUT = 255;
QS_HOTKEY = 128;
QS_INPUT = 7;
QS_KEY = 1;
QS_MOUSE = 6;
QS_MOUSEBUTTON = 4;
QS_MOUSEMOVE = 2;
QS_PAINT = 32;
QS_POSTMESSAGE = 8;
QS_SENDMESSAGE = 64;
QS_TIMER = 16;
{ GetScrollInfo, SetScrollInfo }
SIF_ALL = 23;
SIF_PAGE = 2;
SIF_POS = 4;
SIF_RANGE = 1;
SIF_DISABLENOSCROLL = 8;
{ GetStdHandle }
{ was #define dname def_expr }
function STD_INPUT_HANDLE : DWORD;
{ was #define dname def_expr }
function STD_OUTPUT_HANDLE : DWORD;
{ was #define dname def_expr }
function STD_ERROR_HANDLE : DWORD;
{ was #define dname def_expr }
function INVALID_HANDLE_VALUE : HANDLE;
{ GetStockObject }
const
BLACK_BRUSH = 4;
DKGRAY_BRUSH = 3;
GRAY_BRUSH = 2;
HOLLOW_BRUSH = 5;
LTGRAY_BRUSH = 1;
NULL_BRUSH = 5;
WHITE_BRUSH = 0;
BLACK_PEN = 7;
NULL_PEN = 8;
WHITE_PEN = 6;
ANSI_FIXED_FONT = 11;
ANSI_VAR_FONT = 12;
DEVICE_DEFAULT_FONT = 14;
DEFAULT_GUI_FONT = 17;
OEM_FIXED_FONT = 10;
SYSTEM_FONT = 13;
SYSTEM_FIXED_FONT = 16;
DEFAULT_PALETTE = 15;
{ GetStringTypeA }
CT_CTYPE1 = 1;
CT_CTYPE2 = 2;
CT_CTYPE3 = 4;
C1_UPPER = 1;
C1_LOWER = 2;
C1_DIGIT = 4;
C1_SPACE = 8;
C1_PUNCT = 16;
C1_CNTRL = 32;
C1_BLANK = 64;
C1_XDIGIT = 128;
C1_ALPHA = 256;
C2_LEFTTORIGHT = 1;
C2_RIGHTTOLEFT = 2;
C2_EUROPENUMBER = 3;
C2_EUROPESEPARATOR = 4;
C2_EUROPETERMINATOR = 5;
C2_ARABICNUMBER = 6;
C2_COMMONSEPARATOR = 7;
C2_BLOCKSEPARATOR = 8;
C2_SEGMENTSEPARATOR = 9;
C2_WHITESPACE = 10;
C2_OTHERNEUTRAL = 11;
C2_NOTAPPLICABLE = 0;
C3_NONSPACING = 1;
C3_DIACRITIC = 2;
C3_VOWELMARK = 4;
C3_SYMBOL = 8;
C3_KATAKANA = 16;
C3_HIRAGANA = 32;
C3_HALFWIDTH = 64;
C3_FULLWIDTH = 128;
C3_IDEOGRAPH = 256;
C3_KASHIDA = 512;
C3_ALPHA = 32768;
C3_NOTAPPLICABLE = 0;
{ GetSysColor }
COLOR_3DDKSHADOW = 21;
COLOR_3DFACE = 15;
COLOR_3DHILIGHT = 20;
COLOR_3DLIGHT = 22;
COLOR_BTNHILIGHT = 20;
COLOR_3DSHADOW = 16;
COLOR_ACTIVEBORDER = 10;
COLOR_ACTIVECAPTION = 2;
COLOR_APPWORKSPACE = 12;
COLOR_BACKGROUND = 1;
COLOR_DESKTOP = 1;
COLOR_BTNFACE = 15;
COLOR_BTNHIGHLIGHT = 20;
COLOR_BTNSHADOW = 16;
COLOR_BTNTEXT = 18;
COLOR_CAPTIONTEXT = 9;
COLOR_GRAYTEXT = 17;
COLOR_HIGHLIGHT = 13;
COLOR_HIGHLIGHTTEXT = 14;
COLOR_INACTIVEBORDER = 11;
COLOR_INACTIVECAPTION = 3;
COLOR_INACTIVECAPTIONTEXT = 19;
COLOR_INFOBK = 24;
COLOR_INFOTEXT = 23;
COLOR_MENU = 4;
COLOR_MENUTEXT = 7;
COLOR_SCROLLBAR = 0;
COLOR_WINDOW = 5;
COLOR_WINDOWFRAME = 6;
COLOR_WINDOWTEXT = 8;
{ GetSystemMetrics }
SM_CYMIN = 29;
SM_CXMIN = 28;
SM_ARRANGE = 56;
SM_CLEANBOOT = 67;
{ The right value for SM_CEMETRICS for NT 3.5 is 75. For Windows 95
and NT 4.0, it is 76. The meaning is undocumented, anyhow. }
SM_CMETRICS = 76;
SM_CMOUSEBUTTONS = 43;
SM_CXBORDER = 5;
SM_CYBORDER = 6;
SM_CXCURSOR = 13;
SM_CYCURSOR = 14;
SM_CXDLGFRAME = 7;
SM_CYDLGFRAME = 8;
SM_CXDOUBLECLK = 36;
SM_CYDOUBLECLK = 37;
SM_CXDRAG = 68;
SM_CYDRAG = 69;
SM_CXEDGE = 45;
SM_CYEDGE = 46;
SM_CXFIXEDFRAME = 7;
SM_CYFIXEDFRAME = 8;
SM_CXFRAME = 32;
SM_CYFRAME = 33;
SM_CXFULLSCREEN = 16;
SM_CYFULLSCREEN = 17;
SM_CXHSCROLL = 21;
SM_CYHSCROLL = 3;
SM_CXHTHUMB = 10;
SM_CXICON = 11;
SM_CYICON = 12;
SM_CXICONSPACING = 38;
SM_CYICONSPACING = 39;
SM_CXMAXIMIZED = 61;
SM_CYMAXIMIZED = 62;
SM_CXMAXTRACK = 59;
SM_CYMAXTRACK = 60;
SM_CXMENUCHECK = 71;
SM_CYMENUCHECK = 72;
SM_CXMENUSIZE = 54;
SM_CYMENUSIZE = 55;
SM_CXMINIMIZED = 57;
SM_CYMINIMIZED = 58;
SM_CXMINSPACING = 47;
SM_CYMINSPACING = 48;
SM_CXMINTRACK = 34;
SM_CYMINTRACK = 35;
SM_CXSCREEN = 0;
SM_CYSCREEN = 1;
SM_CXSIZE = 30;
SM_CYSIZE = 31;
SM_CXSIZEFRAME = 32;
SM_CYSIZEFRAME = 33;
SM_CXSMICON = 49;
SM_CYSMICON = 50;
SM_CXSMSIZE = 52;
SM_CYSMSIZE = 53;
SM_CXVSCROLL = 2;
{SM_CYHSCROLL = 3;already above }
{SM_CXHSCROLL = 21;already above }
SM_CYVSCROLL = 20;
SM_CYVTHUMB = 9;
SM_CYCAPTION = 4;
SM_CYKANJIWINDOW = 18;
SM_CYMENU = 15;
SM_CYSMCAPTION = 51;
SM_DBCSENABLED = 42;
SM_DEBUG = 22;
SM_MENUDROPALIGNMENT = 40;
SM_MIDEASTENABLED = 74;
SM_MOUSEPRESENT = 19;
SM_MOUSEWHEELPRESENT = 75;
SM_NETWORK = 63;
SM_PENWINDOWS = 41;
SM_SECURE = 44;
SM_SHOWSOUNDS = 70;
SM_SLOWMACHINE = 73;
SM_SWAPBUTTON = 23;
ARW_BOTTOMLEFT = 0;
ARW_BOTTOMRIGHT = $1;
ARW_HIDE = $8;
ARW_TOPLEFT = $2;
ARW_TOPRIGHT = $3;
ARW_DOWN = $4;
ARW_LEFT = 0;
ARW_RIGHT = 0;
ARW_UP = $4;
{ GetSystemPaletteUse }
SYSPAL_NOSTATIC = 2;
SYSPAL_STATIC = 1;
SYSPAL_ERROR = 0;
{ GetTapeParameters, SetTapeParameters }
GET_TAPE_MEDIA_INFORMATION = 0;
GET_TAPE_DRIVE_INFORMATION = 1;
SET_TAPE_MEDIA_INFORMATION = 0;
SET_TAPE_DRIVE_INFORMATION = 1;
{ GetTapePosition }
TAPE_ABSOLUTE_POSITION = 0;
TAPE_LOGICAL_POSITION = $1;
{ GetTextAlign }
TA_BASELINE = 24;
TA_BOTTOM = 8;
TA_TOP = 0;
TA_CENTER = 6;
TA_LEFT = 0;
TA_RIGHT = 2;
TA_RTLREADING = 256;
TA_NOUPDATECP = 0;
TA_UPDATECP = 1;
VTA_BASELINE = 24;
VTA_CENTER = 6;
{ GetThreadPriority }
THREAD_PRIORITY_ABOVE_NORMAL = 1;
THREAD_PRIORITY_BELOW_NORMAL = -(1);
THREAD_PRIORITY_HIGHEST = 2;
THREAD_PRIORITY_IDLE = -(15);
THREAD_PRIORITY_LOWEST = -(2);
THREAD_PRIORITY_NORMAL = 0;
THREAD_PRIORITY_TIME_CRITICAL = 15;
THREAD_PRIORITY_ERROR_RETURN = 2147483647;
TLS_MINIMUM_AVAILABLE = 64;
{ GetTimeFormat }
TIME_NOMINUTESORSECONDS = 1;
TIME_NOSECONDS = 2;
TIME_NOTIMEMARKER = 4;
TIME_FORCE24HOURFORMAT = 8;
{ GetTimeZoneInformation }
{ was #define dname def_expr }
function TIME_ZONE_ID_INVALID : DWORD;
const
TIME_ZONE_ID_UNKNOWN = 0;
TIME_ZONE_ID_STANDARD = 1;
TIME_ZONE_ID_DAYLIGHT = 2;
{ GetUserObjectInformation }
UOI_FLAGS = 1;
UOI_NAME = 2;
UOI_TYPE = 3;
{ GetVolumeInformation }
FS_CASE_IS_PRESERVED = 2;
FS_CASE_SENSITIVE = 1;
FS_UNICODE_STORED_ON_DISK = 4;
FS_PERSISTENT_ACLS = 8;
FS_FILE_COMPRESSION = 16;
FS_VOL_IS_COMPRESSED = 32768;
{ GetWindowLong }
GWL_EXSTYLE = -(20);
GWL_STYLE = -(16);
GWL_WNDPROC = -(4);
GWL_HINSTANCE = -(6);
GWL_HWNDPARENT = -(8);
GWL_ID = -(12);
GWL_USERDATA = -(21);
DWL_DLGPROC = 4;
DWL_MSGRESULT = 0;
DWL_USER = 8;
{ GlobalAlloc, GlobalFlags }
GMEM_FIXED = 0;
GMEM_MOVEABLE = 2;
GPTR = 64;
GHND = 66;
GMEM_DDESHARE = 8192;
GMEM_DISCARDABLE = 256;
GMEM_LOWER = 4096;
GMEM_NOCOMPACT = 16;
GMEM_NODISCARD = 32;
GMEM_NOT_BANKED = 4096;
GMEM_NOTIFY = 16384;
GMEM_SHARE = 8192;
GMEM_ZEROINIT = 64;
GMEM_DISCARDED = 16384;
GMEM_INVALID_HANDLE = 32768;
GMEM_LOCKCOUNT = 255;
{ HeapAlloc, HeapReAlloc }
HEAP_GENERATE_EXCEPTIONS = 4;
HEAP_NO_SERIALIZE = 1;
HEAP_ZERO_MEMORY = 8;
STATUS_NO_MEMORY = $c0000017;
STATUS_ACCESS_VIOLATION = $c0000005;
HEAP_REALLOC_IN_PLACE_ONLY = 16;
{ ImageList_Create }
ILC_COLOR = 0;
ILC_COLOR4 = 4;
ILC_COLOR8 = 8;
ILC_COLOR16 = 16;
ILC_COLOR24 = 24;
ILC_COLOR32 = 32;
ILC_COLORDDB = 254;
ILC_MASK = 1;
ILC_PALETTE = 2048;
{ ImageList_Draw, ImageList_DrawEx }
ILD_BLEND25 = 2;
ILD_BLEND50 = 4;
ILD_SELECTED = 4;
ILD_BLEND = 4;
ILD_FOCUS = 2;
ILD_MASK = 16;
ILD_NORMAL = 0;
ILD_TRANSPARENT = 1;
CLR_NONE = $ffffffff;
CLR_DEFAULT = $ff000000;
{ ImageList_LoadImage }
{LR_DEFAULTCOLOR = 0;already above }
LR_LOADFROMFILE = 16;
LR_LOADMAP3DCOLORS = 4096;
LR_LOADTRANSPARENT = 32;
{LR_MONOCHROME = 1;already above }
{ ImmConfigureIME }
IME_CONFIG_GENERAL = 1;
IME_CONFIG_REGISTERWORD = 2;
IME_CONFIG_SELECTDICTIONARY = 3;
{ ImmGetConversionList }
GCL_CONVERSION = 1;
GCL_REVERSECONVERSION = 2;
GCL_REVERSE_LENGTH = 3;
{ ImmGetGuideLine }
GGL_LEVEL = 1;
GGL_INDEX = 2;
GGL_STRING = 3;
GGL_PRIVATE = 4;
GL_LEVEL_ERROR = 2;
GL_LEVEL_FATAL = 1;
GL_LEVEL_INFORMATION = 4;
GL_LEVEL_NOGUIDELINE = 0;
GL_LEVEL_WARNING = 3;
GL_ID_CANNOTSAVE = 17;
GL_ID_NOCONVERT = 32;
GL_ID_NODICTIONARY = 16;
GL_ID_NOMODULE = 1;
GL_ID_READINGCONFLICT = 35;
GL_ID_TOOMANYSTROKE = 34;
GL_ID_TYPINGERROR = 33;
GL_ID_UNKNOWN = 0;
GL_ID_INPUTREADING = 36;
GL_ID_INPUTRADICAL = 37;
GL_ID_INPUTCODE = 38;
GL_ID_CHOOSECANDIDATE = 40;
GL_ID_REVERSECONVERSION = 41;
{ ImmGetProperty }
IGP_PROPERTY = 4;
IGP_CONVERSION = 8;
IGP_SENTENCE = 12;
IGP_UI = 16;
IGP_SETCOMPSTR = 20;
IGP_SELECT = 24;
IME_PROP_AT_CARET = 65536;
IME_PROP_SPECIAL_UI = 131072;
IME_PROP_CANDLIST_START_FROM_1 = 262144;
IME_PROP_UNICODE = 524288;
UI_CAP_2700 = 1;
UI_CAP_ROT90 = 2;
UI_CAP_ROTANY = 4;
SCS_CAP_COMPSTR = 1;
SCS_CAP_MAKEREAD = 2;
SELECT_CAP_CONVERSION = 1;
SELECT_CAP_SENTENCE = 2;
{ ImmNotifyIME }
NI_CHANGECANDIDATELIST = 19;
NI_CLOSECANDIDATE = 17;
NI_COMPOSITIONSTR = 21;
NI_OPENCANDIDATE = 16;
NI_SELECTCANDIDATESTR = 18;
NI_SETCANDIDATE_PAGESIZE = 23;
NI_SETCANDIDATE_PAGESTART = 22;
CPS_CANCEL = 4;
CPS_COMPLETE = 1;
CPS_CONVERT = 2;
CPS_REVERT = 3;
{ ImmSetCompositionString }
SCS_SETSTR = 9;
SCS_CHANGEATTR = 18;
SCS_CHANGECLAUSE = 36;
{ ImmUnregisterWord }
IME_REGWORD_STYLE_EUDC = 1;
IME_REGWORD_STYLE_USER_FIRST = $80000000;
IME_REGWORD_STYLE_USER_LAST = -(1);
{ InitializeSecurityDescriptor }
SECURITY_DESCRIPTOR_REVISION = 1;
{ IsTextUnicode }
IS_TEXT_UNICODE_ASCII16 = 1;
IS_TEXT_UNICODE_REVERSE_ASCII16 = 16;
IS_TEXT_UNICODE_STATISTICS = 2;
IS_TEXT_UNICODE_REVERSE_STATISTICS = 32;
IS_TEXT_UNICODE_CONTROLS = 4;
IS_TEXT_UNICODE_REVERSE_CONTROLS = 64;
IS_TEXT_UNICODE_SIGNATURE = 8;
IS_TEXT_UNICODE_REVERSE_SIGNATURE = 128;
IS_TEXT_UNICODE_ILLEGAL_CHARS = 256;
IS_TEXT_UNICODE_ODD_LENGTH = 512;
IS_TEXT_UNICODE_NULL_BYTES = 4096;
IS_TEXT_UNICODE_UNICODE_MASK = 15;
IS_TEXT_UNICODE_REVERSE_MASK = 240;
IS_TEXT_UNICODE_NOT_UNICODE_MASK = 3840;
IS_TEXT_UNICODE_NOT_ASCII_MASK = 61440;
{ JournalPlaybackProc, KeyboardProc }
HC_GETNEXT = 1;
HC_SKIP = 2;
HC_SYSMODALOFF = 5;
HC_SYSMODALON = 4;
HC_NOREMOVE = 3;
{ keybd_event }
KEYEVENTF_EXTENDEDKEY = 1;
KEYEVENTF_KEYUP = 2;
{ LoadBitmap }
OBM_BTNCORNERS = 32758;
OBM_BTSIZE = 32761;
OBM_CHECK = 32760;
OBM_CHECKBOXES = 32759;
OBM_CLOSE = 32754;
OBM_COMBO = 32738;
OBM_DNARROW = 32752;
OBM_DNARROWD = 32742;
OBM_DNARROWI = 32736;
OBM_LFARROW = 32750;
OBM_LFARROWI = 32734;
OBM_LFARROWD = 32740;
OBM_MNARROW = 32739;
OBM_OLD_CLOSE = 32767;
OBM_OLD_DNARROW = 32764;
OBM_OLD_LFARROW = 32762;
OBM_OLD_REDUCE = 32757;
OBM_OLD_RESTORE = 32755;
OBM_OLD_RGARROW = 32763;
OBM_OLD_UPARROW = 32765;
OBM_OLD_ZOOM = 32756;
OBM_REDUCE = 32749;
OBM_REDUCED = 32746;
OBM_RESTORE = 32747;
OBM_RESTORED = 32744;
OBM_RGARROW = 32751;
OBM_RGARROWD = 32741;
OBM_RGARROWI = 32735;
OBM_SIZE = 32766;
OBM_UPARROW = 32753;
OBM_UPARROWD = 32743;
OBM_UPARROWI = 32737;
OBM_ZOOM = 32748;
OBM_ZOOMD = 32745;
{ LoadLibraryEx }
DONT_RESOLVE_DLL_REFERENCES = 1;
LOAD_LIBRARY_AS_DATAFILE = 2;
LOAD_WITH_ALTERED_SEARCH_PATH = 8;
{ LocalAlloc, LocalFlags }
LPTR = 64;
LHND = 66;
NONZEROLHND = 2;
NONZEROLPTR = 0;
LMEM_NONZEROLHND = 2;
LMEM_NONZEROLPTR = 0;
LMEM_FIXED = 0;
LMEM_MOVEABLE = 2;
LMEM_NOCOMPACT = 16;
LMEM_NODISCARD = 32;
LMEM_ZEROINIT = 64;
LMEM_MODIFY = 128;
LMEM_LOCKCOUNT = 255;
LMEM_DISCARDABLE = 3840;
LMEM_DISCARDED = 16384;
LMEM_INVALID_HANDLE = 32768;
{ LockFileEx }
LOCKFILE_FAIL_IMMEDIATELY = 1;
LOCKFILE_EXCLUSIVE_LOCK = 2;
{ LogonUser }
{ LZCopy, LZInit, LZRead }
{ MessageBeep, MessageBox }
MB_USERICON = $80;
MB_ICONASTERISK = $40;
MB_ICONEXCLAMATION = $30;
MB_ICONWARNING = $30;
MB_ICONERROR = $10;
MB_ICONHAND = $10;
MB_ICONQUESTION = $20;
MB_OK = 0;
MB_ABORTRETRYIGNORE = $2;
MB_APPLMODAL = 0;
MB_DEFAULT_DESKTOP_ONLY = $20000;
MB_HELP = $4000;
MB_RIGHT = $80000;
MB_RTLREADING = $100000;
MB_TOPMOST = $40000;
MB_DEFBUTTON1 = 0;
MB_DEFBUTTON2 = $100;
MB_DEFBUTTON3 = $200;
MB_DEFBUTTON4 = $300;
MB_ICONINFORMATION = $40;
MB_ICONSTOP = $10;
MB_OKCANCEL = $1;
MB_RETRYCANCEL = $5;
MB_SERVICE_NOTIFICATION = $40000;
MB_SETFOREGROUND = $10000;
MB_SYSTEMMODAL = $1000;
MB_TASKMODAL = $2000;
MB_YESNO = $4;
MB_YESNOCANCEL = $3;
IDABORT = 3;
IDCANCEL = 2;
IDCLOSE = 8;
IDHELP = 9;
IDIGNORE = 5;
IDNO = 7;
IDOK = 1;
IDRETRY = 4;
IDYES = 6;
{ MessageProc }
MSGF_DIALOGBOX = 0;
MSGF_MENU = 2;
MSGF_NEXTWINDOW = 6;
MSGF_SCROLLBAR = 5;
MSGF_MAINLOOP = 8;
MSGF_USER = 4096;
{ ModifyWorldTransform }
MWT_IDENTITY = 1;
MWT_LEFTMULTIPLY = 2;
MWT_RIGHTMULTIPLY = 3;
{ mouse_event }
MOUSEEVENTF_ABSOLUTE = 32768;
MOUSEEVENTF_MOVE = 1;
MOUSEEVENTF_LEFTDOWN = 2;
MOUSEEVENTF_LEFTUP = 4;
MOUSEEVENTF_RIGHTDOWN = 8;
MOUSEEVENTF_RIGHTUP = 16;
MOUSEEVENTF_MIDDLEDOWN = 32;
MOUSEEVENTF_MIDDLEUP = 64;
{ MoveFileEx }
MOVEFILE_REPLACE_EXISTING = 1;
MOVEFILE_COPY_ALLOWED = 2;
MOVEFILE_DELAY_UNTIL_REBOOT = 4;
{ MsgWaitForMultipleObjects, WaitForMultipleObjectsEx }
WAIT_OBJECT_0 = 0;
WAIT_ABANDONED_0 = $80;
WAIT_TIMEOUT = $102;
WAIT_IO_COMPLETION = $c0;
WAIT_ABANDONED = $80;
WAIT_FAILED = $ffffffff;
MAXIMUM_WAIT_OBJECTS = $40;
MAXIMUM_SUSPEND_COUNT = $7f;
{ MultiByteToWideChar }
MB_PRECOMPOSED = 1;
MB_COMPOSITE = 2;
MB_ERR_INVALID_CHARS = 8;
MB_USEGLYPHCHARS = 4;
{ NDdeSetTrustedShare }
{ NetAccessCheck }
{ NetServerEnum }
{ NetServiceControl }
{ NetUserEnum }
{ OpenProcessToken }
TOKEN_ADJUST_DEFAULT = 128;
TOKEN_ADJUST_GROUPS = 64;
TOKEN_ADJUST_PRIVILEGES = 32;
TOKEN_ALL_ACCESS = $f00ff;
TOKEN_ASSIGN_PRIMARY = 1;
TOKEN_DUPLICATE = 2;
TOKEN_EXECUTE = $20000;
TOKEN_IMPERSONATE = 4;
TOKEN_QUERY = 8;
TOKEN_QUERY_SOURCE = 16;
TOKEN_READ = $20008;
TOKEN_WRITE = $200e0;
{ OpenSCManager }
SC_MANAGER_ALL_ACCESS = $f003f;
SC_MANAGER_CONNECT = 1;
SC_MANAGER_CREATE_SERVICE = 2;
SC_MANAGER_ENUMERATE_SERVICE = 4;
SC_MANAGER_LOCK = 8;
SC_MANAGER_QUERY_LOCK_STATUS = 16;
SC_MANAGER_MODIFY_BOOT_CONFIG = 32;
{ PostMessage }
{ was #define dname def_expr }
function HWND_BROADCAST : HWND;
{ PrepareTape }
const
TAPE_FORMAT = $5;
TAPE_LOAD = 0;
TAPE_LOCK = $3;
TAPE_TENSION = $2;
TAPE_UNLOAD = $1;
TAPE_UNLOCK = $4;
{ PropertySheet }
IS_PSREBOOTSYSTEM = 3;
IS_PSRESTARTWINDOWS = 2;
{ PropSheetPageProc }
PSPCB_CREATE = 2;
PSPCB_RELEASE = 1;
{ PurgeComm }
PURGE_TXABORT = 1;
PURGE_RXABORT = 2;
PURGE_TXCLEAR = 4;
PURGE_RXCLEAR = 8;
{ QueryServiceObjectSecurity }
OWNER_SECURITY_INFORMATION = $1;
GROUP_SECURITY_INFORMATION = $2;
DACL_SECURITY_INFORMATION = $4;
SACL_SECURITY_INFORMATION = $8;
{ ReadEventLog, ReportEvent }
EVENTLOG_FORWARDS_READ = 4;
EVENTLOG_BACKWARDS_READ = 8;
EVENTLOG_SEEK_READ = 2;
EVENTLOG_SEQUENTIAL_READ = 1;
EVENTLOG_ERROR_TYPE = 1;
EVENTLOG_WARNING_TYPE = 2;
EVENTLOG_INFORMATION_TYPE = 4;
EVENTLOG_AUDIT_SUCCESS = 8;
EVENTLOG_AUDIT_FAILURE = 16;
{ RedrawWindow }
RDW_ERASE = 4;
RDW_FRAME = 1024;
RDW_INTERNALPAINT = 2;
RDW_INVALIDATE = 1;
RDW_NOERASE = 32;
RDW_NOFRAME = 2048;
RDW_NOINTERNALPAINT = 16;
RDW_VALIDATE = 8;
RDW_ERASENOW = 512;
RDW_UPDATENOW = 256;
RDW_ALLCHILDREN = 128;
RDW_NOCHILDREN = 64;
{ RegCreateKey }
{ was #define dname def_expr }
function HKEY_CLASSES_ROOT : HKEY;
{ was #define dname def_expr }
function HKEY_CURRENT_USER : HKEY;
{ was #define dname def_expr }
function HKEY_LOCAL_MACHINE : HKEY;
{ was #define dname def_expr }
function HKEY_USERS : HKEY;
{ was #define dname def_expr }
function HKEY_PERFORMANCE_DATA : HKEY;
{ was #define dname def_expr }
function HKEY_CURRENT_CONFIG : HKEY;
{ was #define dname def_expr }
function HKEY_DYN_DATA : HKEY;
{ RegCreateKeyEx }
const
REG_OPTION_VOLATILE = $1;
REG_OPTION_NON_VOLATILE = 0;
REG_CREATED_NEW_KEY = $1;
REG_OPENED_EXISTING_KEY = $2;
{ RegEnumValue }
REG_BINARY = 3;
REG_DWORD = 4;
REG_DWORD_LITTLE_ENDIAN = 4;
REG_DWORD_BIG_ENDIAN = 5;
REG_EXPAND_SZ = 2;
REG_FULL_RESOURCE_DESCRIPTOR = 9;
REG_LINK = 6;
REG_MULTI_SZ = 7;
REG_NONE = 0;
REG_RESOURCE_LIST = 8;
REG_RESOURCE_REQUIREMENTS_LIST = 10;
REG_SZ = 1;
{ RegisterHotKey }
MOD_ALT = 1;
MOD_CONTROL = 2;
MOD_SHIFT = 4;
MOD_WIN = 8;
IDHOT_SNAPDESKTOP = -(2);
IDHOT_SNAPWINDOW = -(1);
{ RegNotifyChangeKeyValue }
REG_NOTIFY_CHANGE_NAME = $1;
REG_NOTIFY_CHANGE_ATTRIBUTES = $2;
REG_NOTIFY_CHANGE_LAST_SET = $4;
REG_NOTIFY_CHANGE_SECURITY = $8;
{ ScrollWindowEx }
SW_ERASE = 4;
SW_INVALIDATE = 2;
SW_SCROLLCHILDREN = 1;
{ SendMessageTimeout }
SMTO_ABORTIFHUNG = 2;
SMTO_BLOCK = 1;
SMTO_NORMAL = 0;
{ SetBkMode }
OPAQUE = 2;
TRANSPARENT = 1;
{ SetDebugErrorLevel }
SLE_ERROR = 1;
SLE_MINORERROR = 2;
SLE_WARNING = 3;
{ SetErrorMode }
SEM_FAILCRITICALERRORS = 1;
SEM_NOALIGNMENTFAULTEXCEPT = 4;
SEM_NOGPFAULTERRORBOX = 2;
SEM_NOOPENFILEERRORBOX = 32768;
{ SetICMMode }
ICM_ON = 2;
ICM_OFF = 1;
ICM_QUERY = 3;
{ SetJob }
{ Locale Information }
LOCALE_ILANGUAGE = 1;
LOCALE_SLANGUAGE = 2;
LOCALE_SENGLANGUAGE = 4097;
LOCALE_SABBREVLANGNAME = 3;
LOCALE_SNATIVELANGNAME = 4;
LOCALE_ICOUNTRY = 5;
LOCALE_SCOUNTRY = 6;
LOCALE_SENGCOUNTRY = 4098;
LOCALE_SABBREVCTRYNAME = 7;
LOCALE_SNATIVECTRYNAME = 8;
LOCALE_IDEFAULTLANGUAGE = 9;
LOCALE_IDEFAULTCOUNTRY = 10;
LOCALE_IDEFAULTANSICODEPAGE = 4100;
LOCALE_IDEFAULTCODEPAGE = 11;
LOCALE_SLIST = 12;
LOCALE_IMEASURE = 13;
LOCALE_SDECIMAL = 14;
LOCALE_STHOUSAND = 15;
LOCALE_SGROUPING = 16;
LOCALE_IDIGITS = 17;
LOCALE_ILZERO = 18;
LOCALE_INEGNUMBER = 4112;
LOCALE_SCURRENCY = 20;
LOCALE_SMONDECIMALSEP = 22;
LOCALE_SMONTHOUSANDSEP = 23;
LOCALE_SMONGROUPING = 24;
LOCALE_ICURRDIGITS = 25;
LOCALE_ICURRENCY = 27;
LOCALE_INEGCURR = 28;
LOCALE_SDATE = 29;
LOCALE_STIME = 30;
LOCALE_STIMEFORMAT = 4099;
LOCALE_SSHORTDATE = 31;
LOCALE_SLONGDATE = 32;
LOCALE_IDATE = 33;
LOCALE_ILDATE = 34;
LOCALE_ITIME = 35;
LOCALE_ITLZERO = 37;
LOCALE_IDAYLZERO = 38;
LOCALE_IMONLZERO = 39;
LOCALE_S1159 = 40;
LOCALE_S2359 = 41;
LOCALE_ICALENDARTYPE = 4105;
LOCALE_IOPTIONALCALENDAR = 4107;
LOCALE_IFIRSTDAYOFWEEK = 4108;
LOCALE_IFIRSTWEEKOFYEAR = 4109;
LOCALE_SDAYNAME1 = 42;
LOCALE_SDAYNAME2 = 43;
LOCALE_SDAYNAME3 = 44;
LOCALE_SDAYNAME4 = 45;
LOCALE_SDAYNAME5 = 46;
LOCALE_SDAYNAME6 = 47;
LOCALE_SDAYNAME7 = 48;
LOCALE_SABBREVDAYNAME1 = 49;
LOCALE_SABBREVDAYNAME2 = 50;
LOCALE_SABBREVDAYNAME3 = 51;
LOCALE_SABBREVDAYNAME4 = 52;
LOCALE_SABBREVDAYNAME5 = 53;
LOCALE_SABBREVDAYNAME6 = 54;
LOCALE_SABBREVDAYNAME7 = 55;
LOCALE_SMONTHNAME1 = 56;
LOCALE_SMONTHNAME2 = 57;
LOCALE_SMONTHNAME3 = 58;
LOCALE_SMONTHNAME4 = 59;
LOCALE_SMONTHNAME5 = 60;
LOCALE_SMONTHNAME6 = 61;
LOCALE_SMONTHNAME7 = 62;
LOCALE_SMONTHNAME8 = 63;
LOCALE_SMONTHNAME9 = 64;
LOCALE_SMONTHNAME10 = 65;
LOCALE_SMONTHNAME11 = 66;
LOCALE_SMONTHNAME12 = 67;
LOCALE_SMONTHNAME13 = 4110;
LOCALE_SABBREVMONTHNAME1 = 68;
LOCALE_SABBREVMONTHNAME2 = 69;
LOCALE_SABBREVMONTHNAME3 = 70;
LOCALE_SABBREVMONTHNAME4 = 71;
LOCALE_SABBREVMONTHNAME5 = 72;
LOCALE_SABBREVMONTHNAME6 = 73;
LOCALE_SABBREVMONTHNAME7 = 74;
LOCALE_SABBREVMONTHNAME8 = 75;
LOCALE_SABBREVMONTHNAME9 = 76;
LOCALE_SABBREVMONTHNAME10 = 77;
LOCALE_SABBREVMONTHNAME11 = 78;
LOCALE_SABBREVMONTHNAME12 = 79;
LOCALE_SABBREVMONTHNAME13 = 4111;
LOCALE_SPOSITIVESIGN = 80;
LOCALE_SNEGATIVESIGN = 81;
LOCALE_IPOSSIGNPOSN = 82;
LOCALE_INEGSIGNPOSN = 83;
LOCALE_IPOSSYMPRECEDES = 84;
LOCALE_IPOSSEPBYSPACE = 85;
LOCALE_INEGSYMPRECEDES = 86;
LOCALE_INEGSEPBYSPACE = 87;
LOCALE_NOUSEROVERRIDE = $80000000;
{ Calendar Type Information }
CAL_ICALINTVALUE = 1;
CAL_IYEAROFFSETRANGE = 3;
CAL_SABBREVDAYNAME1 = 14;
CAL_SABBREVDAYNAME2 = 15;
CAL_SABBREVDAYNAME3 = 16;
CAL_SABBREVDAYNAME4 = 17;
CAL_SABBREVDAYNAME5 = 18;
CAL_SABBREVDAYNAME6 = 19;
CAL_SABBREVDAYNAME7 = 20;
CAL_SABBREVMONTHNAME1 = 34;
CAL_SABBREVMONTHNAME2 = 35;
CAL_SABBREVMONTHNAME3 = 36;
CAL_SABBREVMONTHNAME4 = 37;
CAL_SABBREVMONTHNAME5 = 38;
CAL_SABBREVMONTHNAME6 = 39;
CAL_SABBREVMONTHNAME7 = 40;
CAL_SABBREVMONTHNAME8 = 41;
CAL_SABBREVMONTHNAME9 = 42;
CAL_SABBREVMONTHNAME10 = 43;
CAL_SABBREVMONTHNAME11 = 44;
CAL_SABBREVMONTHNAME12 = 45;
CAL_SABBREVMONTHNAME13 = 46;
CAL_SCALNAME = 2;
CAL_SDAYNAME1 = 7;
CAL_SDAYNAME2 = 8;
CAL_SDAYNAME3 = 9;
CAL_SDAYNAME4 = 10;
CAL_SDAYNAME5 = 11;
CAL_SDAYNAME6 = 12;
CAL_SDAYNAME7 = 13;
CAL_SERASTRING = 4;
CAL_SLONGDATE = 6;
CAL_SMONTHNAME1 = 21;
CAL_SMONTHNAME2 = 22;
CAL_SMONTHNAME3 = 23;
CAL_SMONTHNAME4 = 24;
CAL_SMONTHNAME5 = 25;
CAL_SMONTHNAME6 = 26;
CAL_SMONTHNAME7 = 27;
CAL_SMONTHNAME8 = 28;
CAL_SMONTHNAME9 = 29;
CAL_SMONTHNAME10 = 30;
CAL_SMONTHNAME11 = 31;
CAL_SMONTHNAME12 = 32;
CAL_SMONTHNAME13 = 33;
CAL_SSHORTDATE = 5;
{ SetProcessWorkingSetSize }
PROCESS_SET_QUOTA = 256;
{ SetPrinter }
{ SetService }
{ SetStretchBltMode }
BLACKONWHITE = 1;
COLORONCOLOR = 3;
HALFTONE = 4;
STRETCH_ANDSCANS = 1;
STRETCH_DELETESCANS = 3;
STRETCH_HALFTONE = 4;
STRETCH_ORSCANS = 2;
WHITEONBLACK = 2;
{ SetSystemCursor }
OCR_NORMAL = 32512;
OCR_IBEAM = 32513;
OCR_WAIT = 32514;
OCR_CROSS = 32515;
OCR_UP = 32516;
OCR_SIZE = 32640;
OCR_ICON = 32641;
OCR_SIZENWSE = 32642;
OCR_SIZENESW = 32643;
OCR_SIZEWE = 32644;
OCR_SIZENS = 32645;
OCR_SIZEALL = 32646;
OCR_NO = 32648;
OCR_APPSTARTING = 32650;
{ SetTapePosition }
TAPE_ABSOLUTE_BLOCK = $1;
TAPE_LOGICAL_BLOCK = $2;
TAPE_REWIND = 0;
TAPE_SPACE_END_OF_DATA = $4;
TAPE_SPACE_FILEMARKS = $6;
TAPE_SPACE_RELATIVE_BLOCKS = $5;
TAPE_SPACE_SEQUENTIAL_FMKS = $7;
TAPE_SPACE_SEQUENTIAL_SMKS = $9;
TAPE_SPACE_SETMARKS = $8;
{ SetUnhandledExceptionFilter }
EXCEPTION_EXECUTE_HANDLER = 1;
EXCEPTION_CONTINUE_EXECUTION = -(1);
EXCEPTION_CONTINUE_SEARCH = 0;
{ SetWindowPos, DeferWindowPos }
{ was #define dname def_expr }
function HWND_BOTTOM : HWND;
{ was #define dname def_expr }
function HWND_NOTOPMOST : HWND;
{ was #define dname def_expr }
function HWND_TOP : HWND;
{ was #define dname def_expr }
function HWND_TOPMOST : HWND;
const
SWP_DRAWFRAME = 32;
SWP_FRAMECHANGED = 32;
SWP_HIDEWINDOW = 128;
SWP_NOACTIVATE = 16;
SWP_NOCOPYBITS = 256;
SWP_NOMOVE = 2;
SWP_NOSIZE = 1;
SWP_NOREDRAW = 8;
SWP_NOZORDER = 4;
SWP_SHOWWINDOW = 64;
SWP_NOOWNERZORDER = 512;
SWP_NOREPOSITION = 512;
SWP_NOSENDCHANGING = 1024;
{ SHAddToRecentDocs }
{ SHAppBarMessage }
{ SHChangeNotify }
{ ShellProc }
HSHELL_ACTIVATESHELLWINDOW = 3;
HSHELL_GETMINRECT = 5;
HSHELL_LANGUAGE = 8;
HSHELL_REDRAW = 6;
HSHELL_TASKMAN = 7;
HSHELL_WINDOWACTIVATED = 4;
HSHELL_WINDOWCREATED = 1;
HSHELL_WINDOWDESTROYED = 2;
{ SHGetFileInfo }
{ SHGetSpecialFolderLocation }
{ ShowWindow }
SW_HIDE = 0;
SW_MAXIMIZE = 3;
SW_MINIMIZE = 6;
SW_NORMAL = 1;
SW_RESTORE = 9;
SW_SHOW = 5;
SW_SHOWDEFAULT = 10;
SW_SHOWMAXIMIZED = 3;
SW_SHOWMINIMIZED = 2;
SW_SHOWMINNOACTIVE = 7;
SW_SHOWNA = 8;
SW_SHOWNOACTIVATE = 4;
SW_SHOWNORMAL = 1;
WPF_RESTORETOMAXIMIZED = 2;
WPF_SETMINPOSITION = 1;
{ Sleep }
INFINITE = $FFFFFFFF;
{ SystemParametersInfo }
SPI_GETACCESSTIMEOUT = 60;
SPI_GETANIMATION = 72;
SPI_GETBEEP = 1;
SPI_GETBORDER = 5;
SPI_GETDEFAULTINPUTLANG = 89;
SPI_GETDRAGFULLWINDOWS = 38;
SPI_GETFASTTASKSWITCH = 35;
SPI_GETFILTERKEYS = 50;
SPI_GETFONTSMOOTHING = 74;
SPI_GETGRIDGRANULARITY = 18;
SPI_GETHIGHCONTRAST = 66;
SPI_GETICONMETRICS = 45;
SPI_GETICONTITLELOGFONT = 31;
SPI_GETICONTITLEWRAP = 25;
SPI_GETKEYBOARDDELAY = 22;
SPI_GETKEYBOARDPREF = 68;
SPI_GETKEYBOARDSPEED = 10;
SPI_GETLOWPOWERACTIVE = 83;
SPI_GETLOWPOWERTIMEOUT = 79;
SPI_GETMENUDROPALIGNMENT = 27;
SPI_GETMINIMIZEDMETRICS = 43;
SPI_GETMOUSE = 3;
SPI_GETMOUSEKEYS = 54;
SPI_GETMOUSETRAILS = 94;
SPI_GETNONCLIENTMETRICS = 41;
SPI_GETPOWEROFFACTIVE = 84;
SPI_GETPOWEROFFTIMEOUT = 80;
SPI_GETSCREENREADER = 70;
SPI_GETSCREENSAVEACTIVE = 16;
SPI_GETSCREENSAVETIMEOUT = 14;
SPI_GETSERIALKEYS = 62;
SPI_GETSHOWSOUNDS = 56;
SPI_GETSOUNDSENTRY = 64;
SPI_GETSTICKYKEYS = 58;
SPI_GETTOGGLEKEYS = 52;
SPI_GETWINDOWSEXTENSION = 92;
SPI_GETWORKAREA = 48;
SPI_ICONHORIZONTALSPACING = 13;
SPI_ICONVERTICALSPACING = 24;
SPI_LANGDRIVER = 12;
SPI_SCREENSAVERRUNNING = 97;
SPI_SETACCESSTIMEOUT = 61;
SPI_SETANIMATION = 73;
SPI_SETBEEP = 2;
SPI_SETBORDER = 6;
SPI_SETDEFAULTINPUTLANG = 90;
SPI_SETDESKPATTERN = 21;
SPI_SETDESKWALLPAPER = 20;
SPI_SETDOUBLECLICKTIME = 32;
SPI_SETDOUBLECLKHEIGHT = 30;
SPI_SETDOUBLECLKWIDTH = 29;
SPI_SETDRAGFULLWINDOWS = 37;
SPI_SETDRAGHEIGHT = 77;
SPI_SETDRAGWIDTH = 76;
SPI_SETFASTTASKSWITCH = 36;
SPI_SETFILTERKEYS = 51;
SPI_SETFONTSMOOTHING = 75;
SPI_SETGRIDGRANULARITY = 19;
SPI_SETHANDHELD = 78;
SPI_SETHIGHCONTRAST = 67;
SPI_SETICONMETRICS = 46;
SPI_SETICONTITLELOGFONT = 34;
SPI_SETICONTITLEWRAP = 26;
SPI_SETKEYBOARDDELAY = 23;
SPI_SETKEYBOARDPREF = 69;
SPI_SETKEYBOARDSPEED = 11;
SPI_SETLANGTOGGLE = 91;
SPI_SETLOWPOWERACTIVE = 85;
SPI_SETLOWPOWERTIMEOUT = 81;
SPI_SETMENUDROPALIGNMENT = 28;
SPI_SETMINIMIZEDMETRICS = 44;
SPI_SETMOUSE = 4;
SPI_SETMOUSEBUTTONSWAP = 33;
SPI_SETMOUSEKEYS = 55;
SPI_SETMOUSETRAILS = 93;
SPI_SETNONCLIENTMETRICS = 42;
SPI_SETPENWINDOWS = 49;
SPI_SETPOWEROFFACTIVE = 86;
SPI_SETPOWEROFFTIMEOUT = 82;
SPI_SETSCREENREADER = 71;
SPI_SETSCREENSAVEACTIVE = 17;
SPI_SETSCREENSAVETIMEOUT = 15;
SPI_SETSERIALKEYS = 63;
SPI_SETSHOWSOUNDS = 57;
SPI_SETSOUNDSENTRY = 65;
SPI_SETSTICKYKEYS = 59;
SPI_SETTOGGLEKEYS = 53;
SPI_SETWORKAREA = 47;
SPIF_UPDATEINIFILE = 1;
SPIF_SENDWININICHANGE = 2;
SPIF_SENDCHANGE = 2;
{ TrackPopupMenu, TrackPopMenuEx }
TPM_CENTERALIGN = $4;
TPM_LEFTALIGN = 0;
TPM_RIGHTALIGN = $8;
TPM_LEFTBUTTON = 0;
TPM_RIGHTBUTTON = $2;
TPM_HORIZONTAL = 0;
TPM_VERTICAL = $40;
{ TranslateCharsetInfo }
TCI_SRCCHARSET = 1;
TCI_SRCCODEPAGE = 2;
TCI_SRCFONTSIG = 3;
{ VerFindFile }
VFFF_ISSHAREDFILE = 1;
VFF_CURNEDEST = 1;
VFF_FILEINUSE = 2;
VFF_BUFFTOOSMALL = 4;
{ VerInstallFile }
VIFF_FORCEINSTALL = 1;
VIFF_DONTDELETEOLD = 2;
VIF_TEMPFILE = $1;
VIF_MISMATCH = $2;
VIF_SRCOLD = $4;
VIF_DIFFLANG = $8;
VIF_DIFFCODEPG = $10;
VIF_DIFFTYPE = $20;
VIF_WRITEPROT = $40;
VIF_FILEINUSE = $80;
VIF_OUTOFSPACE = $100;
VIF_ACCESSVIOLATION = $200;
VIF_SHARINGVIOLATION = $400;
VIF_CANNOTCREATE = $800;
VIF_CANNOTDELETE = $1000;
VIF_CANNOTDELETECUR = $4000;
VIF_CANNOTRENAME = $2000;
VIF_OUTOFMEMORY = $8000;
VIF_CANNOTREADSRC = $10000;
VIF_CANNOTREADDST = $20000;
VIF_BUFFTOOSMALL = $40000;
{ WideCharToMultiByte }
WC_COMPOSITECHECK = 512;
WC_DISCARDNS = 16;
WC_SEPCHARS = 32;
WC_DEFAULTCHAR = 64;
{ WinHelp }
HELP_COMMAND = $102;
HELP_CONTENTS = $3;
HELP_CONTEXT = $1;
HELP_CONTEXTPOPUP = $8;
HELP_FORCEFILE = $9;
HELP_HELPONHELP = $4;
HELP_INDEX = $3;
HELP_KEY = $101;
HELP_MULTIKEY = $201;
HELP_PARTIALKEY = $105;
HELP_QUIT = $2;
HELP_SETCONTENTS = $5;
HELP_SETINDEX = $5;
HELP_CONTEXTMENU = $a;
HELP_FINDER = $b;
HELP_WM_HELP = $c;
HELP_TCARD = $8000;
HELP_TCARD_DATA = $10;
HELP_TCARD_OTHER_CALLER = $11;
{ WNetAddConnectino2 }
CONNECT_UPDATE_PROFILE = 1;
{ WNetConnectionDialog, WNetDisconnectDialog, WNetOpenEnum }
RESOURCETYPE_DISK = 1;
RESOURCETYPE_PRINT = 2;
RESOURCETYPE_ANY = 0;
RESOURCE_CONNECTED = 1;
RESOURCE_GLOBALNET = 2;
RESOURCE_REMEMBERED = 3;
RESOURCEUSAGE_CONNECTABLE = 1;
RESOURCEUSAGE_CONTAINER = 2;
{ WNetGetResourceInformation, WNetGetResourceParent }
WN_BAD_NETNAME = $43;
WN_EXTENDED_ERROR = $4b8;
WN_MORE_DATA = $ea;
WN_NO_NETWORK = $4c6;
WN_SUCCESS = 0;
WN_ACCESS_DENIED = $5;
WN_BAD_PROVIDER = $4b4;
WN_NOT_AUTHENTICATED = $4dc;
{ WNetGetUniversalName }
UNIVERSAL_NAME_INFO_LEVEL = 1;
REMOTE_NAME_INFO_LEVEL = 2;
{ GetExitCodeThread }
STILL_ACTIVE = $103;
{ COMMPROP structure }
SP_SERIALCOMM = $1;
BAUD_075 = $1;
BAUD_110 = $2;
BAUD_134_5 = $4;
BAUD_150 = $8;
BAUD_300 = $10;
BAUD_600 = $20;
BAUD_1200 = $40;
BAUD_1800 = $80;
BAUD_2400 = $100;
BAUD_4800 = $200;
BAUD_7200 = $400;
BAUD_9600 = $800;
BAUD_14400 = $1000;
BAUD_19200 = $2000;
BAUD_38400 = $4000;
BAUD_56K = $8000;
BAUD_57600 = $40000;
BAUD_115200 = $20000;
BAUD_128K = $10000;
BAUD_USER = $10000000;
PST_FAX = $21;
PST_LAT = $101;
PST_MODEM = $6;
PST_NETWORK_BRIDGE = $100;
PST_PARALLELPORT = $2;
PST_RS232 = $1;
PST_RS422 = $3;
PST_RS423 = $4;
PST_RS449 = $5;
PST_SCANNER = $22;
PST_TCPIP_TELNET = $102;
PST_UNSPECIFIED = 0;
PST_X25 = $103;
PCF_16BITMODE = $200;
PCF_DTRDSR = $1;
PCF_INTTIMEOUTS = $80;
PCF_PARITY_CHECK = $8;
PCF_RLSD = $4;
PCF_RTSCTS = $2;
PCF_SETXCHAR = $20;
PCF_SPECIALCHARS = $100;
PCF_TOTALTIMEOUTS = $40;
PCF_XONXOFF = $10;
SP_BAUD = $2;
SP_DATABITS = $4;
SP_HANDSHAKING = $10;
SP_PARITY = $1;
SP_PARITY_CHECK = $20;
SP_RLSD = $40;
SP_STOPBITS = $8;
DATABITS_5 = 1;
DATABITS_6 = 2;
DATABITS_7 = 4;
DATABITS_8 = 8;
DATABITS_16 = 16;
DATABITS_16X = 32;
STOPBITS_10 = 1;
STOPBITS_15 = 2;
STOPBITS_20 = 4;
PARITY_NONE = 256;
PARITY_ODD = 512;
PARITY_EVEN = 1024;
PARITY_MARK = 2048;
PARITY_SPACE = 4096;
COMMPROP_INITIALIZED = $e73cf52e;
{ DCB structure }
CBR_110 = 110;
CBR_300 = 300;
CBR_600 = 600;
CBR_1200 = 1200;
CBR_2400 = 2400;
CBR_4800 = 4800;
CBR_9600 = 9600;
CBR_14400 = 14400;
CBR_19200 = 19200;
CBR_38400 = 38400;
CBR_56000 = 56000;
CBR_57600 = 57600;
CBR_115200 = 115200;
CBR_128000 = 128000;
CBR_256000 = 256000;
DTR_CONTROL_DISABLE = 0;
DTR_CONTROL_ENABLE = 1;
DTR_CONTROL_HANDSHAKE = 2;
RTS_CONTROL_DISABLE = 0;
RTS_CONTROL_ENABLE = 1;
RTS_CONTROL_HANDSHAKE = 2;
RTS_CONTROL_TOGGLE = 3;
EVENPARITY = 2;
MARKPARITY = 3;
NOPARITY = 0;
ODDPARITY = 1;
SPACEPARITY = 4;
ONESTOPBIT = 0;
ONE5STOPBITS = 1;
TWOSTOPBITS = 2;
{ Debugging events }
CREATE_PROCESS_DEBUG_EVENT = 3;
CREATE_THREAD_DEBUG_EVENT = 2;
EXCEPTION_DEBUG_EVENT = 1;
EXIT_PROCESS_DEBUG_EVENT = 5;
EXIT_THREAD_DEBUG_EVENT = 4;
LOAD_DLL_DEBUG_EVENT = 6;
OUTPUT_DEBUG_STRING_EVENT = 8;
UNLOAD_DLL_DEBUG_EVENT = 7;
RIP_EVENT = 9;
{ PROCESS_HEAP_ENTRY structure }
PROCESS_HEAP_REGION = 1;
PROCESS_HEAP_UNCOMMITTED_RANGE = 2;
PROCESS_HEAP_ENTRY_BUSY = 4;
PROCESS_HEAP_ENTRY_MOVEABLE = 16;
PROCESS_HEAP_ENTRY_DDESHARE = 32;
{ Win32s }
HINSTANCE_ERROR = 32;
{ WIN32_STREAM_ID structure }
BACKUP_DATA = 1;
BACKUP_EA_DATA = 2;
BACKUP_SECURITY_DATA = 3;
BACKUP_ALTERNATE_DATA = 4;
BACKUP_LINK = 5;
STREAM_MODIFIED_WHEN_READ = 1;
STREAM_CONTAINS_SECURITY = 2;
{ STARTUPINFO structure }
STARTF_USESHOWWINDOW = 1;
STARTF_USEPOSITION = 4;
STARTF_USESIZE = 2;
STARTF_USECOUNTCHARS = 8;
STARTF_USEFILLATTRIBUTE = 16;
STARTF_RUNFULLSCREEN = 32;
STARTF_FORCEONFEEDBACK = 64;
STARTF_FORCEOFFFEEDBACK = 128;
STARTF_USESTDHANDLES = 256;
STARTF_USEHOTKEY = 512;
{ OSVERSIONINFO structure }
VER_PLATFORM_WIN32s = 0;
VER_PLATFORM_WIN32_WINDOWS = 1;
VER_PLATFORM_WIN32_NT = 2;
{ PROPSHEETPAGE structure }
MAXPROPPAGES = 100;
PSP_DEFAULT = 0;
PSP_DLGINDIRECT = 1;
PSP_HASHELP = 32;
PSP_USECALLBACK = 128;
PSP_USEHICON = 2;
PSP_USEICONID = 4;
PSP_USEREFPARENT = 64;
PSP_USETITLE = 8;
PSP_RTLREADING = 16;
{ PROPSHEETHEADER structure }
PSH_DEFAULT = 0;
PSH_HASHELP = 512;
PSH_MODELESS = 1024;
PSH_NOAPPLYNOW = 128;
PSH_PROPSHEETPAGE = 8;
PSH_PROPTITLE = 1;
PSH_USECALLBACK = 256;
PSH_USEHICON = 2;
PSH_USEICONID = 4;
PSH_USEPSTARTPAGE = 64;
PSH_WIZARD = 32;
PSH_RTLREADING = 2048;
PSCB_INITIALIZED = 1;
PSCB_PRECREATE = 2;
{ PSN_APPLY message }
PSNRET_NOERROR = 0;
PSNRET_INVALID_NOCHANGEPAGE = 2;
{ Property Sheet }
PSBTN_APPLYNOW = 4;
PSBTN_BACK = 0;
PSBTN_CANCEL = 5;
PSBTN_FINISH = 2;
PSBTN_HELP = 6;
PSBTN_NEXT = 1;
PSBTN_OK = 3;
PSWIZB_BACK = 1;
PSWIZB_NEXT = 2;
PSWIZB_FINISH = 4;
PSWIZB_DISABLEDFINISH = 8;
ID_PSREBOOTSYSTEM = 3;
ID_PSRESTARTWINDOWS = 2;
WIZ_BODYCX = 184;
WIZ_BODYX = 92;
WIZ_CXBMP = 80;
WIZ_CXDLG = 276;
WIZ_CYDLG = 140;
{ VX_FIXEDFILEINFO structure }
{ was #define dname def_expr }
function VS_FILE_INFO : LPTSTR;
{ return type might be wrong }
const
VS_VERSION_INFO = 1;
VS_FF_DEBUG = $1;
VS_FF_INFOINFERRED = $10;
VS_FF_PATCHED = $4;
VS_FF_PRERELEASE = $2;
VS_FF_PRIVATEBUILD = $8;
VS_FF_SPECIALBUILD = $20;
VOS_UNKNOWN = 0;
VOS_DOS = $10000;
VOS_OS216 = $20000;
VOS_OS232 = $30000;
VOS_NT = $40000;
VOS_DOS_WINDOWS16 = $10001;
VOS_DOS_WINDOWS32 = $10004;
VOS_OS216_PM16 = $20002;
VOS_OS232_PM32 = $30003;
VOS_NT_WINDOWS32 = $40004;
VFT_UNKNOWN = 0;
VFT_APP = $1;
VFT_DLL = $2;
VFT_DRV = $3;
VFT_FONT = $4;
VFT_VXD = $5;
VFT_STATIC_LIB = $7;
VFT2_UNKNOWN = 0;
VFT2_DRV_PRINTER = $1;
VFT2_DRV_KEYBOARD = $2;
VFT2_DRV_LANGUAGE = $3;
VFT2_DRV_DISPLAY = $4;
VFT2_DRV_MOUSE = $5;
VFT2_DRV_NETWORK = $6;
VFT2_DRV_SYSTEM = $7;
VFT2_DRV_INSTALLABLE = $8;
VFT2_DRV_SOUND = $9;
VFT2_FONT_RASTER = $1;
VFT2_FONT_VECTOR = $2;
VFT2_FONT_TRUETYPE = $3;
{ PANOSE structure }
PAN_ANY = 0;
PAN_NO_FIT = 1;
PAN_FAMILY_TEXT_DISPLAY = 2;
PAN_FAMILY_SCRIPT = 3;
PAN_FAMILY_DECORATIVE = 4;
PAN_FAMILY_PICTORIAL = 5;
PAN_SERIF_COVE = 2;
PAN_SERIF_OBTUSE_COVE = 3;
PAN_SERIF_SQUARE_COVE = 4;
PAN_SERIF_OBTUSE_SQUARE_COVE = 5;
PAN_SERIF_SQUARE = 6;
PAN_SERIF_THIN = 7;
PAN_SERIF_BONE = 8;
PAN_SERIF_EXAGGERATED = 9;
PAN_SERIF_TRIANGLE = 10;
PAN_SERIF_NORMAL_SANS = 11;
PAN_SERIF_OBTUSE_SANS = 12;
PAN_SERIF_PERP_SANS = 13;
PAN_SERIF_FLARED = 14;
PAN_SERIF_ROUNDED = 15;
PAN_WEIGHT_VERY_LIGHT = 2;
PAN_WEIGHT_LIGHT = 3;
PAN_WEIGHT_THIN = 4;
PAN_WEIGHT_BOOK = 5;
PAN_WEIGHT_MEDIUM = 6;
PAN_WEIGHT_DEMI = 7;
PAN_WEIGHT_BOLD = 8;
PAN_WEIGHT_HEAVY = 9;
PAN_WEIGHT_BLACK = 10;
PAN_WEIGHT_NORD = 11;
PAN_PROP_OLD_STYLE = 2;
PAN_PROP_MODERN = 3;
PAN_PROP_EVEN_WIDTH = 4;
PAN_PROP_EXPANDED = 5;
PAN_PROP_CONDENSED = 6;
PAN_PROP_VERY_EXPANDED = 7;
PAN_PROP_VERY_CONDENSED = 8;
PAN_PROP_MONOSPACED = 9;
PAN_CONTRAST_NONE = 2;
PAN_CONTRAST_VERY_LOW = 3;
PAN_CONTRAST_LOW = 4;
PAN_CONTRAST_MEDIUM_LOW = 5;
PAN_CONTRAST_MEDIUM = 6;
PAN_CONTRAST_MEDIUM_HIGH = 7;
PAN_CONTRAST_HIGH = 8;
PAN_CONTRAST_VERY_HIGH = 9;
PAN_STROKE_GRADUAL_DIAG = 2;
PAN_STROKE_GRADUAL_TRAN = 3;
PAN_STROKE_GRADUAL_VERT = 4;
PAN_STROKE_GRADUAL_HORZ = 5;
PAN_STROKE_RAPID_VERT = 6;
PAN_STROKE_RAPID_HORZ = 7;
PAN_STROKE_INSTANT_VERT = 8;
PAN_STRAIGHT_ARMS_HORZ = 2;
PAN_STRAIGHT_ARMS_WEDGE = 3;
PAN_STRAIGHT_ARMS_VERT = 4;
PAN_STRAIGHT_ARMS_SINGLE_SERIF = 5;
PAN_STRAIGHT_ARMS_DOUBLE_SERIF = 6;
PAN_BENT_ARMS_HORZ = 7;
PAN_BENT_ARMS_VERT = 9;
PAN_BENT_ARMS_WEDGE = 8;
PAN_BENT_ARMS_SINGLE_SERIF = 10;
PAN_BENT_ARMS_DOUBLE_SERIF = 11;
PAN_LETT_NORMAL_CONTACT = 2;
PAN_LETT_NORMAL_WEIGHTED = 3;
PAN_LETT_NORMAL_BOXED = 4;
PAN_LETT_NORMAL_FLATTENED = 5;
PAN_LETT_NORMAL_ROUNDED = 6;
PAN_LETT_NORMAL_OFF_CENTER = 7;
PAN_LETT_NORMAL_SQUARE = 8;
PAN_LETT_OBLIQUE_CONTACT = 9;
PAN_LETT_OBLIQUE_WEIGHTED = 10;
PAN_LETT_OBLIQUE_BOXED = 11;
PAN_LETT_OBLIQUE_FLATTENED = 12;
PAN_LETT_OBLIQUE_ROUNDED = 13;
PAN_LETT_OBLIQUE_OFF_CENTER = 14;
PAN_LETT_OBLIQUE_SQUARE = 15;
PAN_MIDLINE_STANDARD_TRIMMED = 2;
PAN_MIDLINE_STANDARD_POINTED = 3;
PAN_MIDLINE_STANDARD_SERIFED = 4;
PAN_MIDLINE_HIGH_TRIMMED = 5;
PAN_MIDLINE_HIGH_POINTED = 6;
PAN_MIDLINE_HIGH_SERIFED = 7;
PAN_MIDLINE_CONSTANT_TRIMMED = 8;
PAN_MIDLINE_CONSTANT_POINTED = 9;
PAN_MIDLINE_CONSTANT_SERIFED = 10;
PAN_MIDLINE_LOW_TRIMMED = 11;
PAN_MIDLINE_LOW_POINTED = 12;
PAN_MIDLINE_LOW_SERIFED = 13;
PAN_XHEIGHT_CONSTANT_SMALL = 2;
PAN_XHEIGHT_CONSTANT_STD = 3;
PAN_XHEIGHT_CONSTANT_LARGE = 4;
PAN_XHEIGHT_DUCKING_SMALL = 5;
PAN_XHEIGHT_DUCKING_STD = 6;
PAN_XHEIGHT_DUCKING_LARGE = 7;
{ PALETTENTRY structure }
PC_EXPLICIT = 2;
PC_NOCOLLAPSE = 4;
PC_RESERVED = 1;
{ LOGBRUSH structure }
BS_DIBPATTERN = 5;
BS_DIBPATTERN8X8 = 8;
BS_DIBPATTERNPT = 6;
BS_HATCHED = 2;
BS_HOLLOW = 1;
BS_NULL = 1;
BS_PATTERN = 3;
BS_PATTERN8X8 = 7;
BS_SOLID = 0;
{ DEVMODE structure }
DM_ORIENTATION = $1;
DM_PAPERSIZE = $2;
DM_PAPERLENGTH = $4;
DM_PAPERWIDTH = $8;
DM_SCALE = $10;
DM_COPIES = $100;
DM_DEFAULTSOURCE = $200;
DM_PRINTQUALITY = $400;
DM_COLOR = $800;
DM_DUPLEX = $1000;
DM_YRESOLUTION = $2000;
DM_TTOPTION = $4000;
DM_COLLATE = $8000;
DM_FORMNAME = $10000;
DM_LOGPIXELS = $20000;
{DM_BITSPERPEL = $40000;
DM_PELSWIDTH = $80000;
DM_PELSHEIGHT = $100000;
DM_DISPLAYFLAGS = $200000;
DM_DISPLAYFREQUENCY = $400000;already above }
DM_ICMMETHOD = $800000;
DM_ICMINTENT = $1000000;
DM_MEDIATYPE = $2000000;
DM_DITHERTYPE = $4000000;
DMORIENT_LANDSCAPE = 2;
DMORIENT_PORTRAIT = 1;
DMPAPER_LETTER = 1;
DMPAPER_LEGAL = 5;
DMPAPER_A4 = 9;
DMPAPER_CSHEET = 24;
DMPAPER_DSHEET = 25;
DMPAPER_ESHEET = 26;
DMPAPER_LETTERSMALL = 2;
DMPAPER_TABLOID = 3;
DMPAPER_LEDGER = 4;
DMPAPER_STATEMENT = 6;
DMPAPER_EXECUTIVE = 7;
DMPAPER_A3 = 8;
DMPAPER_A4SMALL = 10;
DMPAPER_A5 = 11;
DMPAPER_B4 = 12;
DMPAPER_B5 = 13;
DMPAPER_FOLIO = 14;
DMPAPER_QUARTO = 15;
DMPAPER_10X14 = 16;
DMPAPER_11X17 = 17;
DMPAPER_NOTE = 18;
DMPAPER_ENV_9 = 19;
DMPAPER_ENV_10 = 20;
DMPAPER_ENV_11 = 21;
DMPAPER_ENV_12 = 22;
DMPAPER_ENV_14 = 23;
DMPAPER_ENV_DL = 27;
DMPAPER_ENV_C5 = 28;
DMPAPER_ENV_C3 = 29;
DMPAPER_ENV_C4 = 30;
DMPAPER_ENV_C6 = 31;
DMPAPER_ENV_C65 = 32;
DMPAPER_ENV_B4 = 33;
DMPAPER_ENV_B5 = 34;
DMPAPER_ENV_B6 = 35;
DMPAPER_ENV_ITALY = 36;
DMPAPER_ENV_MONARCH = 37;
DMPAPER_ENV_PERSONAL = 38;
DMPAPER_FANFOLD_US = 39;
DMPAPER_FANFOLD_STD_GERMAN = 40;
DMPAPER_FANFOLD_LGL_GERMAN = 41;
DMRES_HIGH = -(4);
DMRES_MEDIUM = -(3);
DMRES_LOW = -(2);
DMRES_DRAFT = -(1);
DMCOLOR_COLOR = 2;
DMCOLOR_MONOCHROME = 1;
DMDUP_SIMPLEX = 1;
DMDUP_HORIZONTAL = 3;
DMDUP_VERTICAL = 2;
DMTT_BITMAP = 1;
DMTT_DOWNLOAD = 2;
DMTT_SUBDEV = 3;
DMCOLLATE_TRUE = 1;
DMCOLLATE_FALSE = 0;
DM_GRAYSCALE = 1;
DM_INTERLACED = 2;
DMICMMETHOD_NONE = 1;
DMICMMETHOD_SYSTEM = 2;
DMICMMETHOD_DRIVER = 3;
DMICMMETHOD_DEVICE = 4;
DMICMMETHOD_USER = 256;
DMICM_SATURATE = 1;
DMICM_CONTRAST = 2;
DMICM_COLORMETRIC = 3;
DMICM_USER = 256;
DMMEDIA_STANDARD = 1;
DMMEDIA_GLOSSY = 3;
DMMEDIA_TRANSPARENCY = 2;
DMMEDIA_USER = 256;
DMDITHER_NONE = 1;
DMDITHER_COARSE = 2;
DMDITHER_FINE = 3;
DMDITHER_LINEART = 4;
DMDITHER_GRAYSCALE = 10;
DMDITHER_USER = 256;
{ RGNDATAHEADER structure }
RDH_RECTANGLES = 1;
{ TTPOLYGONHEADER structure }
TT_POLYGON_TYPE = 24;
{ TTPOLYCURVE structure }
TT_PRIM_LINE = 1;
TT_PRIM_QSPLINE = 2;
{ GCP_RESULTS structure }
GCPCLASS_ARABIC = 2;
GCPCLASS_HEBREW = 2;
GCPCLASS_LATIN = 1;
GCPCLASS_LATINNUMBER = 5;
GCPCLASS_LOCALNUMBER = 4;
GCPCLASS_LATINNUMERICSEPARATOR = 7;
GCPCLASS_LATINNUMERICTERMINATOR = 6;
GCPCLASS_NEUTRAL = 3;
GCPCLASS_NUMERICSEPARATOR = 8;
GCPCLASS_PREBOUNDLTR = 128;
GCPCLASS_PREBOUNDRTL = 64;
GCPCLASS_POSTBOUNDLTR = 32;
GCPCLASS_POSTBOUNDRTL = 16;
GCPGLYPH_LINKBEFORE = 32768;
GCPGLYPH_LINKAFTER = 16384;
{ RASTERIZER_STATUS structure }
TT_AVAILABLE = 1;
TT_ENABLED = 2;
{ COLORADJUSTMENT structure }
CA_NEGATIVE = 1;
CA_LOG_FILTER = 2;
ILLUMINANT_DEVICE_DEFAULT = 0;
ILLUMINANT_A = 1;
ILLUMINANT_B = 2;
ILLUMINANT_C = 3;
ILLUMINANT_D50 = 4;
ILLUMINANT_D55 = 5;
ILLUMINANT_D65 = 6;
ILLUMINANT_D75 = 7;
ILLUMINANT_F2 = 8;
ILLUMINANT_TUNGSTEN = 1;
ILLUMINANT_DAYLIGHT = 3;
ILLUMINANT_FLUORESCENT = 8;
ILLUMINANT_NTSC = 3;
{ DOCINFO structure }
DI_APPBANDING = 1;
{ EMRMETAHEADER structure }
EMR_HEADER = 1;
ENHMETA_SIGNATURE = 1179469088;
{ RTF event masks }
ENM_CHANGE = 1;
ENM_CORRECTTEXT = 4194304;
ENM_DROPFILES = 1048576;
ENM_KEYEVENTS = 65536;
ENM_MOUSEEVENTS = 131072;
ENM_PROTECTED = 2097152;
ENM_REQUESTRESIZE = 262144;
ENM_SCROLL = 4;
ENM_SELCHANGE = 524288;
ENM_UPDATE = 2;
ENM_NONE = 0;
{ RTF styles }
ES_DISABLENOSCROLL = 8192;
ES_EX_NOCALLOLEINIT = 16777216;
ES_NOIME = 524288;
ES_SAVESEL = 32768;
ES_SELFIME = 262144;
ES_SUNKEN = 16384;
ES_VERTICAL = 4194304;
ES_SELECTIONBAR = 16777216;
{ EM_SETOPTIONS message }
ECOOP_SET = 1;
ECOOP_OR = 2;
ECOOP_AND = 3;
ECOOP_XOR = 4;
ECO_AUTOWORDSELECTION = 1;
ECO_AUTOVSCROLL = 64;
ECO_AUTOHSCROLL = 128;
ECO_NOHIDESEL = 256;
ECO_READONLY = 2048;
ECO_WANTRETURN = 4096;
ECO_SAVESEL = 32768;
ECO_SELECTIONBAR = 16777216;
ECO_VERTICAL = 4194304;
{ EM_SETCHARFORMAT message }
SCF_WORD = 2;
SCF_SELECTION = 1;
{ EM_STREAMOUT message }
SF_TEXT = 1;
SF_RTF = 2;
SF_RTFNOOBJS = 3;
SF_TEXTIZED = 4;
SFF_SELECTION = 32768;
SFF_PLAINRTF = 16384;
{ EM_FINDWORDBREAK message }
WB_CLASSIFY = 3;
{WB_ISDELIMITER = 2;
WB_LEFT = 0; already above }
WB_LEFTBREAK = 6;
WB_PREVBREAK = 6;
WB_MOVEWORDLEFT = 4;
WB_MOVEWORDPREV = 4;
WB_MOVEWORDRIGHT = 5;
WB_MOVEWORDNEXT = 5;
{WB_RIGHT = 1;already above }
WB_RIGHTBREAK = 7;
WB_NEXTBREAK = 7;
{ EM_GETPUNCTUATION message }
PC_LEADING = 2;
PC_FOLLOWING = 1;
PC_DELIMITER = 4;
PC_OVERFLOW = 3;
{ EM_SETWORDWRAPMODE message }
WBF_WORDWRAP = 16;
WBF_WORDBREAK = 32;
WBF_OVERFLOW = 64;
WBF_LEVEL1 = 128;
WBF_LEVEL2 = 256;
WBF_CUSTOM = 512;
WBF_BREAKAFTER = 64;
WBF_BREAKLINE = 32;
WBF_ISWHITE = 16;
{ CHARFORMAT structure }
CFM_BOLD = 1;
CFM_COLOR = 1073741824;
CFM_FACE = 536870912;
CFM_ITALIC = 2;
CFM_OFFSET = 268435456;
CFM_PROTECTED = 16;
CFM_SIZE = $80000000;
CFM_STRIKEOUT = 8;
CFM_UNDERLINE = 4;
CFE_AUTOCOLOR = 1073741824;
CFE_BOLD = 1;
CFE_ITALIC = 2;
CFE_STRIKEOUT = 8;
CFE_UNDERLINE = 4;
CFE_PROTECTED = 16;
{ PARAFORMAT structure }
PFM_ALIGNMENT = 8;
PFM_NUMBERING = 32;
PFM_OFFSET = 4;
PFM_OFFSETINDENT = $80000000;
PFM_RIGHTINDENT = 2;
PFM_STARTINDENT = 1;
PFM_TABSTOPS = 16;
PFN_BULLET = 1;
PFA_LEFT = 1;
PFA_RIGHT = 2;
PFA_CENTER = 3;
{ SELCHANGE structure }
SEL_EMPTY = 0;
SEL_TEXT = 1;
SEL_OBJECT = 2;
SEL_MULTICHAR = 4;
SEL_MULTIOBJECT = 8;
{ RTF clipboard formats }
CF_RTF = 'Rich Text Format';
CF_RETEXTOBJ = 'RichEdit Text and Objects';
{ DRAWITEMSTRUCT structure }
ODT_BUTTON = 4;
ODT_COMBOBOX = 3;
ODT_LISTBOX = 2;
ODT_LISTVIEW = 102;
ODT_MENU = 1;
ODT_STATIC = 5;
ODT_TAB = 101;
ODT_HEADER = 100;
ODA_DRAWENTIRE = 1;
ODA_FOCUS = 4;
ODA_SELECT = 2;
ODS_CHECKED = 8;
ODS_COMBOBOXEDIT = 4096;
ODS_DEFAULT = 32;
ODS_DISABLED = 4;
ODS_FOCUS = 16;
ODS_GRAYED = 2;
ODS_SELECTED = 1;
{ Common control window classes }
ANIMATE_CLASSW = 'SysAnimate32';
HOTKEY_CLASSW = 'msctls_hotkey32';
PROGRESS_CLASSW = 'msctls_progress32';
STATUSCLASSNAMEW = 'msctls_statusbar32';
TOOLBARCLASSNAMEW = 'ToolbarWindow32';
TOOLTIPS_CLASSW = 'tooltips_class32';
TRACKBAR_CLASSW = 'msctls_trackbar32';
UPDOWN_CLASSW = 'msctls_updown32';
WC_HEADERW = 'SysHeader32';
WC_LISTVIEWW = 'SysListView32';
WC_TABCONTROLW = 'SysTabControl32';
WC_TREEVIEWW = 'SysTreeView32';
{ Common control styles }
CCS_ADJUSTABLE = $20;
CCS_BOTTOM = $3;
CCS_NODIVIDER = $40;
CCS_NOMOVEY = $2;
CCS_NOPARENTALIGN = $8;
CCS_NORESIZE = $4;
CCS_TOP = $1;
ANIMATE_CLASSA = 'SysAnimate32';
HOTKEY_CLASSA = 'msctls_hotkey32';
PROGRESS_CLASSA = 'msctls_progress32';
STATUSCLASSNAMEA = 'msctls_statusbar32';
TOOLBARCLASSNAMEA = 'ToolbarWindow32';
TOOLTIPS_CLASSA = 'tooltips_class32';
TRACKBAR_CLASSA = 'msctls_trackbar32';
UPDOWN_CLASSA = 'msctls_updown32';
WC_HEADERA = 'SysHeader32';
WC_LISTVIEWA = 'SysListView32';
WC_TABCONTROLA = 'SysTabControl32';
WC_TREEVIEWA = 'SysTreeView32';
{$ifdef UNICODE}
const
ANIMATE_CLASS = ANIMATE_CLASSW;
HOTKEY_CLASS = HOTKEY_CLASSW;
PROGRESS_CLASS = PROGRESS_CLASSW;
STATUSCLASSNAME = STATUSCLASSNAMEW;
TOOLBARCLASSNAME = TOOLBARCLASSNAMEW;
TOOLTIPS_CLASS = TOOLTIPS_CLASSW;
TRACKBAR_CLASS = TRACKBAR_CLASSW;
UPDOWN_CLASS = UPDOWN_CLASSW;
WC_HEADER = WC_HEADERW;
WC_LISTVIEW = WC_LISTVIEWW;
WC_TABCONTROL = WC_TABCONTROLW;
WC_TREEVIEW = WC_TREEVIEWW;
{$else}
const
ANIMATE_CLASS = ANIMATE_CLASSA;
HOTKEY_CLASS = HOTKEY_CLASSA;
PROGRESS_CLASS = PROGRESS_CLASSA;
STATUSCLASSNAME = STATUSCLASSNAMEA;
TOOLBARCLASSNAME = TOOLBARCLASSNAMEA;
TOOLTIPS_CLASS = TOOLTIPS_CLASSA;
TRACKBAR_CLASS = TRACKBAR_CLASSA;
UPDOWN_CLASS = UPDOWN_CLASSA;
WC_HEADER = WC_HEADERA;
WC_LISTVIEW = WC_LISTVIEWA;
WC_TABCONTROL = WC_TABCONTROLA;
WC_TREEVIEW = WC_TREEVIEWA;
{$endif}
{ UNICODE }
{ Header control styles }
const
HDS_BUTTONS = 2;
HDS_HIDDEN = 8;
HDS_HORZ = 0;
{ HD_ITEM structure }
HDI_BITMAP = 16;
HDI_FORMAT = 4;
HDI_HEIGHT = 1;
HDI_LPARAM = 8;
HDI_TEXT = 2;
HDI_WIDTH = 1;
HDF_CENTER = 2;
HDF_LEFT = 0;
HDF_RIGHT = 1;
HDF_RTLREADING = 4;
HDF_BITMAP = 8192;
HDF_OWNERDRAW = 32768;
HDF_STRING = 16384;
HDF_JUSTIFYMASK = 3;
{ HD_HITTESTINFO structure }
HHT_NOWHERE = 1;
HHT_ONDIVIDER = 4;
HHT_ONDIVOPEN = 8;
HHT_ONHEADER = 2;
HHT_TOLEFT = 2048;
HHT_TORIGHT = 1024;
{ TBADDBITMAP structure }
{ was #define dname def_expr }
function HINST_COMMCTRL : HINST;
const
IDB_STD_LARGE_COLOR = 1;
IDB_STD_SMALL_COLOR = 0;
IDB_VIEW_LARGE_COLOR = 5;
IDB_VIEW_SMALL_COLOR = 4;
STD_COPY = 1;
STD_CUT = 0;
STD_DELETE = 5;
STD_FILENEW = 6;
STD_FILEOPEN = 7;
STD_FILESAVE = 8;
STD_FIND = 12;
STD_HELP = 11;
STD_PASTE = 2;
STD_PRINT = 14;
STD_PRINTPRE = 9;
STD_PROPERTIES = 10;
STD_REDOW = 4;
STD_REPLACE = 13;
STD_UNDO = 3;
VIEW_LARGEICONS = 0;
VIEW_SMALLICONS = 1;
VIEW_LIST = 2;
VIEW_DETAILS = 3;
VIEW_SORTNAME = 4;
VIEW_SORTSIZE = 5;
VIEW_SORTDATE = 6;
VIEW_SORTTYPE = 7;
{ Toolbar styles }
TBSTYLE_ALTDRAG = 1024;
TBSTYLE_TOOLTIPS = 256;
TBSTYLE_WRAPABLE = 512;
TBSTYLE_BUTTON = 0;
TBSTYLE_CHECK = 2;
TBSTYLE_CHECKGROUP = 6;
TBSTYLE_GROUP = 4;
TBSTYLE_SEP = 1;
{ Toolbar states }
TBSTATE_CHECKED = 1;
TBSTATE_ENABLED = 4;
TBSTATE_HIDDEN = 8;
TBSTATE_INDETERMINATE = 16;
TBSTATE_PRESSED = 2;
TBSTATE_WRAP = 32;
{ Tooltip styles }
TTS_ALWAYSTIP = 1;
TTS_NOPREFIX = 2;
{ TOOLINFO structure }
TTF_IDISHWND = 1;
TTF_CENTERTIP = 2;
TTF_RTLREADING = 4;
TTF_SUBCLASS = 16;
{ TTM_SETDELAYTIME message }
TTDT_AUTOMATIC = 0;
TTDT_AUTOPOP = 2;
TTDT_INITIAL = 3;
TTDT_RESHOW = 1;
{ Status window }
SBARS_SIZEGRIP = 256;
{SBARS_SIZEGRIP = 256;already above }
{ DL_DRAGGING message }
DL_MOVECURSOR = 3;
DL_COPYCURSOR = 2;
DL_STOPCURSOR = 1;
{ Up-down control styles }
UDS_ALIGNLEFT = 8;
UDS_ALIGNRIGHT = 4;
UDS_ARROWKEYS = 32;
UDS_AUTOBUDDY = 16;
UDS_HORZ = 64;
UDS_NOTHOUSANDS = 128;
UDS_SETBUDDYINT = 2;
UDS_WRAP = 1;
{ UDM_SETRANGE message }
UD_MAXVAL = 32767;
UD_MINVAL = -(32767);
{ HKM_GETHOTKEY message }
HOTKEYF_ALT = 4;
HOTKEYF_CONTROL = 2;
HOTKEYF_EXT = 8;
HOTKEYF_SHIFT = 1;
{ HKM_SETRULES message }
HKCOMB_A = 8;
HKCOMB_C = 4;
HKCOMB_CA = 64;
HKCOMB_NONE = 1;
HKCOMB_S = 2;
HKCOMB_SA = 32;
HKCOMB_SC = 16;
HKCOMB_SCA = 128;
{ Trackbar styles }
TBS_HORZ = 0;
TBS_VERT = 2;
TBS_AUTOTICKS = 1;
TBS_NOTICKS = 16;
TBS_TOP = 4;
TBS_BOTTOM = 0;
TBS_LEFT = 4;
TBS_RIGHT = 0;
TBS_BOTH = 8;
TBS_ENABLESELRANGE = 32;
TBS_FIXEDLENGTH = 64;
TBS_NOTHUMB = 128;
TB_BOTTOM = 7;
TB_ENDTRACK = 8;
TB_LINEDOWN = 1;
TB_LINEUP = 0;
TB_PAGEDOWN = 3;
TB_PAGEUP = 2;
TB_THUMBPOSITION = 4;
TB_THUMBTRACK = 5;
TB_TOP = 6;
{ List view styles }
LVS_ALIGNLEFT = 2048;
LVS_ALIGNTOP = 0;
LVS_AUTOARRANGE = 256;
LVS_EDITLABELS = 512;
LVS_ICON = 0;
LVS_LIST = 3;
LVS_NOCOLUMNHEADER = 16384;
LVS_NOLABELWRAP = 128;
LVS_NOSCROLL = 8192;
LVS_NOSORTHEADER = 32768;
LVS_OWNERDRAWFIXED = 1024;
LVS_REPORT = 1;
LVS_SHAREIMAGELISTS = 64;
LVS_SHOWSELALWAYS = 8;
LVS_SINGLESEL = 4;
LVS_SMALLICON = 2;
LVS_SORTASCENDING = 16;
LVS_SORTDESCENDING = 32;
LVS_TYPESTYLEMASK = 64512;
LVSIL_NORMAL = 0;
LVSIL_SMALL = 1;
LVSIL_STATE = 2;
LVIS_CUT = 4;
LVIS_DROPHILITED = 8;
LVIS_FOCUSED = 1;
LVIS_SELECTED = 2;
LVIS_OVERLAYMASK = 3840;
LVIS_STATEIMAGEMASK = 61440;
{ was #define dname def_expr }
function LPSTR_TEXTCALLBACKW : LPWSTR;
{ was #define dname def_expr }
function LPSTR_TEXTCALLBACKA : LPSTR;
{$ifdef UNICODE}
{const this is a function in fact !!
LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKW;}
function LPSTR_TEXTCALLBACK : LPWSTR;
{$else}
{const
LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKA; }
function LPSTR_TEXTCALLBACK : LPSTR;
{$endif}
{ UNICODE }
{ LV_ITEM structure }
const
LVIF_TEXT = 1;
LVIF_IMAGE = 2;
LVIF_PARAM = 4;
LVIF_STATE = 8;
LVIF_DI_SETITEM = 4096;
{ LVM_GETNEXTITEM structure }
LVNI_ABOVE = 256;
LVNI_ALL = 0;
LVNI_BELOW = 512;
LVNI_TOLEFT = 1024;
LVNI_TORIGHT = 2048;
LVNI_CUT = 4;
LVNI_DROPHILITED = 8;
LVNI_FOCUSED = 1;
LVNI_SELECTED = 2;
{ LV_FINDINFO structure }
LVFI_PARAM = 1;
LVFI_PARTIAL = 8;
LVFI_STRING = 2;
LVFI_WRAP = 32;
LVFI_NEARESTXY = 64;
{ LV_HITTESTINFO structure }
LVHT_ABOVE = 8;
LVHT_BELOW = 16;
LVHT_NOWHERE = 1;
LVHT_ONITEMICON = 2;
LVHT_ONITEMLABEL = 4;
LVHT_ONITEMSTATEICON = 8;
LVHT_TOLEFT = 64;
LVHT_TORIGHT = 32;
{ LV_COLUMN structure }
LVCF_FMT = 1;
LVCF_SUBITEM = 8;
LVCF_TEXT = 4;
LVCF_WIDTH = 2;
LVCFMT_CENTER = 2;
LVCFMT_LEFT = 0;
LVCFMT_RIGHT = 1;
{ ListView_GetItemRect }
LVIR_BOUNDS = 0;
LVIR_ICON = 1;
LVIR_LABEL = 2;
LVIR_SELECTBOUNDS = 3;
{ LVM_ARRANGE message }
LVA_ALIGNLEFT = 1;
LVA_ALIGNTOP = 2;
LVA_DEFAULT = 0;
LVA_SNAPTOGRID = 5;
{ LVM_SETCOLUMNWIDTH message }
LVSCW_AUTOSIZE = -(1);
LVSCW_AUTOSIZE_USEHEADER = -(2);
{ Tree View styles }
TVS_DISABLEDRAGDROP = 16;
TVS_EDITLABELS = 8;
TVS_HASBUTTONS = 1;
TVS_HASLINES = 2;
TVS_LINESATROOT = 4;
TVS_SHOWSELALWAYS = 32;
{ Tree View states }
TVIS_BOLD = 16;
TVIS_CUT = 4;
TVIS_DROPHILITED = 8;
TVIS_EXPANDED = 32;
TVIS_EXPANDEDONCE = 64;
TVIS_FOCUSED = 1;
TVIS_OVERLAYMASK = 3840;
TVIS_SELECTED = 2;
TVIS_STATEIMAGEMASK = 61440;
TVIS_USERMASK = 61440;
{ TV_ITEM structure }
TVIF_CHILDREN = 64;
TVIF_HANDLE = 16;
TVIF_IMAGE = 2;
TVIF_PARAM = 4;
TVIF_SELECTEDIMAGE = 32;
TVIF_STATE = 8;
TVIF_TEXT = 1;
I_CHILDRENCALLBACK = -(1);
I_IMAGECALLBACK = -(1);
{ TV_INSERTSTRUCT structure }
{ added manually PM }
type
{ warning TREEITEM is not defined in the C headers }
TREEITEM = record
end;
HTREEITEM = ^TREEITEM;
{ was #define dname def_expr }
function TVI_ROOT : HTREEITEM;
{ was #define dname def_expr }
function TVI_FIRST : HTREEITEM;
{ was #define dname def_expr }
function TVI_LAST : HTREEITEM;
{ was #define dname def_expr }
function TVI_SORT : HTREEITEM;
{ TV_HITTESTINFO structure }
const
TVHT_ABOVE = 256;
TVHT_BELOW = 512;
TVHT_NOWHERE = 1;
TVHT_ONITEM = 70;
TVHT_ONITEMBUTTON = 16;
TVHT_ONITEMICON = 2;
TVHT_ONITEMINDENT = 8;
TVHT_ONITEMLABEL = 4;
TVHT_ONITEMRIGHT = 32;
TVHT_ONITEMSTATEICON = 64;
TVHT_TOLEFT = 2048;
TVHT_TORIGHT = 1024;
{ TVM_EXPAND message }
TVE_COLLAPSE = 1;
TVE_COLLAPSERESET = 32768;
TVE_EXPAND = 2;
TVE_TOGGLE = 3;
{ TVM_GETIMAGELIST message }
TVSIL_NORMAL = 0;
TVSIL_STATE = 2;
{ TVM_GETNEXTITEM message }
TVGN_CARET = 9;
TVGN_CHILD = 4;
TVGN_DROPHILITE = 8;
TVGN_FIRSTVISIBLE = 5;
TVGN_NEXT = 1;
TVGN_NEXTVISIBLE = 6;
TVGN_PARENT = 3;
TVGN_PREVIOUS = 2;
TVGN_PREVIOUSVISIBLE = 7;
TVGN_ROOT = 0;
{ TVN_SELCHANGED message }
TVC_BYKEYBOARD = 2;
TVC_BYMOUSE = 1;
TVC_UNKNOWN = 0;
{ Tab control styles }
TCS_BUTTONS = 256;
TCS_FIXEDWIDTH = 1024;
TCS_FOCUSNEVER = 32768;
TCS_FOCUSONBUTTONDOWN = 4096;
TCS_FORCEICONLEFT = 16;
TCS_FORCELABELLEFT = 32;
TCS_MULTILINE = 512;
TCS_OWNERDRAWFIXED = 8192;
TCS_RAGGEDRIGHT = 2048;
TCS_RIGHTJUSTIFY = 0;
TCS_SINGLELINE = 0;
TCS_TABS = 0;
TCS_TOOLTIPS = 16384;
{ TC_ITEM structure }
TCIF_TEXT = 1;
TCIF_IMAGE = 2;
TCIF_PARAM = 8;
TCIF_RTLREADING = 4;
{ TC_HITTESTINFO structure }
TCHT_NOWHERE = 1;
TCHT_ONITEM = 6;
TCHT_ONITEMICON = 2;
TCHT_ONITEMLABEL = 4;
{ Animation control styles }
ACS_AUTOPLAY = 4;
ACS_CENTER = 1;
ACS_TRANSPARENT = 2;
{ MODEMDEVCAPS structure }
DIALOPTION_BILLING = 64;
DIALOPTION_QUIET = 128;
DIALOPTION_DIALTONE = 256;
MDMVOLFLAG_LOW = 1;
MDMVOLFLAG_MEDIUM = 2;
MDMVOLFLAG_HIGH = 4;
MDMVOL_LOW = 0;
MDMVOL_MEDIUM = 1;
MDMVOL_HIGH = 2;
MDMSPKRFLAG_OFF = 1;
MDMSPKRFLAG_DIAL = 2;
MDMSPKRFLAG_ON = 4;
MDMSPKRFLAG_CALLSETUP = 8;
MDMSPKR_OFF = 0;
MDMSPKR_DIAL = 1;
MDMSPKR_ON = 2;
MDMSPKR_CALLSETUP = 3;
MDM_BLIND_DIAL = 512;
MDM_CCITT_OVERRIDE = 64;
MDM_CELLULAR = 8;
MDM_COMPRESSION = 1;
MDM_ERROR_CONTROL = 2;
MDM_FLOWCONTROL_HARD = 16;
MDM_FLOWCONTROL_SOFT = 32;
MDM_FORCED_EC = 4;
MDM_SPEED_ADJUST = 128;
MDM_TONE_DIAL = 256;
MDM_V23_OVERRIDE = 1024;
{ Languages }
LANG_BULGARIAN = 2;
LANG_CHINESE = 4;
LANG_CROATIAN = 26;
LANG_CZECH = 5;
LANG_DANISH = 6;
LANG_DUTCH = 19;
LANG_ENGLISH = 9;
LANG_FINNISH = 11;
LANG_FRENCH = 12;
LANG_GERMAN = 7;
LANG_GREEK = 8;
LANG_HUNGARIAN = 14;
LANG_ICELANDIC = 15;
LANG_ITALIAN = 16;
LANG_JAPANESE = 17;
LANG_KOREAN = 18;
LANG_NEUTRAL = 0;
LANG_NORWEGIAN = 20;
LANG_POLISH = 21;
LANG_PORTUGUESE = 22;
LANG_ROMANIAN = 24;
LANG_RUSSIAN = 25;
LANG_SLOVAK = 27;
LANG_SLOVENIAN = 36;
LANG_SPANISH = 10;
LANG_SWEDISH = 29;
LANG_TURKISH = 31;
SUBLANG_CHINESE_SIMPLIFIED = 2;
SUBLANG_CHINESE_TRADITIONAL = 1;
SUBLANG_CHINESE_HONGKONG = 3;
SUBLANG_CHINESE_SINGAPORE = 4;
SUBLANG_DEFAULT = 1;
SUBLANG_DUTCH = 1;
SUBLANG_DUTCH_BELGIAN = 2;
SUBLANG_ENGLISH_AUS = 3;
SUBLANG_ENGLISH_CAN = 4;
SUBLANG_ENGLISH_EIRE = 6;
SUBLANG_ENGLISH_NZ = 5;
SUBLANG_ENGLISH_UK = 2;
SUBLANG_ENGLISH_US = 1;
SUBLANG_FRENCH = 1;
SUBLANG_FRENCH_BELGIAN = 2;
SUBLANG_FRENCH_CANADIAN = 3;
SUBLANG_FRENCH_SWISS = 4;
SUBLANG_GERMAN = 1;
SUBLANG_GERMAN_AUSTRIAN = 3;
SUBLANG_GERMAN_SWISS = 2;
SUBLANG_ITALIAN = 1;
SUBLANG_ITALIAN_SWISS = 2;
SUBLANG_NEUTRAL = 0;
SUBLANG_NORWEGIAN_BOKMAL = 1;
SUBLANG_NORWEGIAN_NYNORSK = 2;
SUBLANG_PORTUGUESE = 2;
SUBLANG_PORTUGUESE_BRAZILIAN = 1;
SUBLANG_SPANISH = 1;
SUBLANG_SPANISH_MEXICAN = 2;
SUBLANG_SPANISH_MODERN = 3;
SUBLANG_SYS_DEFAULT = 2;
NLS_VALID_LOCALE_MASK = 1048575;
SORT_DEFAULT = 0;
SORT_JAPANESE_XJIS = 0;
SORT_JAPANESE_UNICODE = 1;
SORT_CHINESE_BIG5 = 0;
SORT_CHINESE_UNICODE = 1;
SORT_KOREAN_KSC = 0;
SORT_KOREAN_UNICODE = 1;
{ SYSTEM_INFO structure }
PROCESSOR_INTEL_386 = 386;
PROCESSOR_INTEL_486 = 486;
PROCESSOR_INTEL_PENTIUM = 586;
PROCESSOR_MIPS_R4000 = 4000;
PROCESSOR_ALPHA_21064 = 21064;
{ FSCTL_SET_COMPRESSION }
COMPRESSION_FORMAT_NONE = 0;
COMPRESSION_FORMAT_DEFAULT = 1;
COMPRESSION_FORMAT_LZNT1 = 2;
{ TAPE_GET_DRIVE_PARAMETERS structure }
TAPE_DRIVE_COMPRESSION = 131072;
TAPE_DRIVE_ECC = 65536;
TAPE_DRIVE_ERASE_BOP_ONLY = 64;
TAPE_DRIVE_ERASE_LONG = 32;
TAPE_DRIVE_ERASE_IMMEDIATE = 128;
TAPE_DRIVE_ERASE_SHORT = 16;
TAPE_DRIVE_FIXED = 1;
TAPE_DRIVE_FIXED_BLOCK = 1024;
TAPE_DRIVE_INITIATOR = 4;
TAPE_DRIVE_PADDING = 262144;
TAPE_DRIVE_GET_ABSOLUTE_BLK = 1048576;
TAPE_DRIVE_GET_LOGICAL_BLK = 2097152;
TAPE_DRIVE_REPORT_SMKS = 524288;
TAPE_DRIVE_SELECT = 2;
TAPE_DRIVE_SET_EOT_WZ_SIZE = 4194304;
TAPE_DRIVE_TAPE_CAPACITY = 256;
TAPE_DRIVE_TAPE_REMAINING = 512;
TAPE_DRIVE_VARIABLE_BLOCK = 2048;
TAPE_DRIVE_WRITE_PROTECT = 4096;
TAPE_DRIVE_ABS_BLK_IMMED = -(2147475456);
TAPE_DRIVE_ABSOLUTE_BLK = -(2147479552);
TAPE_DRIVE_END_OF_DATA = -(2147418112);
TAPE_DRIVE_FILEMARKS = -(2147221504);
TAPE_DRIVE_LOAD_UNLOAD = -(2147483647);
TAPE_DRIVE_LOAD_UNLD_IMMED = -(2147483616);
TAPE_DRIVE_LOCK_UNLOCK = -(2147483644);
TAPE_DRIVE_LOCK_UNLK_IMMED = -(2147483520);
TAPE_DRIVE_LOG_BLK_IMMED = -(2147450880);
TAPE_DRIVE_LOGICAL_BLK = -(2147467264);
TAPE_DRIVE_RELATIVE_BLKS = -(2147352576);
TAPE_DRIVE_REVERSE_POSITION = -(2143289344);
TAPE_DRIVE_REWIND_IMMEDIATE = -(2147483640);
TAPE_DRIVE_SEQUENTIAL_FMKS = -(2146959360);
TAPE_DRIVE_SEQUENTIAL_SMKS = -(2145386496);
TAPE_DRIVE_SET_BLOCK_SIZE = -(2147483632);
TAPE_DRIVE_SET_COMPRESSION = -(2147483136);
TAPE_DRIVE_SET_ECC = -(2147483392);
TAPE_DRIVE_SET_PADDING = -(2147482624);
TAPE_DRIVE_SET_REPORT_SMKS = -(2147481600);
TAPE_DRIVE_SETMARKS = -(2146435072);
TAPE_DRIVE_SPACE_IMMEDIATE = -(2139095040);
TAPE_DRIVE_TENSION = -(2147483646);
TAPE_DRIVE_TENSION_IMMED = -(2147483584);
TAPE_DRIVE_WRITE_FILEMARKS = -(2113929216);
TAPE_DRIVE_WRITE_LONG_FMKS = -(2013265920);
TAPE_DRIVE_WRITE_MARK_IMMED = -(1879048192);
TAPE_DRIVE_WRITE_SETMARKS = -(2130706432);
TAPE_DRIVE_WRITE_SHORT_FMKS = -(2080374784);
{ Standard rights }
STANDARD_RIGHTS_REQUIRED = $f0000;
STANDARD_RIGHTS_WRITE = $20000;
STANDARD_RIGHTS_READ = $20000;
STANDARD_RIGHTS_EXECUTE = $20000;
STANDARD_RIGHTS_ALL = $1f0000;
SPECIFIC_RIGHTS_ALL = $ffff;
{ ACCESS_MASK }
MAXIMUM_ALLOWED = $2000000;
GENERIC_ALL = $10000000;
{ SID }
SECURITY_NULL_RID = 0;
SECURITY_WORLD_RID = 0;
SECURITY_LOCAL_RID = 0;
SECURITY_CREATOR_OWNER_RID = 0;
SECURITY_CREATOR_GROUP_RID = $1;
SECURITY_DIALUP_RID = $1;
SECURITY_NETWORK_RID = $2;
SECURITY_BATCH_RID = $3;
SECURITY_INTERACTIVE_RID = $4;
SECURITY_LOGON_IDS_RID = $5;
SECURITY_LOGON_IDS_RID_COUNT = $3;
SECURITY_SERVICE_RID = $6;
SECURITY_LOCAL_SYSTEM_RID = $12;
SECURITY_BUILTIN_DOMAIN_RID = $20;
DOMAIN_USER_RID_ADMIN = $1f4;
DOMAIN_USER_RID_GUEST = $1f5;
DOMAIN_GROUP_RID_ADMINS = $200;
DOMAIN_GROUP_RID_USERS = $201;
DOMAIN_ALIAS_RID_ADMINS = $220;
DOMAIN_ALIAS_RID_USERS = $221;
DOMAIN_ALIAS_RID_GUESTS = $222;
DOMAIN_ALIAS_RID_POWER_USERS = $223;
DOMAIN_ALIAS_RID_ACCOUNT_OPS = $224;
DOMAIN_ALIAS_RID_SYSTEM_OPS = $225;
DOMAIN_ALIAS_RID_PRINT_OPS = $226;
DOMAIN_ALIAS_RID_BACKUP_OPS = $227;
DOMAIN_ALIAS_RID_REPLICATOR = $228;
{ TOKEN_GROUPS structure }
SE_GROUP_MANDATORY = $1;
SE_GROUP_ENABLED_BY_DEFAULT = $2;
SE_GROUP_ENABLED = $4;
SE_GROUP_OWNER = $8;
SE_GROUP_LOGON_ID = $c0000000;
{ ACL Defines }
ACL_REVISION = 2;
{ ACE_HEADER structure }
ACCESS_ALLOWED_ACE_TYPE = $0;
ACCESS_DENIED_ACE_TYPE = $1;
SYSTEM_AUDIT_ACE_TYPE = $2;
SYSTEM_ALARM_ACE_TYPE = $3;
{ ACE flags in the ACE_HEADER structure }
OBJECT_INHERIT_ACE = $1;
CONTAINER_INHERIT_ACE = $2;
NO_PROPAGATE_INHERIT_ACE = $4;
INHERIT_ONLY_ACE = $8;
SUCCESSFUL_ACCESS_ACE_FLAG = $40;
FAILED_ACCESS_ACE_FLAG = $80;
{ SECURITY_DESCRIPTOR_CONTROL }
{SECURITY_DESCRIPTOR_REVISION = 1;already defined above }
SECURITY_DESCRIPTOR_MIN_LENGTH = 20;
SE_OWNER_DEFAULTED = 1;
SE_GROUP_DEFAULTED = 2;
SE_DACL_PRESENT = 4;
SE_DACL_DEFAULTED = 8;
SE_SACL_PRESENT = 16;
SE_SACL_DEFAULTED = 32;
SE_SELF_RELATIVE = 32768;
{ PRIVILEGE_SET }
SE_PRIVILEGE_ENABLED_BY_DEFAULT = $1;
SE_PRIVILEGE_ENABLED = $2;
SE_PRIVILEGE_USED_FOR_ACCESS = $80000000;
PRIVILEGE_SET_ALL_NECESSARY = $1;
{ OPENFILENAME structure }
OFN_ALLOWMULTISELECT = $200;
OFN_CREATEPROMPT = $2000;
OFN_ENABLEHOOK = $20;
OFN_ENABLETEMPLATE = $40;
OFN_ENABLETEMPLATEHANDLE = $80;
OFN_EXPLORER = $80000;
OFN_EXTENSIONDIFFERENT = $400;
OFN_FILEMUSTEXIST = $1000;
OFN_HIDEREADONLY = $4;
OFN_LONGNAMES = $200000;
OFN_NOCHANGEDIR = $8;
OFN_NODEREFERENCELINKS = $100000;
OFN_NOLONGNAMES = $40000;
OFN_NONETWORKBUTTON = $20000;
OFN_NOREADONLYRETURN = $8000;
OFN_NOTESTFILECREATE = $10000;
OFN_NOVALIDATE = $100;
OFN_OVERWRITEPROMPT = $2;
OFN_PATHMUSTEXIST = $800;
OFN_READONLY = $1;
OFN_SHAREAWARE = $4000;
OFN_SHOWHELP = $10;
{ SHAREVISTRING message }
OFN_SHAREFALLTHROUGH = $2;
OFN_SHARENOWARN = $1;
OFN_SHAREWARN = 0;
{ Open/Save notifications }
CDN_INITDONE = $fffffda7;
CDN_SELCHANGE = $fffffda6;
CDN_FOLDERCHANGE = $fffffda5;
CDN_SHAREVIOLATION = $fffffda4;
CDN_HELP = $fffffda3;
CDN_FILEOK = $fffffda2;
CDN_TYPECHANGE = $fffffda1;
{ Open/Save messages }
CDM_GETFILEPATH = $465;
CDM_GETFOLDERIDLIST = $467;
CDM_GETFOLDERPATH = $466;
CDM_GETSPEC = $464;
CDM_HIDECONTROL = $469;
CDM_SETCONTROLTEXT = $468;
CDM_SETDEFEXT = $46a;
{ CHOOSECOLOR structure }
CC_ENABLEHOOK = $10;
CC_ENABLETEMPLATE = $20;
CC_ENABLETEMPLATEHANDLE = $40;
CC_FULLOPEN = $2;
CC_PREVENTFULLOPEN = $4;
CC_RGBINIT = $1;
CC_SHOWHELP = $8;
CC_SOLIDCOLOR = $80;
{ FINDREPLACE structure }
FR_DIALOGTERM = $40;
FR_DOWN = $1;
FR_ENABLEHOOK = $100;
FR_ENABLETEMPLATE = $200;
FR_ENABLETEMPLATEHANDLE = $2000;
FR_FINDNEXT = $8;
FR_HIDEUPDOWN = $4000;
FR_HIDEMATCHCASE = $8000;
FR_HIDEWHOLEWORD = $10000;
FR_MATCHCASE = $4;
FR_NOMATCHCASE = $800;
FR_NOUPDOWN = $400;
FR_NOWHOLEWORD = $1000;
FR_REPLACE = $10;
FR_REPLACEALL = $20;
FR_SHOWHELP = $80;
FR_WHOLEWORD = $2;
{ CHOOSEFONT structure }
CF_APPLY = $200;
CF_ANSIONLY = $400;
CF_BOTH = $3;
CF_TTONLY = $40000;
CF_EFFECTS = $100;
CF_ENABLEHOOK = $8;
CF_ENABLETEMPLATE = $10;
CF_ENABLETEMPLATEHANDLE = $20;
CF_FIXEDPITCHONLY = $4000;
CF_FORCEFONTEXIST = $10000;
CF_INITTOLOGFONTSTRUCT = $40;
CF_LIMITSIZE = $2000;
CF_NOOEMFONTS = $800;
CF_NOFACESEL = $80000;
CF_NOSCRIPTSEL = $800000;
CF_NOSTYLESEL = $100000;
CF_NOSIZESEL = $200000;
CF_NOSIMULATIONS = $1000;
CF_NOVECTORFONTS = $800;
CF_NOVERTFONTS = $1000000;
CF_PRINTERFONTS = $2;
CF_SCALABLEONLY = $20000;
CF_SCREENFONTS = $1;
CF_SCRIPTSONLY = $400;
CF_SELECTSCRIPT = $400000;
CF_SHOWHELP = $4;
CF_USESTYLE = $80;
CF_WYSIWYG = $8000;
BOLD_FONTTYPE = $100;
ITALIC_FONTTYPE = $200;
PRINTER_FONTTYPE = $4000;
REGULAR_FONTTYPE = $400;
SCREEN_FONTTYPE = $2000;
SIMULATED_FONTTYPE = $8000;
{ Common dialog messages }
COLOROKSTRINGW = 'commdlg_ColorOK';
FILEOKSTRINGW = 'commdlg_FileNameOK';
FINDMSGSTRINGW = 'commdlg_FindReplace';
HELPMSGSTRINGW = 'commdlg_help';
LBSELCHSTRINGW = 'commdlg_LBSelChangedNotify';
SETRGBSTRINGW = 'commdlg_SetRGBColor';
SHAREVISTRINGW = 'commdlg_ShareViolation';
COLOROKSTRINGA = 'commdlg_ColorOK';
FILEOKSTRINGA = 'commdlg_FileNameOK';
FINDMSGSTRINGA = 'commdlg_FindReplace';
HELPMSGSTRINGA = 'commdlg_help';
LBSELCHSTRINGA = 'commdlg_LBSelChangedNotify';
SETRGBSTRINGA = 'commdlg_SetRGBColor';
SHAREVISTRINGA = 'commdlg_ShareViolation';
{$ifdef UNICODE}
const
COLOROKSTRING = COLOROKSTRINGW;
FILEOKSTRING = FILEOKSTRINGW;
FINDMSGSTRING = FINDMSGSTRINGW;
HELPMSGSTRING = HELPMSGSTRINGW;
LBSELCHSTRING = LBSELCHSTRINGW;
SETRGBSTRING = SETRGBSTRINGW;
SHAREVISTRING = SHAREVISTRINGW;
{$else}
const
COLOROKSTRING = COLOROKSTRINGA;
FILEOKSTRING = FILEOKSTRINGA;
FINDMSGSTRING = FINDMSGSTRINGA;
HELPMSGSTRING = HELPMSGSTRINGA;
LBSELCHSTRING = LBSELCHSTRINGA;
SETRGBSTRING = SETRGBSTRINGA;
SHAREVISTRING = SHAREVISTRINGA;
{$endif}
{ LBSELCHSTRING message }
const
CD_LBSELCHANGE = 0;
CD_LBSELADD = 2;
CD_LBSELSUB = 1;
CD_LBSELNOITEMS = -(1);
{ DEVNAMES structure }
DN_DEFAULTPRN = 1;
{ PRINTDLG structure }
PD_ALLPAGES = 0;
PD_COLLATE = 16;
PD_DISABLEPRINTTOFILE = 524288;
PD_ENABLEPRINTHOOK = 4096;
PD_ENABLEPRINTTEMPLATE = 16384;
PD_ENABLEPRINTTEMPLATEHANDLE = 65536;
PD_ENABLESETUPHOOK = 8192;
PD_ENABLESETUPTEMPLATE = 32768;
PD_ENABLESETUPTEMPLATEHANDLE = 131072;
PD_HIDEPRINTTOFILE = 1048576;
PD_NOPAGENUMS = 8;
PD_NOSELECTION = 4;
PD_NOWARNING = 128;
PD_PAGENUMS = 2;
PD_PRINTSETUP = 64;
PD_PRINTTOFILE = 32;
PD_RETURNDC = 256;
PD_RETURNDEFAULT = 1024;
PD_RETURNIC = 512;
PD_SELECTION = 1;
PD_SHOWHELP = 2048;
PD_USEDEVMODECOPIES = 262144;
PD_USEDEVMODECOPIESANDCOLLATE = 262144;
{ PAGESETUPDLG structure }
PSD_DEFAULTMINMARGINS = 0;
PSD_DISABLEMARGINS = 16;
PSD_DISABLEORIENTATION = 256;
PSD_DISABLEPAGEPAINTING = 524288;
PSD_DISABLEPAPER = 512;
PSD_DISABLEPRINTER = 32;
PSD_ENABLEPAGEPAINTHOOK = 262144;
PSD_ENABLEPAGESETUPHOOK = 8192;
PSD_ENABLEPAGESETUPTEMPLATE = 32768;
PSD_ENABLEPAGESETUPTEMPLATEHANDLE = 131072;
PSD_INHUNDREDTHSOFMILLIMETERS = 8;
PSD_INTHOUSANDTHSOFINCHES = 4;
PSD_INWININIINTLMEASURE = 0;
PSD_MARGINS = 2;
PSD_MINMARGINS = 1;
PSD_NOWARNING = 128;
PSD_RETURNDEFAULT = 1024;
PSD_SHOWHELP = 2048;
{ WM_SHOWWINDOW message }
SW_OTHERUNZOOM = 4;
SW_OTHERZOOM = 2;
SW_PARENTCLOSING = 1;
SW_PARENTOPENING = 3;
{ Virtual Key codes }
VK_LBUTTON = 1;
VK_RBUTTON = 2;
VK_CANCEL = 3;
VK_MBUTTON = 4;
VK_BACK = 8;
VK_TAB = 9;
VK_CLEAR = 12;
VK_RETURN = 13;
VK_SHIFT = 16;
VK_CONTROL = 17;
VK_MENU = 18;
VK_PAUSE = 19;
VK_CAPITAL = 20;
VK_ESCAPE = 27;
VK_SPACE = 32;
VK_PRIOR = 33;
VK_NEXT = 34;
VK_END = 35;
VK_HOME = 36;
VK_LEFT = 37;
VK_UP = 38;
VK_RIGHT = 39;
VK_DOWN = 40;
VK_SELECT = 41;
VK_PRINT = 42;
VK_EXECUTE = 43;
VK_SNAPSHOT = 44;
VK_INSERT = 45;
VK_DELETE = 46;
VK_HELP = 47;
VK_0 = 48;
VK_1 = 49;
VK_2 = 50;
VK_3 = 51;
VK_4 = 52;
VK_5 = 53;
VK_6 = 54;
VK_7 = 55;
VK_8 = 56;
VK_9 = 57;
VK_A = 65;
VK_B = 66;
VK_C = 67;
VK_D = 68;
VK_E = 69;
VK_F = 70;
VK_G = 71;
VK_H = 72;
VK_I = 73;
VK_J = 74;
VK_K = 75;
VK_L = 76;
VK_M = 77;
VK_N = 78;
VK_O = 79;
VK_P = 80;
VK_Q = 81;
VK_R = 82;
VK_S = 83;
VK_T = 84;
VK_U = 85;
VK_V = 86;
VK_W = 87;
VK_X = 88;
VK_Y = 89;
VK_Z = 90;
VK_NUMPAD0 = 96;
VK_NUMPAD1 = 97;
VK_NUMPAD2 = 98;
VK_NUMPAD3 = 99;
VK_NUMPAD4 = 100;
VK_NUMPAD5 = 101;
VK_NUMPAD6 = 102;
VK_NUMPAD7 = 103;
VK_NUMPAD8 = 104;
VK_NUMPAD9 = 105;
VK_MULTIPLY = 106;
VK_ADD = 107;
VK_SEPARATOR = 108;
VK_SUBTRACT = 109;
VK_DECIMAL = 110;
VK_DIVIDE = 111;
VK_F1 = 112;
VK_F2 = 113;
VK_F3 = 114;
VK_F4 = 115;
VK_F5 = 116;
VK_F6 = 117;
VK_F7 = 118;
VK_F8 = 119;
VK_F9 = 120;
VK_F10 = 121;
VK_F11 = 122;
VK_F12 = 123;
VK_F13 = 124;
VK_F14 = 125;
VK_F15 = 126;
VK_F16 = 127;
VK_F17 = 128;
VK_F18 = 129;
VK_F19 = 130;
VK_F20 = 131;
VK_F21 = 132;
VK_F22 = 133;
VK_F23 = 134;
VK_F24 = 135;
{ GetAsyncKeyState }
VK_NUMLOCK = 144;
VK_SCROLL = 145;
VK_LSHIFT = 160;
VK_LCONTROL = 162;
VK_LMENU = 164;
VK_RSHIFT = 161;
VK_RCONTROL = 163;
VK_RMENU = 165;
{ ImmGetVirtualKey }
VK_PROCESSKEY = 229;
{ Keystroke Message Flags }
KF_ALTDOWN = 8192;
KF_DLGMODE = 2048;
KF_EXTENDED = 256;
KF_MENUMODE = 4096;
KF_REPEAT = 16384;
KF_UP = 32768;
{ GetKeyboardLayoutName }
KL_NAMELENGTH = 9;
{ WM_ACTIVATE message }
WA_ACTIVE = 1;
WA_CLICKACTIVE = 2;
WA_INACTIVE = 0;
{ WM_ACTIVATE message }
PWR_CRITICALRESUME = 3;
PWR_SUSPENDREQUEST = 1;
PWR_SUSPENDRESUME = 2;
PWR_FAIL = -(1);
PWR_OK = 1;
{ WM_NOTIFYFORMAT message }
NF_QUERY = 3;
NF_REQUERY = 4;
NFR_ANSI = 1;
NFR_UNICODE = 2;
{ WM_SIZING message }
WMSZ_BOTTOM = 6;
WMSZ_BOTTOMLEFT = 7;
WMSZ_BOTTOMRIGHT = 8;
WMSZ_LEFT = 1;
WMSZ_RIGHT = 2;
WMSZ_TOP = 3;
WMSZ_TOPLEFT = 4;
WMSZ_TOPRIGHT = 5;
{ WM_MOUSEACTIVATE message }
MA_ACTIVATE = 1;
MA_ACTIVATEANDEAT = 2;
MA_NOACTIVATE = 3;
MA_NOACTIVATEANDEAT = 4;
{ WM_SIZE message }
SIZE_MAXHIDE = 4;
SIZE_MAXIMIZED = 2;
SIZE_MAXSHOW = 3;
SIZE_MINIMIZED = 1;
SIZE_RESTORED = 0;
{ WM_NCCALCSIZE message }
WVR_ALIGNTOP = 16;
WVR_ALIGNLEFT = 32;
WVR_ALIGNBOTTOM = 64;
WVR_ALIGNRIGHT = 128;
WVR_HREDRAW = 256;
WVR_VREDRAW = 512;
WVR_REDRAW = 768;
WVR_VALIDRECTS = 1024;
{ WM_NCHITTEST message }
HTBOTTOM = 15;
HTBOTTOMLEFT = 16;
HTBOTTOMRIGHT = 17;
HTCAPTION = 2;
HTCLIENT = 1;
HTERROR = -(2);
HTGROWBOX = 4;
HTHSCROLL = 6;
HTLEFT = 10;
HTMENU = 5;
HTNOWHERE = 0;
HTREDUCE = 8;
HTRIGHT = 11;
HTSIZE = 4;
HTSYSMENU = 3;
HTTOP = 12;
HTTOPLEFT = 13;
HTTOPRIGHT = 14;
HTTRANSPARENT = -(1);
HTVSCROLL = 7;
HTZOOM = 9;
{ Mouse messages }
MK_CONTROL = 8;
MK_LBUTTON = 1;
MK_MBUTTON = 16;
MK_RBUTTON = 2;
MK_SHIFT = 4;
{ WNDCLASS structure }
CS_BYTEALIGNCLIENT = 4096;
CS_BYTEALIGNWINDOW = 8192;
CS_CLASSDC = 64;
CS_DBLCLKS = 8;
CS_GLOBALCLASS = 16384;
CS_HREDRAW = 2;
CS_KEYCVTWINDOW = 4;
CS_NOCLOSE = 512;
CS_NOKEYCVT = 256;
CS_OWNDC = 32;
CS_PARENTDC = 128;
CS_SAVEBITS = 2048;
CS_VREDRAW = 1;
DLGWINDOWEXTRA = 30;
{ ACCEL structure }
FALT = 16;
FCONTROL = 8;
FNOINVERT = 2;
FSHIFT = 4;
FVIRTKEY = 1;
{ MENUITEMINFO structure }
MIIM_CHECKMARKS = 8;
MIIM_DATA = 32;
MIIM_ID = 2;
MIIM_STATE = 1;
MIIM_SUBMENU = 4;
MIIM_TYPE = 16;
MFT_BITMAP = $4;
MFT_MENUBARBREAK = $20;
MFT_MENUBREAK = $40;
MFT_OWNERDRAW = $100;
MFT_RADIOCHECK = $200;
MFT_RIGHTJUSTIFY = $4000;
MFT_SEPARATOR = $800;
MFT_STRING = 0;
MFS_CHECKED = $8;
MFS_DEFAULT = $1000;
MFS_DISABLED = $3;
MFS_ENABLED = 0;
MFS_GRAYED = $3;
MFS_HILITE = $80;
MFS_UNCHECKED = 0;
MFS_UNHILITE = 0;
{ SERIALKEYS structure }
SERKF_AVAILABLE = 2;
SERKF_INDICATOR = 4;
SERKF_SERIALKEYSON = 1;
{ FILTERKEYS structure }
FKF_AVAILABLE = 2;
FKF_CLICKON = 64;
FKF_FILTERKEYSON = 1;
FKF_HOTKEYACTIVE = 4;
FKF_HOTKEYSOUND = 16;
FKF_CONFIRMHOTKEY = 8;
FKF_INDICATOR = 32;
{ HELPINFO structure }
HELPINFO_MENUITEM = 2;
HELPINFO_WINDOW = 1;
{ WM_PRINT message }
PRF_CHECKVISIBLE = $1;
PRF_CHILDREN = $10;
PRF_CLIENT = $4;
PRF_ERASEBKGND = $8;
PRF_NONCLIENT = $2;
PRF_OWNED = $20;
{ MapWindowPoints }
{ was #define dname def_expr }
function HWND_DESKTOP : HWND;
{ WM_SYSCOMMAND message }
const
SC_CLOSE = 61536;
SC_CONTEXTHELP = 61824;
SC_DEFAULT = 61792;
SC_HOTKEY = 61776;
SC_HSCROLL = 61568;
SC_KEYMENU = 61696;
SC_MAXIMIZE = 61488;
SC_ZOOM = 61488;
SC_MINIMIZE = 61472;
SC_ICON = 61472;
SC_MONITORPOWER = 61808;
SC_MOUSEMENU = 61584;
SC_MOVE = 61456;
SC_NEXTWINDOW = 61504;
SC_PREVWINDOW = 61520;
SC_RESTORE = 61728;
SC_SCREENSAVE = 61760;
SC_SIZE = 61440;
SC_TASKLIST = 61744;
SC_VSCROLL = 61552;
{ DM_GETDEFID message }
DC_HASDEFID = 21323;
{ WM_GETDLGCODE message }
DLGC_BUTTON = 8192;
DLGC_DEFPUSHBUTTON = 16;
DLGC_HASSETSEL = 8;
DLGC_RADIOBUTTON = 64;
DLGC_STATIC = 256;
DLGC_UNDEFPUSHBUTTON = 32;
DLGC_WANTALLKEYS = 4;
DLGC_WANTARROWS = 1;
DLGC_WANTCHARS = 128;
DLGC_WANTMESSAGE = 4;
DLGC_WANTTAB = 2;
{ EM_SETMARGINS message }
EC_LEFTMARGIN = 1;
EC_RIGHTMARGIN = 2;
EC_USEFONTINFO = 65535;
{ LB_SETCOUNT message }
LB_ERR = -(1);
LB_ERRSPACE = -(2);
LB_OKAY = 0;
{ CB_DIR message }
CB_ERR = -(1);
CB_ERRSPACE = -(2);
{ WM_IME_CONTROL message }
IMC_GETCANDIDATEPOS = 7;
IMC_GETCOMPOSITIONFONT = 9;
IMC_GETCOMPOSITIONWINDOW = 11;
IMC_GETSTATUSWINDOWPOS = 15;
IMC_CLOSESTATUSWINDOW = 33;
IMC_OPENSTATUSWINDOW = 34;
IMC_SETCANDIDATEPOS = 8;
IMC_SETCOMPOSITIONFONT = 10;
IMC_SETCOMPOSITIONWINDOW = 12;
IMC_SETSTATUSWINDOWPOS = 16;
{ WM_IME_CONTROL message }
IMN_CHANGECANDIDATE = 3;
IMN_CLOSECANDIDATE = 4;
IMN_CLOSESTATUSWINDOW = 1;
IMN_GUIDELINE = 13;
IMN_OPENCANDIDATE = 5;
IMN_OPENSTATUSWINDOW = 2;
IMN_SETCANDIDATEPOS = 9;
IMN_SETCOMPOSITIONFONT = 10;
IMN_SETCOMPOSITIONWINDOW = 11;
IMN_SETCONVERSIONMODE = 6;
IMN_SETOPENSTATUS = 8;
IMN_SETSENTENCEMODE = 7;
IMN_SETSTATUSWINDOWPOS = 12;
IMN_PRIVATE = 14;
{ STICKYKEYS structure }
SKF_AUDIBLEFEEDBACK = 64;
SKF_AVAILABLE = 2;
SKF_CONFIRMHOTKEY = 8;
SKF_HOTKEYACTIVE = 4;
SKF_HOTKEYSOUND = 16;
SKF_INDICATOR = 32;
SKF_STICKYKEYSON = 1;
SKF_TRISTATE = 128;
SKF_TWOKEYSOFF = 256;
{ MOUSEKEYS structure }
MKF_AVAILABLE = 2;
MKF_CONFIRMHOTKEY = 8;
MKF_HOTKEYACTIVE = 4;
MKF_HOTKEYSOUND = 16;
MKF_INDICATOR = 32;
MKF_MOUSEKEYSON = 1;
MKF_MODIFIERS = 64;
MKF_REPLACENUMBERS = 128;
{ SOUNDSENTRY structure }
SSF_AVAILABLE = 2;
SSF_SOUNDSENTRYON = 1;
SSTF_BORDER = 2;
SSTF_CHARS = 1;
SSTF_DISPLAY = 3;
SSTF_NONE = 0;
SSGF_DISPLAY = 3;
SSGF_NONE = 0;
SSWF_CUSTOM = 4;
SSWF_DISPLAY = 3;
SSWF_NONE = 0;
SSWF_TITLE = 1;
SSWF_WINDOW = 2;
{ ACCESSTIMEOUT structure }
ATF_ONOFFFEEDBACK = 2;
ATF_TIMEOUTON = 1;
{ HIGHCONTRAST structure }
HCF_AVAILABLE = 2;
HCF_CONFIRMHOTKEY = 8;
HCF_HIGHCONTRASTON = 1;
HCF_HOTKEYACTIVE = 4;
HCF_HOTKEYAVAILABLE = 64;
HCF_HOTKEYSOUND = 16;
HCF_INDICATOR = 32;
{ TOGGLEKEYS structure }
TKF_AVAILABLE = 2;
TKF_CONFIRMHOTKEY = 8;
TKF_HOTKEYACTIVE = 4;
TKF_HOTKEYSOUND = 16;
TKF_TOGGLEKEYSON = 1;
{ Installable Policy }
PP_DISPLAYERRORS = 1;
{ SERVICE_INFO structure }
RESOURCEDISPLAYTYPE_DOMAIN = 1;
RESOURCEDISPLAYTYPE_FILE = 4;
RESOURCEDISPLAYTYPE_GENERIC = 0;
RESOURCEDISPLAYTYPE_GROUP = 5;
RESOURCEDISPLAYTYPE_SERVER = 2;
RESOURCEDISPLAYTYPE_SHARE = 3;
{ KEY_EVENT_RECORD structure }
CAPSLOCK_ON = 128;
ENHANCED_KEY = 256;
LEFT_ALT_PRESSED = 2;
LEFT_CTRL_PRESSED = 8;
NUMLOCK_ON = 32;
RIGHT_ALT_PRESSED = 1;
RIGHT_CTRL_PRESSED = 4;
SCROLLLOCK_ON = 64;
SHIFT_PRESSED = 16;
{ MOUSE_EVENT_RECORD structure }
FROM_LEFT_1ST_BUTTON_PRESSED = 1;
RIGHTMOST_BUTTON_PRESSED = 2;
FROM_LEFT_2ND_BUTTON_PRESSED = 4;
FROM_LEFT_3RD_BUTTON_PRESSED = 8;
FROM_LEFT_4TH_BUTTON_PRESSED = 16;
DOUBLE_CLICK = 2;
MOUSE_MOVED = 1;
{ INPUT_RECORD structure }
KEY_EVENT = 1;
{MOUSE_EVENT = 2; conflict with function mouse_event }
cMOUSE_EVENT = 2;
WINDOW_BUFFER_SIZE_EVENT = 4;
MENU_EVENT = 8;
FOCUS_EVENT = 16;
{ BITMAPINFOHEADER structure }
BI_RGB = 0;
BI_RLE8 = 1;
BI_RLE4 = 2;
BI_BITFIELDS = 3;
{ Extensions to OpenGL }
{ ChoosePixelFormat }
PFD_DRAW_TO_WINDOW = $4;
PFD_DRAW_TO_BITMAP = $8;
PFD_SUPPORT_GDI = $10;
PFD_SUPPORT_OPENGL = $20;
PFD_DOUBLEBUFFER = $1;
PFD_STEREO = $2;
PFD_DOUBLEBUFFER_DONTCARE = $40000000;
PFD_STEREO_DONTCARE = $80000000;
PFD_TYPE_RGBA = 0;
PFD_TYPE_COLORINDEX = 1;
PFD_MAIN_PLANE = 0;
PFD_OVERLAY_PLANE = 1;
PFD_UNDERLAY_PLANE = -(1);
{ wglUseFontOutlines }
WGL_FONT_LINES = 0;
WGL_FONT_POLYGONS = 1;
{ LAYERPLANEDESCRIPTOR structure }
{ PIXELFORMATDESCRIPTOR structure }
PFD_GENERIC_FORMAT = $40;
PFD_NEED_PALETTE = $80;
PFD_NEED_SYSTEM_PALETTE = $100;
PFD_SWAP_COPY = $400;
PFD_SWAP_EXCHANGE = $200;
{ TEXTMETRIC structure }
TMPF_FIXED_PITCH = $1;
TMPF_VECTOR = $2;
TMPF_TRUETYPE = $4;
TMPF_DEVICE = $8;
{ --------------------- old stuff, need to organize! --------------- }
{ BEGINNING of windowsx.h stuff from old headers: }
{ Not convertable by H2PAS
#define __CRACK_VOID_F(fn,args) (void)(fn args)
#define __CRACK_BOOL_F(fn,args) (BOOL)(fn args)
#define __CRACK_HMENU_F(fn,args) (HMENU)(fn args)
#define __CRACK_HWND_F(fn,args) (HWND)(fn args)
#define __CRACK_LONG_F(fn, args) (LRESULT)(fn args)
#define __CRACK_ZERO_F(fn, args) (fn args,0)
}
{ was #define dname(params) def_expr }
function GetFirstChild(h:HWND):HWND;
{ was #define dname(params) def_expr }
function GetNextSibling(h:HWND):HWND;
{ was #define dname(params) def_expr }
function GetWindowID(h:HWND):longint;
{ was #define dname(params) def_expr }
function SubclassWindow(h:HWND; p:LONG):LONG;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_COMMAND_CMD(w,l : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_COMMAND_ID(w,l : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_CTLCOLOR_HDC(w,l,msg : longint) : HDC;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_CTLCOLOR_HWND(w,l,msg : longint) : HWND;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_HSCROLL_CODE(w,l : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_HSCROLL_HWND(w,l : longint) : HWND;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_HSCROLL_POS(w,l : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_MDIACTIVATE_FACTIVATE(h,a,b : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_MDIACTIVATE_HWNDACTIVATE(a,b : longint) : HWND;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_MDIACTIVATE_HWNDDEACT(a,b : longint) : HWND;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_VSCROLL_CODE(w,l : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_VSCROLL_HWND(w,l : longint) : HWND;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_VSCROLL_POS(w,l : longint) : longint;
{ return type might be wrong }
{ Not convertable by H2PAS
#define FORWARD_WM_CLOSE(h, fn) __CRACK_VOID_F(fn,(h, WM_CLOSE, 0, 0))
#define FORWARD_WM_COMMAND(h, id, c, n, fn) __CRACK_VOID_F(fn,(h, WM_COMMAND, MAKEWPARAM(id,n), (LPARAM)c))
#define FORWARD_WM_CREATE(h, p, fn) __CRACK_BOOL_F(fn,(h, WM_CREATE, 0, (LPARAM)p))
#define FORWARD_WM_DESTROY(h, fn) __CRACK_VOID_F(fn,(h, WM_DESTROY, 0, 0))
#define FORWARD_WM_ENABLE(h, e, fn) __CRACK_VOID_F(fn,(h, WM_ENABLE, (WPARAM)e, 0))
#define FORWARD_WM_INITDIALOG(h, c, l, fn) __CRACK_BOOL_F(fn,(h, WM_INITDIALOG, (WPARAM)c, l))
#define FORWARD_WM_MDICASCADE(h, c, fn) __CRACK_BOOL_F(fn,(h, WM_MDICASCADE, (WPARAM)c, 0))
#define FORWARD_WM_MDIDESTROY(h, d, fn) __CRACK_VOID_F(fn,(h, WM_MDIDESTROY, (WPARAM)d, 0))
#define FORWARD_WM_MDIGETACTIVE(h, fn) __CRACK_HWND_F(fn,(h, WM_MDIGETACTIVE, 0, 0))
#define FORWARD_WM_MDIICONARRANGE(h, fn) __CRACK_VOID_F(fn,(h, WM_MDIICONARRANGE, 0, 0))
#define FORWARD_WM_MDISETMENU(h, fr, hf, hw, fn) __CRACK_HMENU_F(fn,(h, WM_MDISETMENU, (WPARAM)((fr) ? (hf) : 0), (LPARAM)(hw)))
#define FORWARD_WM_MDITILE(h, c, fn) __CRACK_BOOL_F(fn,(h, WM_MDITILE, (WPARAM)(c), 0))
#define FORWARD_WM_PAINT(h, fn) __CRACK_VOID_F(fn,(h, WM_PAINT, 0, 0))
#define FORWARD_WM_QUERYENDSESSION(h, fn) __CRACK_BOOL_F(fn,(h, WM_QUERYENDSESSION, 0, 0))
#define FORWARD_WM_SIZE(h, state, cx, cy, fn) __CRACK_VOID_F(fn,(h, WM_SIZE, (WPARAM)state, MAKELPARAM(cx, cy)))
#define FORWARD_WM_SYSCOMMAND(h, c, x, y, fn) __CRACK_VOID_F(fn,(h, WM_SYSCOMMAND, (WPARAM)c, MAKELPARAM(x, y)))
#define HANDLE_WM_CLOSE(h, w, l, fn) __CRACK_ZERO_F(fn,(h));
#define HANDLE_WM_COMMAND(h, w, l, fn) __CRACK_ZERO_F(fn,(h, SEXT_LOWORD(w), (HWND)l, HIWORD(w)))
#define HANDLE_WM_CREATE(h, w, l, fn) (LRESULT)((fn(h, (CREATESTRUCT )l)) ? 0 : -1)
#define HANDLE_WM_DESTROY(h, w, l, fn) __CRACK_ZERO_F(fn,(h))
#define HANDLE_WM_ENABLE(h, w, l, fn) __CRACK_ZERO_F(fn,(h, (BOOL)w))
#define HANDLE_WM_INITDIALOG(h, w, l, fn) __CRACK_LONG_F(fn,(h, (HWND)w, l))
#define HANDLE_WM_MDICASCADE(h, w, l, fn) __CRACK_LONG_F(fn, (h, (UINT)w)
#define HANDLE_WM_MDIDESTROY(h, w, l, fn) __CRACK_ZERO_F(fn,(h, (HWND)w))
#define HANDLE_WM_MDIGETACTIVE(h, w, l, fn) __CRACK_LONG_F(fn,(h))
#define HANDLE_WM_MDIICONARRANGE(h, w, l, fn) __CRACK_ZERO_F(fn,(h))
#define HANDLE_WM_MDISETMENU(h, w, l, fn) __CRACK_LONG_F(fn,(h, (BOOL)w, (HMENU)w, (HMENU)l)
#define HANDLE_WM_MDITILE(h, w, l, fn) __CRACK_LONG_F(fn,(h, (UINT)w))
#define HANDLE_WM_PAINT(h, w, l, fn) __CRACK_ZERO_F(fn,(h))
#define HANDLE_WM_QUERYENDSESSION(h, w, l, fn) MAKELRESULT(fn(h), 0)
#define HANDLE_WM_SIZE(h, w, l, fn) __CRACK_ZERO_F(fn,(h, (UINT)w, SEXT_LOWORD(l), SEXT_HIWORD(l)))
#define HANDLE_WM_SYSCOMMAND(h, w, l, fn) __CRACK_ZERO_F(fn,(h, (UINT)w, SEXT_LOWORD(l), SEXT_HIWORD(l)))
}
{ Totally disgusting! get wParam and lParam from the environment ! }
{ Not convertable by H2PAS
#define HANDLE_MSG(h, message, fn) case message: return HANDLE_##message(h, wParam, lParam, fn)
}
{ END OF windowsx.h stuff from old headers }
{ ------------------------------------------------------------------ }
{ BEGINNING of shellapi.h stuff from old headers }
const
SE_ERR_SHARE = 26;
SE_ERR_ASSOCINCOMPLETE = 27;
SE_ERR_DDETIMEOUT = 28;
SE_ERR_DDEFAIL = 29;
SE_ERR_DDEBUSY = 30;
SE_ERR_NOASSOC = 31;
{ END OF shellapi.h stuff from old headers }
{ ------------------------------------------------------------------ }
{ From ddeml.h in old Cygnus headers }
XCLASS_BOOL = $1000;
XCLASS_DATA = $2000;
XCLASS_FLAGS = $4000;
XCLASS_MASK = $fc00;
XCLASS_NOTIFICATION = $8000;
XTYPF_NOBLOCK = $0002;
XTYP_ADVDATA = $4010;
XTYP_ADVREQ = $2022;
XTYP_ADVSTART = $1030;
XTYP_ADVSTOP = $8040;
XTYP_CONNECT = $1062;
XTYP_CONNECT_CONFIRM = $8072;
XTYP_DISCONNECT = $80c2;
XTYP_EXECUTE = $4050;
XTYP_POKE = $4090;
XTYP_REQUEST = $20b0;
XTYP_WILDCONNECT = $20E2;
XTYP_REGISTER = $80A2;
XTYP_ERROR = $8002;
XTYP_XACT_COMPLETE = $8080;
XTYP_UNREGISTER = $80D2;
DMLERR_DLL_USAGE = $4004;
DMLERR_INVALIDPARAMETER = $4006;
DMLERR_NOTPROCESSED = $4009;
DMLERR_POSTMSG_FAILED = $400c;
DMLERR_SERVER_DIED = $400e;
DMLERR_SYS_ERROR = $400f;
DMLERR_BUSY = $4001;
DMLERR_DATAACKTIMEOUT = $4002;
DMLERR_ADVACKTIMEOUT = $4000;
DMLERR_DLL_NOT_INITIALIZED = $4003;
DMLERR_LOW_MEMORY = $4007;
DMLERR_MEMORY_ERROR = $4008;
DMLERR_POKEACKTIMEOUT = $400b;
DMLERR_NO_CONV_ESTABLISHED = $400a;
DMLERR_REENTRANCY = $400d;
DMLERR_UNFOUND_QUEUE_ID = $4011;
DMLERR_UNADVACKTIMEOUT = $4010;
DMLERR_EXECACKTIMEOUT = $4005;
DDE_FACK = $8000;
DDE_FNOTPROCESSED = $0000;
DNS_REGISTER = $0001;
DNS_UNREGISTER = $0002;
CP_WINANSI = 1004;
CP_WINUNICODE = 1200;
{ Not convertable by H2PAS
#define EXPENTRY CALLBACK
}
APPCLASS_STANDARD = $00000000;
{ End of stuff from ddeml.h in old Cygnus headers }
{ ----------------------------------------------- }
BKMODE_LAST = 2;
CTLCOLOR_MSGBOX = 0;
CTLCOLOR_EDIT = 1;
CTLCOLOR_LISTBOX = 2;
CTLCOLOR_BTN = 3;
CTLCOLOR_DLG = 4;
CTLCOLOR_SCROLLBAR = 5;
CTLCOLOR_STATIC = 6;
CTLCOLOR_MAX = 7;
META_SETMAPMODE = $0103;
META_SETWINDOWORG = $020B;
META_SETWINDOWEXT = $020C;
POLYFILL_LAST = 2;
STATUS_WAIT_0 = $00000000;
STATUS_ABANDONED_WAIT_0 = $00000080;
STATUS_USER_APC = $000000C0;
STATUS_TIMEOUT = $00000102;
STATUS_PENDING = $00000103;
STATUS_GUARD_PAGE_VIOLATION = $80000001;
STATUS_DATATYPE_MISALIGNMENT = $80000002;
STATUS_BREAKPOINT = $80000003;
STATUS_SINGLE_STEP = $80000004;
STATUS_IN_PAGE_ERROR = $C0000006;
STATUS_INVALID_HANDLE = $C0000008;
STATUS_ILLEGAL_INSTRUCTION = $C000001D;
STATUS_NONCONTINUABLE_EXCEPTION = $C0000025;
STATUS_INVALID_DISPOSITION = $C0000026;
STATUS_ARRAY_BOUNDS_EXCEEDED = $C000008C;
STATUS_FLOAT_DENORMAL_OPERAND = $C000008D;
STATUS_FLOAT_DIVIDE_BY_ZERO = $C000008E;
STATUS_FLOAT_INEXACT_RESULT = $C000008F;
STATUS_FLOAT_INVALID_OPERATION = $C0000090;
STATUS_FLOAT_OVERFLOW = $C0000091;
STATUS_FLOAT_STACK_CHECK = $C0000092;
STATUS_FLOAT_UNDERFLOW = $C0000093;
STATUS_INTEGER_DIVIDE_BY_ZERO = $C0000094;
STATUS_INTEGER_OVERFLOW = $C0000095;
STATUS_PRIVILEGED_INSTRUCTION = $C0000096;
STATUS_STACK_OVERFLOW = $C00000FD;
STATUS_CONTROL_C_EXIT = $C000013A;
{$define EXCEPTION_CTRL_C}
PROCESSOR_ARCHITECTURE_INTEL = 0;
PROCESSOR_ARCHITECTURE_MIPS = 1;
PROCESSOR_ARCHITECTURE_ALPHA = 2;
PROCESSOR_ARCHITECTURE_PPC = 3;
{ was #define dname(params) def_expr }
function FreeModule(h:HINST):WINBOOL;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function MakeProcInstance(p,i : longint) : longint;
{ return type might be wrong }
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function FreeProcInstance(p : longint) : longint;
{ return type might be wrong }
const
{ _fmemcpy = memcpy; these are functions }
{ Used by wxwindows. }
SIZEFULLSCREEN = SIZE_MAXIMIZED;
SIZENORMAL = SIZE_RESTORED;
SIZEICONIC = SIZE_MINIMIZED;
{ NPLOGPALETTE = PLOGPALETTE; probably a type }
{ In the old winnt.h }
(* Not convertable by H2PAS anyhow with if 0
#if 0
#ifdef __ANAL__
#define DECLARE_HANDLE(h) struct h##__ { int dummy; }; typedef struct h##__ h
#else
#define DECLARE_HANDLE(h) typedef void h
#endif
DECLARE_HANDLE(HANDLE);
#endif
*)
{$ifdef __PPC__}
const
CONTEXT_CONTROL = 1;
CONTEXT_FLOATING_POINT = 2;
CONTEXT_INTEGER = 4;
CONTEXT_DEBUG_REGISTERS = 8;
CONTEXT_FULL = (CONTEXT_CONTROL or CONTEXT_FLOATING_POINT) or CONTEXT_INTEGER;
CONTEXT_DEBUGGER = CONTEXT_FULL;
{$else}
{ x86 }
{ The doc refered me to winnt.h, so I had to look... }
const
SIZE_OF_80387_REGISTERS = 80;
{ Values for contextflags }
CONTEXT_i386 = $10000;
CONTEXT_CONTROL = CONTEXT_i386 or 1;
CONTEXT_INTEGER = CONTEXT_i386 or 2;
CONTEXT_SEGMENTS = CONTEXT_i386 or 4;
CONTEXT_FLOATING_POINT = CONTEXT_i386 or 8;
CONTEXT_DEBUG_REGISTERS = CONTEXT_i386 or $10;
CONTEXT_FULL = (CONTEXT_CONTROL or CONTEXT_INTEGER) or CONTEXT_SEGMENTS;
{ our own invention }
FLAG_TRACE_BIT = $100;
CONTEXT_DEBUGGER = CONTEXT_FULL or CONTEXT_FLOATING_POINT;
{$endif}
const
{ ASCIICHAR = AsciiChar; this is the kind of thing that can
make problems for FPC !! }
{ ignored in H2PAS
#define FAR
handled in H2PAS
#define PACKED __attribute__((packed))
}
FILTER_TEMP_DUPLICATE_ACCOUNT = $0001;
FILTER_NORMAL_ACCOUNT = $0002;
FILTER_INTERDOMAIN_TRUST_ACCOUNT = $0008;
FILTER_WORKSTATION_TRUST_ACCOUNT = $0010;
FILTER_SERVER_TRUST_ACCOUNT = $0020;
LOGON32_LOGON_INTERACTIVE = $02;
LOGON32_LOGON_BATCH = $04;
LOGON32_LOGON_SERVICE = $05;
LOGON32_PROVIDER_DEFAULT = $00;
LOGON32_PROVIDER_WINNT35 = $01;
QID_SYNC = $FFFFFFFF;
{ Magic numbers in PE executable header. }
{ e_magic field }
IMAGE_DOS_SIGNATURE = $5a4d;
{ nt_signature field }
IMAGE_NT_SIGNATURE = $4550;
{$endif}
{ _GNU_H_WINDOWS32_DEFINES }
{$endif read_interface}
{$ifndef windows_include_files}
implementation
uses
{$ifdef UNICODE}
unidef,
{$else not UNICODE}
ascdef,
{$endif UNICODE}
func;
const External_library='kernel32'; {Setup as you need!}
{$endif not windows_include_files}
{$ifdef read_implementation}
{ was #define dname def_expr }
function UNICODE_NULL : WCHAR;
begin
UNICODE_NULL:=WCHAR(0);
end;
{ was #define dname def_expr }
function RT_ACCELERATOR : LPTSTR;
{ return type might be wrong }
begin
RT_ACCELERATOR:=MAKEINTRESOURCE(9);
end;
{ was #define dname def_expr }
function RT_BITMAP : LPTSTR;
{ return type might be wrong }
begin
RT_BITMAP:=MAKEINTRESOURCE(2);
end;
{ was #define dname def_expr }
function RT_DIALOG : LPTSTR;
{ return type might be wrong }
begin
RT_DIALOG:=MAKEINTRESOURCE(5);
end;
{ was #define dname def_expr }
function RT_FONT : LPTSTR;
{ return type might be wrong }
begin
RT_FONT:=MAKEINTRESOURCE(8);
end;
{ was #define dname def_expr }
function RT_FONTDIR : LPTSTR;
{ return type might be wrong }
begin
RT_FONTDIR:=MAKEINTRESOURCE(7);
end;
{ was #define dname def_expr }
function RT_MENU : LPTSTR;
{ return type might be wrong }
begin
RT_MENU:=MAKEINTRESOURCE(4);
end;
{ was #define dname def_expr }
function RT_RCDATA : LPTSTR;
{ return type might be wrong }
begin
RT_RCDATA:=MAKEINTRESOURCE(10);
end;
{ was #define dname def_expr }
function RT_STRING : LPTSTR;
{ return type might be wrong }
begin
RT_STRING:=MAKEINTRESOURCE(6);
end;
{ was #define dname def_expr }
function RT_MESSAGETABLE : LPTSTR;
{ return type might be wrong }
begin
RT_MESSAGETABLE:=MAKEINTRESOURCE(11);
end;
{ was #define dname def_expr }
function RT_CURSOR : LPTSTR;
{ return type might be wrong }
begin
RT_CURSOR:=MAKEINTRESOURCE(1);
end;
{ was #define dname def_expr }
function RT_GROUP_CURSOR : LPTSTR;
{ return type might be wrong }
begin
RT_GROUP_CURSOR:=MAKEINTRESOURCE(12);
end;
{ was #define dname def_expr }
function RT_ICON : LPTSTR;
{ return type might be wrong }
begin
RT_ICON:=MAKEINTRESOURCE(3);
end;
{ was #define dname def_expr }
function RT_GROUP_ICON : LPTSTR;
{ return type might be wrong }
begin
RT_GROUP_ICON:=MAKEINTRESOURCE(13);
end;
{ was #define dname def_expr }
function RT_VERSION : LPTSTR;
{ return type might be wrong }
begin
RT_VERSION:=MAKEINTRESOURCE(16);
end;
{ was #define dname def_expr }
function IDC_ARROW : LPTSTR;
{ return type might be wrong }
begin
IDC_ARROW:=MAKEINTRESOURCE(32512);
end;
{ was #define dname def_expr }
function IDC_IBEAM : LPTSTR;
{ return type might be wrong }
begin
IDC_IBEAM:=MAKEINTRESOURCE(32513);
end;
{ was #define dname def_expr }
function IDC_WAIT : LPTSTR;
{ return type might be wrong }
begin
IDC_WAIT:=MAKEINTRESOURCE(32514);
end;
{ was #define dname def_expr }
function IDC_CROSS : LPTSTR;
{ return type might be wrong }
begin
IDC_CROSS:=MAKEINTRESOURCE(32515);
end;
{ was #define dname def_expr }
function IDC_UPARROW : LPTSTR;
{ return type might be wrong }
begin
IDC_UPARROW:=MAKEINTRESOURCE(32516);
end;
{ was #define dname def_expr }
function IDC_SIZENWSE : LPTSTR;
{ return type might be wrong }
begin
IDC_SIZENWSE:=MAKEINTRESOURCE(32642);
end;
{ was #define dname def_expr }
function IDC_SIZENESW : LPTSTR;
{ return type might be wrong }
begin
IDC_SIZENESW:=MAKEINTRESOURCE(32643);
end;
{ was #define dname def_expr }
function IDC_SIZEWE : LPTSTR;
{ return type might be wrong }
begin
IDC_SIZEWE:=MAKEINTRESOURCE(32644);
end;
{ was #define dname def_expr }
function IDC_SIZENS : LPTSTR;
{ return type might be wrong }
begin
IDC_SIZENS:=MAKEINTRESOURCE(32645);
end;
{ was #define dname def_expr }
function IDC_SIZEALL : LPTSTR;
{ return type might be wrong }
begin
IDC_SIZEALL:=MAKEINTRESOURCE(32646);
end;
{ was #define dname def_expr }
function IDC_NO : LPTSTR;
{ return type might be wrong }
begin
IDC_NO:=MAKEINTRESOURCE(32648);
end;
{ was #define dname def_expr }
function IDC_APPSTARTING : LPTSTR;
{ return type might be wrong }
begin
IDC_APPSTARTING:=MAKEINTRESOURCE(32650);
end;
{ was #define dname def_expr }
function IDC_HELP : LPTSTR;
{ return type might be wrong }
begin
IDC_HELP:=MAKEINTRESOURCE(32651);
end;
{ was #define dname def_expr }
function IDI_APPLICATION : LPTSTR;
{ return type might be wrong }
begin
IDI_APPLICATION:=MAKEINTRESOURCE(32512);
end;
{ was #define dname def_expr }
function IDI_HAND : LPTSTR;
{ return type might be wrong }
begin
IDI_HAND:=MAKEINTRESOURCE(32513);
end;
{ was #define dname def_expr }
function IDI_QUESTION : LPTSTR;
{ return type might be wrong }
begin
IDI_QUESTION:=MAKEINTRESOURCE(32514);
end;
{ was #define dname def_expr }
function IDI_EXCLAMATION : LPTSTR;
{ return type might be wrong }
begin
IDI_EXCLAMATION:=MAKEINTRESOURCE(32515);
end;
{ was #define dname def_expr }
function IDI_ASTERISK : LPTSTR;
{ return type might be wrong }
begin
IDI_ASTERISK:=MAKEINTRESOURCE(32516);
end;
{ was #define dname def_expr }
function IDI_WINLOGO : LPTSTR;
{ return type might be wrong }
begin
IDI_WINLOGO:=MAKEINTRESOURCE(32517);
end;
{ was #define dname def_expr }
function IDC_SIZE : LPTSTR;
{ return type might be wrong }
begin
IDC_SIZE:=MAKEINTRESOURCE(32640);
end;
{ was #define dname def_expr }
function IDC_ICON : LPTSTR;
{ return type might be wrong }
begin
IDC_ICON:=MAKEINTRESOURCE(32641);
end;
{ was #define dname def_expr }
function STD_INPUT_HANDLE : DWORD;
begin
STD_INPUT_HANDLE:=DWORD(-(10));
end;
{ was #define dname def_expr }
function STD_OUTPUT_HANDLE : DWORD;
begin
STD_OUTPUT_HANDLE:=DWORD(-(11));
end;
{ was #define dname def_expr }
function STD_ERROR_HANDLE : DWORD;
begin
STD_ERROR_HANDLE:=DWORD(-(12));
end;
{ was #define dname def_expr }
function INVALID_HANDLE_VALUE : HANDLE;
begin
INVALID_HANDLE_VALUE:=HANDLE(-(1));
end;
{ was #define dname def_expr }
function TIME_ZONE_ID_INVALID : DWORD;
begin
TIME_ZONE_ID_INVALID:=DWORD(-(1));
end;
{ was #define dname def_expr }
function HWND_BROADCAST : HWND;
begin
HWND_BROADCAST:=HWND($FFFF);
end;
{ was #define dname def_expr }
function HKEY_CLASSES_ROOT : HKEY;
begin
HKEY_CLASSES_ROOT:=HKEY($80000000);
end;
{ was #define dname def_expr }
function HKEY_CURRENT_USER : HKEY;
begin
HKEY_CURRENT_USER:=HKEY($80000001);
end;
{ was #define dname def_expr }
function HKEY_LOCAL_MACHINE : HKEY;
begin
HKEY_LOCAL_MACHINE:=HKEY($80000002);
end;
{ was #define dname def_expr }
function HKEY_USERS : HKEY;
begin
HKEY_USERS:=HKEY($80000003);
end;
{ was #define dname def_expr }
function HKEY_PERFORMANCE_DATA : HKEY;
begin
HKEY_PERFORMANCE_DATA:=HKEY($80000004);
end;
{ was #define dname def_expr }
function HKEY_CURRENT_CONFIG : HKEY;
begin
HKEY_CURRENT_CONFIG:=HKEY($80000005);
end;
{ was #define dname def_expr }
function HKEY_DYN_DATA : HKEY;
begin
HKEY_DYN_DATA:=HKEY($00000006);
end;
{ was #define dname def_expr }
function HWND_BOTTOM : HWND;
begin
HWND_BOTTOM:=HWND(1);
end;
{ was #define dname def_expr }
function HWND_NOTOPMOST : HWND;
begin
HWND_NOTOPMOST:=HWND(-(2));
end;
{ was #define dname def_expr }
function HWND_TOP : HWND;
begin
HWND_TOP:=HWND(0);
end;
{ was #define dname def_expr }
function HWND_TOPMOST : HWND;
begin
HWND_TOPMOST:=HWND(-(1));
end;
{ was #define dname def_expr }
function VS_FILE_INFO : LPTSTR;
{ return type might be wrong }
begin
VS_FILE_INFO:=MAKEINTRESOURCE(16);
end;
{ was #define dname def_expr }
function HINST_COMMCTRL : HINST;
begin
HINST_COMMCTRL:=HINST(-(1));
end;
{ was #define dname def_expr }
function LPSTR_TEXTCALLBACKW : LPWSTR;
begin
LPSTR_TEXTCALLBACKW:=LPWSTR(-(1));
end;
{ was #define dname def_expr }
function LPSTR_TEXTCALLBACKA : LPSTR;
begin
LPSTR_TEXTCALLBACKA:=LPSTR(-(1));
end;
{$ifdef UNICODE}
{const this is a function in fact !!
LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKW;}
function LPSTR_TEXTCALLBACK : LPWSTR;
begin
LPSTR_TEXTCALLBACK:=LPWSTR(-(1));
end;
{$else}
{const
LPSTR_TEXTCALLBACK = LPSTR_TEXTCALLBACKA; }
function LPSTR_TEXTCALLBACK : LPSTR;
begin
LPSTR_TEXTCALLBACK:=LPSTR(-(1));
end;
{$endif}
{ was #define dname def_expr }
function TVI_ROOT : HTREEITEM;
begin
TVI_ROOT:=HTREEITEM($FFFF0000);
end;
{ was #define dname def_expr }
function TVI_FIRST : HTREEITEM;
begin
TVI_FIRST:=HTREEITEM($FFFF0001);
end;
{ was #define dname def_expr }
function TVI_LAST : HTREEITEM;
begin
TVI_LAST:=HTREEITEM($FFFF0002);
end;
{ was #define dname def_expr }
function TVI_SORT : HTREEITEM;
begin
TVI_SORT:=HTREEITEM($FFFF0003);
end;
{ was #define dname def_expr }
function HWND_DESKTOP : HWND;
begin
HWND_DESKTOP:=HWND(0);
end;
{ was #define dname(params) def_expr }
function GetFirstChild(h:HWND):HWND;
begin
GetFirstChild:=GetTopWindow(h);
end;
{ was #define dname(params) def_expr }
function GetNextSibling(h:HWND):HWND;
begin
GetNextSibling:=GetWindow(h,GW_HWNDNEXT);
end;
{ was #define dname(params) def_expr }
function GetWindowID(h:HWND):longint;
begin
GetWindowID:=GetDlgCtrlID(h);
end;
{ was #define dname(params) def_expr }
function SubclassWindow(h:HWND; p:LONG):LONG;
begin
SubclassWindow:=SetWindowLong(h,GWL_WNDPROC,p);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_COMMAND_CMD(w,l : longint) : longint;
{ return type might be wrong }
begin
GET_WM_COMMAND_CMD:=HIWORD(w);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_COMMAND_ID(w,l : longint) : longint;
{ return type might be wrong }
begin
GET_WM_COMMAND_ID:=LOWORD(w);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_CTLCOLOR_HDC(w,l,msg : longint) : HDC;
begin
GET_WM_CTLCOLOR_HDC:=HDC(w);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_CTLCOLOR_HWND(w,l,msg : longint) : HWND;
begin
GET_WM_CTLCOLOR_HWND:=HWND(l);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_HSCROLL_CODE(w,l : longint) : longint;
{ return type might be wrong }
begin
GET_WM_HSCROLL_CODE:=LOWORD(w);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_HSCROLL_HWND(w,l : longint) : HWND;
begin
GET_WM_HSCROLL_HWND:=HWND(l);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_HSCROLL_POS(w,l : longint) : longint;
{ return type might be wrong }
begin
GET_WM_HSCROLL_POS:=HIWORD(w);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_MDIACTIVATE_FACTIVATE(h,a,b : longint) : longint;
{ return type might be wrong }
begin
GET_WM_MDIACTIVATE_FACTIVATE:=b = (LONG(h));
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_MDIACTIVATE_HWNDACTIVATE(a,b : longint) : HWND;
begin
GET_WM_MDIACTIVATE_HWNDACTIVATE:=HWND(b);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_MDIACTIVATE_HWNDDEACT(a,b : longint) : HWND;
begin
GET_WM_MDIACTIVATE_HWNDDEACT:=HWND(a);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_VSCROLL_CODE(w,l : longint) : longint;
{ return type might be wrong }
begin
GET_WM_VSCROLL_CODE:=LOWORD(w);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
function GET_WM_VSCROLL_HWND(w,l : longint) : HWND;
begin
GET_WM_VSCROLL_HWND:=HWND(l);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function GET_WM_VSCROLL_POS(w,l : longint) : longint;
{ return type might be wrong }
begin
GET_WM_VSCROLL_POS:=HIWORD(w);
end;
{ was #define dname(params) def_expr }
function FreeModule(h:HINST):WINBOOL;
begin
FreeModule:=FreeLibrary(h);
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function MakeProcInstance(p,i : longint) : longint;
{ return type might be wrong }
begin
MakeProcInstance:=p;
end;
{ was #define dname(params) def_expr }
{ argument types are unknown }
{ return type might be wrong }
function FreeProcInstance(p : longint) : longint;
{ return type might be wrong }
begin
FreeProcInstance:=p;
end;
{$endif read_implementation}
{$ifndef windows_include_files}
end.
{$endif not windows_include_files}
{
$Log$
Revision 1.6 1998-10-27 11:17:12 peter
* type HINSTANCE -> HINST
Revision 1.5 1998/08/31 11:53:54 pierre
* compilable windows.pp file
still to do :
- findout problems
- findout the correct DLL for each call !!
Revision 1.4 1998/06/25 08:41:47 florian
* better rtti
Revision 1.3 1998/06/10 10:39:12 peter
* working w32 rtl
}
Reference in New Issue View Git Blame Copy Permalink