{**************************************************************************** $Id$ PMWIN interface unit FPC Pascal Runtime Library for OS/2 Copyright (c) 1993,94 by Florian Kl„mpfl Copyright (c) 1999 by Ramon Bosque The FPK-Pascal runtime library is distributed under the Library GNU Public License v2. So is this unit. The Library GNU Public License requires you to distribute the source code of this unit with any product that uses it. Because the EMX library isn't under the LGPL, we grant you an exception to this, and that is, when you compile a program with the FPK Pascal compiler, you do not need to ship source code with that program, AS LONG AS YOU ARE USING UNMODIFIED CODE! If you modify this code, you MUST change the next line: Send us your modified files, we can work together if you want! FPK-Pascal 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 Library GNU General Public License for more details. You should have received a copy of the Library GNU General Public License along with FPK-Pascal; 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 code is alfa. Future versions of this unit will propably not be compatible.} unit pmwin; interface uses os2def; type proc=procedure; QVERSDATA = record environment : word; version : word; end; PQVERSDATA = ^QVERSDATA; SWP = record fl : cardinal; cy : longint; cx : longint; y : longint; x : longint; hwndInsertBehind : cardinal; hwnd : cardinal; ulReserved1 : cardinal; ulReserved2 : cardinal; end; PSWP = ^SWP; CREATESTRUCT = record pPresParams : pointer; pCtlData : pointer; id : cardinal; hwndInsertBehind : cardinal; hwndOwner : cardinal; cy : longint; cx : longint; y : longint; x : longint; flStyle : cardinal; pszText : pchar; pszClass : pchar; hwndParent : cardinal; end; PCREATESTRUCT = ^CREATESTRUCT; CLASSINFO = record flClassStyle : cardinal; pfnWindowProc : proc; cbWindowData : cardinal; end; PCLASSINFO = ^CLASSINFO; QMSG = record hwnd : cardinal; msg : cardinal; mp1 : pointer; mp2 : pointer; time : cardinal; ptl : POINTL; reserved : cardinal; end; PQMSG = ^QMSG; MQINFO = record cb : cardinal; pid : cardinal; tid : cardinal; cmsgs : cardinal; pReserved : pointer; end; PMQINFO = ^MQINFO; WNDPARAMS = record fsStatus : cardinal; cchText : cardinal; pszText : pchar; cbPresParams : cardinal; pPresParams : pointer; cbCtlData : cardinal; pCtlData : pointer; end; PWNDPARAMS = ^WNDPARAMS; USERBUTTON = record hwnd : cardinal; hps : cardinal; fsState : cardinal; fsStateOld : cardinal; end; PUSERBUTTON = ^USERBUTTON; OWNERITEM = record hwnd : cardinal; hps : cardinal; fsState : cardinal; fsAttribute : cardinal; fsStateOld : cardinal; fsAttributeOld : cardinal; rclItem : RECTL; idItem : longint; hItem : cardinal; end; POWNERITEM = ^OWNERITEM; PARAM = record id : cardinal; cb : cardinal; ab : array[0..1-1] of BYTE; end; PPARAM = ^PARAM; PRESPARAMS = record cb : cardinal; aparam : array[0..1-1] of PARAM; end; PPRESPARAMS = ^PRESPARAMS; TRACKINFO = record cxBorder : longint; cyBorder : longint; cxGrid : longint; cyGrid : longint; cxKeyboard : longint; cyKeyboard : longint; rclTrack : RECTL; rclBoundary : RECTL; ptlMinTrackSize : POINTL; ptlMaxTrackSize : POINTL; fs : cardinal; end; PTRACKINFO = ^TRACKINFO; CURSORINFO = record hwnd : cardinal; x : longint; y : longint; cx : longint; cy : longint; fs : cardinal; rclClip : RECTL; end; PCURSORINFO = ^CURSORINFO; POINTERINFO = record fPointer : cardinal; xHotspot : longint; yHotspot : longint; hbmPointer : cardinal; hbmColor : cardinal; hbmMiniPointer : cardinal; hbmMiniColor : cardinal; end; PPOINTERINFO = ^POINTERINFO; SMHSTRUCT = record mp2 : pointer; mp1 : pointer; msg : cardinal; hwnd : cardinal; model : cardinal; end; PSMHSTRUCT = ^SMHSTRUCT; ERRINFO = record cbFixedErrInfo : cardinal; idError : cardinal; cDetailLevel : cardinal; offaoffszMsg : cardinal; offBinaryData : cardinal; end; PERRINFO = ^ERRINFO; CONVCONTEXT = record cb : cardinal; fsContext : cardinal; idCountry : cardinal; usCodepage : cardinal; usLangID : cardinal; usSubLangID : cardinal; end; PCONVCONTEXT = ^CONVCONTEXT; DDEINIT = record cb : cardinal; pszAppName : pchar; pszTopic : pchar; offConvContext : cardinal; end; PDDEINIT = ^DDEINIT; DDESTRUCT = record cbData : cardinal; fsStatus : word; usFormat : word; offszItemName : word; offabData : word; end; PDDESTRUCT = ^DDESTRUCT; DESKTOP = record cbSize : cardinal; hbm : cardinal; x : longint; y : longint; fl : cardinal; lTileCount : longint; szFile : array[0..260-1] of shortint; end; PDESKTOP = ^DESKTOP; {$PACKRECORDS 1} CMDMSG = record cmd : word; unused : word; source : word; fMouse : word; end; PCMDMSG = ^CMDMSG; MSEMSG = record x : integer; y : integer; codeHitTest : word; fsInp : word; end; PMSEMSG = ^MSEMSG; CHRMSG = record fs : word; cRepeat : byte; scancode : byte; chr : word; vkey : word; end; PCHRMSG = ^CHRMSG; {$PACKRECORDS NORMAL} {$PACKRECORDS 2} DLGTITEM = record fsItemStatus : word; cChildren : word; cchClassName : word; offClassName : word; cchText : word; offText : word; flStyle : cardinal; x : integer; y : integer; cx : integer; cy : integer; id : word; offPresParams : word; offCtlData : word; end; PDLGTITEM = ^DLGTITEM; DLGTEMPLATE = record cbTemplate : word; _type : word; codepage : word; offadlgti : word; fsTemplateStatus : word; iItemFocus : word; coffPresParams : word; adlgti : array[0..0] of DLGTITEM; end; PDLGTEMPLATE = ^DLGTEMPLATE; BTNCDATA = record cb : word; fsCheckState : word; fsHiliteState : word; hImage : cardinal; end; PBTNCDATA = ^BTNCDATA; ENTRYFDATA = record cb : word; cchEditLimit : word; ichMinSel : word; ichMaxSel : word; end; PENTRYFDATA = ^ENTRYFDATA; MENUITEM = record iPosition : integer; afStyle : word; afAttribute : word; id : word; hwndSubMenu : cardinal; hItem : cardinal; end; PMENUITEM = ^MENUITEM; SBCDATA = record cb : word; sHilite : word; posFirst : integer; posLast : integer; posThumb : integer; cVisible : integer; cTotal : integer; end; PSBCDATA = ^SBCDATA; FRAMECDATA = record cb : word; flCreateFlags : cardinal; hmodResources : word; idResources : word; end; PFRAMECDATA = ^FRAMECDATA; ACCEL = record fs : word; key : word; cmd : word; end; PACCEL = ^ACCEL; ACCELTABLE = record cAccel : word; codepage : word; aaccel : array[0..1-1] of ACCEL; end; PACCELTABLE = ^ACCELTABLE; MFP = record sizeBounds : POINTL; sizeMM : POINTL; cbLength : cardinal; mapMode : word; reserved : word; abData : array[0..1-1] of BYTE; end; PMFP = ^MFP; CPTEXT = record idCountry : word; usCodepage : word; usLangID : word; usSubLangID : word; abText : array[0..1-1] of BYTE; end; PCPTEXT = ^CPTEXT; {$PACKRECORDS NORMAL} {Names beginning with T for compatibility} TQVERSDATA = QVERSDATA; TSWP = SWP; TCREATESTRUCT = CREATESTRUCT; TCLASSINFO = CLASSINFO; TQMSQ = QMSG; TMQINFO = MQINFO; TWNDPARAMS = WNDPARAMS; TUSERBUTTON = USERBUTTON; TOWNERITEM = OWNERITEM; TPARAM = PARAM; TPRESPARAMS = PRESPARAMS; TTRACKINFO = TRACKINFO; TCURSORINFO = CURSORINFO; TPOINTERINFO = POINTERINFO; TSMHSTRUCT = SMHSTRUCT; TERRINFO = ERRINFO; TCONVCONTEXT = CONVCONTEXT; TDDEINIT = DDEINIT; TDDESTRUCT = DDESTRUCT; TDESKTOP = DESKTOP; TCMDMSG = CMDMSG; TMSEMSG = MSEMSG; TCHRMSG = CHRMSG; TDLGTITEM = DLGTITEM; TDLGTEMPLATE = DLGTEMPLATE; TBTNCDATA = BTNCDATA; TENTRYFDATA = ENTRYFDATA; TMENUITEM = MENUITEM; TSBCDATA = SBCDATA; TFRAMECDATA = FRAMECDATA; TACCEL = ACCEL; TACCELTABLE = ACCELTABLE; TMPF = MFP; TCPTEXT = CPTEXT; const WS_VISIBLE = $80000000; WS_DISABLED = $40000000; WS_CLIPCHILDREN = $20000000; WS_CLIPSIBLINGS = $10000000; WS_PARENTCLIP = $08000000; WS_SAVEBITS = $04000000; WS_SYNCPAINT = $02000000; WS_MINIMIZED = $01000000; WS_MAXIMIZED = $00800000; WS_ANIMATE = $00400000; WS_GROUP = $00010000; WS_TABSTOP = $00020000; WS_MULTISELECT = $00040000; CS_MOVENOTIFY = $00000001; CS_SIZEREDRAW = $00000004; CS_HITTEST = $00000008; CS_PUBLIC = $00000010; CS_FRAME = $00000020; CS_CLIPCHILDREN = $20000000; CS_CLIPSIBLINGS = $10000000; CS_PARENTCLIP = $08000000; CS_SAVEBITS = $04000000; CS_SYNCPAINT = $02000000; HWND_DESKTOP = 1; HWND_OBJECT = 2; HWND_TOP = 3; HWND_BOTTOM = 4; HWND_THREADCAPTURE = 5; PSF_LOCKWINDOWUPDATE = $0001; PSF_CLIPUPWARDS = $0002; PSF_CLIPDOWNWARDS = $0004; PSF_CLIPSIBLINGS = $0008; PSF_CLIPCHILDREN = $0010; PSF_PARENTCLIP = $0020; SW_SCROLLCHILDREN = $0001; SW_INVALIDATERGN = $0002; QV_OS2 = $0000; QV_CMS = $0001; QV_TSO = $0002; QV_TSOBATCH = $0003; QV_OS400 = $0004; QW_NEXT = 0; QW_PREV = 1; QW_TOP = 2; QW_BOTTOM = 3; QW_OWNER = 4; QW_PARENT = 5; QW_NEXTTOP = 6; QW_PREVTOP = 7; QW_FRAMEOWNER = 8; AWP_MINIMIZED = $00010000; AWP_MAXIMIZED = $00020000; AWP_RESTORED = $00040000; AWP_ACTIVATE = $00080000; AWP_DEACTIVATE = $00100000; SWP_SIZE = $0001; SWP_MOVE = $0002; SWP_ZORDER = $0004; SWP_SHOW = $0008; SWP_HIDE = $0010; SWP_NOREDRAW = $0020; SWP_NOADJUST = $0040; SWP_ACTIVATE = $0080; SWP_DEACTIVATE = $0100; SWP_EXTSTATECHANGE = $0200; SWP_MINIMIZE = $0400; SWP_MAXIMIZE = $0800; SWP_RESTORE = $1000; SWP_FOCUSACTIVATE = $2000; SWP_FOCUSDEACTIVATE = $4000; SWP_NOAUTOCLOSE = $8000; DBM_NORMAL = $0000; DBM_INVERT = $0001; DBM_HALFTONE = $0002; DBM_STRETCH = $0004; DBM_IMAGEATTRS = $0008; DT_LEFT = $0000; DT_QUERYEXTENT = $0002; DT_UNDERSCORE = $0010; DT_STRIKEOUT = $0020; DT_TEXTATTRS = $0040; DT_EXTERNALLEADING = $0080; DT_CENTER = $0100; DT_RIGHT = $0200; DT_TOP = $0000; DT_VCENTER = $0400; DT_BOTTOM = $0800; DT_HALFTONE = $1000; DT_MNEMONIC = $2000; DT_WORDBREAK = $4000; DT_ERASERECT = $8000; DB_PATCOPY = $0000; DB_PATINVERT = $0001; DB_DESTINVERT = $0002; DB_AREAMIXMODE = $0003; DB_ROP = $0007; DB_INTERIOR = $0008; DB_AREAATTRS = $0010; DB_STANDARD = $0100; DB_DLGBORDER = $0200; QWS_USER = 0; QWS_ID = -1; QWS_MIN = -1; QWL_USER = 0; QWL_STYLE = -2; QWP_PFNWP = -3; QWL_HMQ = -4; QWL_RESERVED = -5; QWL_MIN = -6; QWL_HHEAP = $0004; QWL_HWNDFOCUSSAVE = $0018; QWL_DEFBUTTON = $0040; QWL_PSSCBLK = $0048; QWL_PFEPBLK = $004c; QWL_PSTATBLK = $0050; QWS_FLAGS = $0008; QWS_RESULT = $000a; QWS_XRESTORE = $000c; QWS_YRESTORE = $000e; QWS_CXRESTORE = $0010; QWS_CYRESTORE = $0012; QWS_XMINIMIZE = $0014; QWS_YMINIMIZE = $0016; WM_NULL = $0000; WM_CREATE = $0001; WM_DESTROY = $0002; WM_ENABLE = $0004; WM_SHOW = $0005; WM_MOVE = $0006; WM_SIZE = $0007; WM_ADJUSTWINDOWPOS = $0008; WM_CALCVALIDRECTS = $0009; WM_SETWINDOWPARAMS = $000a; WM_QUERYWINDOWPARAMS = $000b; WM_HITTEST = $000c; WM_ACTIVATE = $000d; WM_SETFOCUS = $000f; WM_SETSELECTION = $0010; WM_PPAINT = $0011; WM_PSETFOCUS = $0012; WM_PSYSCOLORCHANGE = $0013; WM_PSIZE = $0014; WM_PACTIVATE = $0015; WM_PCONTROL = $0016; WM_COMMAND = $0020; WM_SYSCOMMAND = $0021; WM_HELP = $0022; WM_PAINT = $0023; WM_TIMER = $0024; WM_SEM1 = $0025; WM_SEM2 = $0026; WM_SEM3 = $0027; WM_SEM4 = $0028; WM_CLOSE = $0029; WM_QUIT = $002a; WM_SYSCOLORCHANGE = $002b; WM_SYSVALUECHANGED = $002d; WM_APPTERMINATENOTIFY = $002e; WM_PRESPARAMCHANGED = $002f; WM_CONTROL = $0030; WM_VSCROLL = $0031; WM_HSCROLL = $0032; WM_INITMENU = $0033; WM_MENUSELECT = $0034; WM_MENUEND = $0035; WM_DRAWITEM = $0036; WM_MEASUREITEM = $0037; WM_CONTROLPOINTER = $0038; WM_QUERYDLGCODE = $003a; WM_INITDLG = $003b; WM_SUBSTITUTESTRING = $003c; WM_MATCHMNEMONIC = $003d; WM_SAVEAPPLICATION = $003e; WM_HELPBASE = $0F00; WM_HELPTOP = $0FFF; WM_USER = $1000; CMDSRC_PUSHBUTTON = 1; CMDSRC_MENU = 2; CMDSRC_ACCELERATOR = 3; CMDSRC_FONTDLG = 4; CMDSRC_FILEDLG = 5; CMDSRC_PRINTDLG = 6; CMDSRC_COLORDLG = 7; CMDSRC_OTHER = 0; PM_REMOVE = $0001; PM_NOREMOVE = $0000; RUM_IN = 1; RUM_OUT = 2; RUM_INOUT = 3; SMD_DELAYED = $0001; SMD_IMMEDIATE = $0002; SSM_SYNCHRONOUS = $0001; SSM_ASYNCHRONOUS = $0002; SSM_MIXED = $0003; CVR_ALIGNLEFT = $0001; CVR_ALIGNBOTTOM = $0002; CVR_ALIGNRIGHT = $0004; CVR_ALIGNTOP = $0008; CVR_REDRAW = $0010; HT_NORMAL = 0; HT_TRANSPARENT = (-1); HT_DISCARD = (-2); HT_ERROR = (-3); WPM_TEXT = $0001; WPM_CTLDATA = $0002; WPM_PRESPARAMS = $0004; WPM_CCHTEXT = $0008; WPM_CBCTLDATA = $0010; WPM_CBPRESPARAMS = $0020; BMSG_POST = $0000; BMSG_SEND = $0001; BMSG_POSTQUEUE = $0002; BMSG_DESCENDANTS = $0004; BMSG_FRAMEONLY = $0008; QS_KEY = $0001; QS_MOUSEBUTTON = $0002; QS_MOUSEMOVE = $0004; QS_MOUSE = $0006; QS_TIMER = $0008; QS_PAINT = $0010; QS_POSTMSG = $0020; QS_SEM1 = $0040; QS_SEM2 = $0080; QS_SEM3 = $0100; QS_SEM4 = $0200; QS_SENDMSG = $0400; SMIM_ALL = $0EFF; SMI_NOINTEREST = $0001; SMI_INTEREST = $0002; SMI_RESET = $0004; SMI_AUTODISPATCH = $0008; FC_NOSETFOCUS = $0001; FC_NOBRINGTOTOP = FC_NOSETFOCUS; FC_NOLOSEFOCUS = $0002; FC_NOBRINGTOPFIRSTWINDOW = FC_NOLOSEFOCUS; FC_NOSETACTIVE = $0004; FC_NOLOSEACTIVE = $0008; FC_NOSETSELECTION = $0010; FC_NOLOSESELECTION = $0020; QFC_NEXTINCHAIN = $0001; QFC_ACTIVE = $0002; QFC_FRAME = $0003; QFC_SELECTACTIVE = $0004; QFC_PARTOFCHAIN = $0005; WM_MOUSEFIRST = $0070; WM_MOUSELAST = $0079; WM_BUTTONCLICKFIRST = $0071; WM_BUTTONCLICKLAST = $0079; WM_MOUSEMOVE = $0070; WM_BUTTON1DOWN = $0071; WM_BUTTON1UP = $0072; WM_BUTTON1DBLCLK = $0073; WM_BUTTON2DOWN = $0074; WM_BUTTON2UP = $0075; WM_BUTTON2DBLCLK = $0076; WM_BUTTON3DOWN = $0077; WM_BUTTON3UP = $0078; WM_BUTTON3DBLCLK = $0079; WM_EXTMOUSEFIRST = $0410; WM_EXTMOUSELAST = $0419; WM_CHORD = $0410; WM_BUTTON1MOTIONSTART = $0411; WM_BUTTON1MOTIONEND = $0412; WM_BUTTON1CLICK = $0413; WM_BUTTON2MOTIONSTART = $0414; WM_BUTTON2MOTIONEND = $0415; WM_BUTTON2CLICK = $0416; WM_BUTTON3MOTIONSTART = $0417; WM_BUTTON3MOTIONEND = $0418; WM_BUTTON3CLICK = $0419; WM_MOUSETRANSLATEFIRST = $0420; WM_MOUSETRANSLATELAST = $0428; WM_BEGINDRAG = $0420; WM_ENDDRAG = $0421; WM_SINGLESELECT = $0422; WM_OPEN = $0423; WM_CONTEXTMENU = $0424; WM_CONTEXTHELP = $0425; WM_TEXTEDIT = $0426; WM_BEGINSELECT = $0427; WM_ENDSELECT = $0428; WM_CHAR = $007a; WM_VIOCHAR = $007b; KC_NONE = $0000; KC_CHAR = $0001; KC_VIRTUALKEY = $0002; KC_SCANCODE = $0004; KC_SHIFT = $0008; KC_CTRL = $0010; KC_ALT = $0020; KC_KEYUP = $0040; KC_PREVDOWN = $0080; KC_LONEKEY = $0100; KC_DEADKEY = $0200; KC_COMPOSITE = $0400; KC_INVALIDCOMP = $0800; KC_TOGGLE = $1000; KC_INVALIDCHAR = $2000; KC_DBCSRSRVD1 = $4000; KC_DBCSRSRVD2 = $8000; INP_NONE = $0000; INP_KBD = $0001; INP_MULT = $0002; INP_RES2 = $0004; INP_SHIFT = $0008; INP_CTRL = $0010; INP_ALT = $0020; INP_RES3 = $0040; INP_RES4 = $0080; INP_IGNORE = $FFFF; VK_BUTTON1 = $01; VK_BUTTON2 = $02; VK_BUTTON3 = $03; VK_BREAK = $04; VK_BACKSPACE = $05; VK_TAB = $06; VK_BACKTAB = $07; VK_NEWLINE = $08; VK_SHIFT = $09; VK_CTRL = $0A; VK_ALT = $0B; VK_ALTGRAF = $0C; VK_PAUSE = $0D; VK_CAPSLOCK = $0E; VK_ESC = $0F; VK_SPACE = $10; VK_PAGEUP = $11; VK_PAGEDOWN = $12; VK_END = $13; VK_HOME = $14; VK_LEFT = $15; VK_UP = $16; VK_RIGHT = $17; VK_DOWN = $18; VK_PRINTSCRN = $19; VK_INSERT = $1A; VK_DELETE = $1B; VK_SCRLLOCK = $1C; VK_NUMLOCK = $1D; VK_ENTER = $1E; VK_SYSRQ = $1F; VK_F1 = $20; VK_F2 = $21; VK_F3 = $22; VK_F4 = $23; VK_F5 = $24; VK_F6 = $25; VK_F7 = $26; VK_F8 = $27; VK_F9 = $28; VK_F10 = $29; VK_F11 = $2A; VK_F12 = $2B; VK_F13 = $2C; VK_F14 = $2D; VK_F15 = $2E; VK_F16 = $2F; VK_F17 = $30; VK_F18 = $31; VK_F19 = $32; VK_F20 = $33; VK_F21 = $34; VK_F22 = $35; VK_F23 = $36; VK_F24 = $37; VK_ENDDRAG = $38; VK_MENU = VK_F10; VK_DBCSFIRST = $0080; VK_DBCSLAST = $00ff; VK_USERFIRST = $0100; VK_USERLAST = $01ff; WM_JOURNALNOTIFY = $007c; JRN_QUEUESTATUS = $00000001; JRN_PHYSKEYSTATE = $00000002; DID_OK = 1; DID_CANCEL = 2; DID_ERROR = $ffff; WA_WARNING = 0; WA_NOTE = 1; WA_ERROR = 2; WA_CWINALARMS = 3; MB_OK = $0000; MB_OKCANCEL = $0001; MB_RETRYCANCEL = $0002; MB_ABORTRETRYIGNORE = $0003; MB_YESNO = $0004; MB_YESNOCANCEL = $0005; MB_CANCEL = $0006; MB_ENTER = $0007; MB_ENTERCANCEL = $0008; MB_NOICON = $0000; MB_CUANOTIFICATION = $0000; MB_ICONQUESTION = $0010; MB_ICONEXCLAMATION = $0020; MB_CUAWARNING = $0020; MB_ICONASTERISK = $0030; MB_ICONHAND = $0040; MB_CUACRITICAL = $0040; MB_QUERY = MB_ICONQUESTION; MB_WARNING = MB_CUAWARNING; MB_INFORMATION = MB_ICONASTERISK; MB_CRITICAL = MB_CUACRITICAL; MB_ERROR = MB_CRITICAL; MB_DEFBUTTON1 = $0000; MB_DEFBUTTON2 = $0100; MB_DEFBUTTON3 = $0200; MB_APPLMODAL = $0000; MB_SYSTEMMODAL = $1000; MB_HELP = $2000; MB_MOVEABLE = $4000; MBID_OK = 1; MBID_CANCEL = 2; MBID_ABORT = 3; MBID_RETRY = 4; MBID_IGNORE = 5; MBID_YES = 6; MBID_NO = 7; MBID_HELP = 8; MBID_ENTER = 9; MBID_ERROR = $ffff; DLGC_ENTRYFIELD = $0001; DLGC_BUTTON = $0002; DLGC_RADIOBUTTON = $0004; DLGC_STATIC = $0008; DLGC_DEFAULT = $0010; DLGC_PUSHBUTTON = $0020; DLGC_CHECKBOX = $0040; DLGC_SCROLLBAR = $0080; DLGC_MENU = $0100; DLGC_TABONCLICK = $0200; DLGC_MLE = $0400; EDI_FIRSTTABITEM = 0; EDI_LASTTABITEM = 1; EDI_NEXTTABITEM = 2; EDI_PREVTABITEM = 3; EDI_FIRSTGROUPITEM = 4; EDI_LASTGROUPITEM = 5; EDI_NEXTGROUPITEM = 6; EDI_PREVGROUPITEM = 7; SS_TEXT = $0001; SS_GROUPBOX = $0002; SS_ICON = $0003; SS_BITMAP = $0004; SS_FGNDRECT = $0005; SS_HALFTONERECT = $0006; SS_BKGNDRECT = $0007; SS_FGNDFRAME = $0008; SS_HALFTONEFRAME = $0009; SS_BKGNDFRAME = $000a; SS_SYSICON = $000b; SS_AUTOSIZE = $0040; SM_SETHANDLE = $0100; SM_QUERYHANDLE = $0101; BS_PUSHBUTTON = 0; BS_CHECKBOX = 1; BS_AUTOCHECKBOX = 2; BS_RADIOBUTTON = 3; BS_AUTORADIOBUTTON = 4; BS_3STATE = 5; BS_AUTO3STATE = 6; BS_USERBUTTON = 7; BS_PRIMARYSTYLES = $000f; BS_BITMAP = $0040; BS_ICON = $0080; BS_HELP = $0100; BS_SYSCOMMAND = $0200; BS_DEFAULT = $0400; BS_NOPOINTERFOCUS = $0800; BS_NOBORDER = $1000; BS_NOCURSORSELECT = $2000; BS_AUTOSIZE = $4000; BM_CLICK = $0120; BM_QUERYCHECKINDEX = $0121; BM_QUERYHILITE = $0122; BM_SETHILITE = $0123; BM_QUERYCHECK = $0124; BM_SETCHECK = $0125; BM_SETDEFAULT = $0126; BN_CLICKED = 1; BN_DBLCLICKED = 2; BN_PAINT = 3; BDS_HILITED = $0100; BDS_DISABLED = $0200; BDS_DEFAULT = $0400; ES_LEFT = $00000000; ES_CENTER = $00000001; ES_RIGHT = $00000002; ES_AUTOSCROLL = $00000004; ES_MARGIN = $00000008; ES_AUTOTAB = $00000010; ES_READONLY = $00000020; ES_COMMAND = $00000040; ES_UNREADABLE = $00000080; ES_AUTOSIZE = $00000200; ES_ANY = $00000000; ES_SBCS = $00001000; ES_DBCS = $00002000; ES_MIXED = $00003000; CBS_SIMPLE = $0001; CBS_DROPDOWN = $0002; CBS_DROPDOWNLIST = $0004; CBS_COMPATIBLE = $0008; CBID_LIST = $029A; CBID_EDIT = $029B; CBM_SHOWLIST = $0170; CBM_HILITE = $0171; CBM_ISLISTSHOWING = $0172; CBN_EFCHANGE = 1; CBN_EFSCROLL = 2; CBN_MEMERROR = 3; CBN_LBSELECT = 4; CBN_LBSCROLL = 5; CBN_SHOWLIST = 6; CBN_ENTER = 7; EM_QUERYCHANGED = $0140; EM_QUERYSEL = $0141; EM_SETSEL = $0142; EM_SETTEXTLIMIT = $0143; EM_CUT = $0144; EM_COPY = $0145; EM_CLEAR = $0146; EM_PASTE = $0147; EM_QUERYFIRSTCHAR = $0148; EM_SETFIRSTCHAR = $0149; EM_QUERYREADONLY = $014a; EM_SETREADONLY = $014b; EM_SETINSERTMODE = $014c; EN_SETFOCUS = $0001; EN_KILLFOCUS = $0002; EN_CHANGE = $0004; EN_SCROLL = $0008; EN_MEMERROR = $0010; EN_OVERFLOW = $0020; EN_INSERTMODETOGGLE = $0040; LS_MULTIPLESEL = $00000001; LS_OWNERDRAW = $00000002; LS_NOADJUSTPOS = $00000004; LS_HORZSCROLL = $00000008; LS_EXTENDEDSEL = $00000010; LN_SELECT = 1; LN_SETFOCUS = 2; LN_KILLFOCUS = 3; LN_SCROLL = 4; LN_ENTER = 5; LM_QUERYITEMCOUNT = $0160; LM_INSERTITEM = $0161; LM_SETTOPINDEX = $0162; LM_DELETEITEM = $0163; LM_SELECTITEM = $0164; LM_QUERYSELECTION = $0165; LM_SETITEMTEXT = $0166; LM_QUERYITEMTEXTLENGTH = $0167; LM_QUERYITEMTEXT = $0168; LM_SETITEMHANDLE = $0169; LM_QUERYITEMHANDLE = $016a; LM_SEARCHSTRING = $016b; LM_SETITEMHEIGHT = $016c; LM_QUERYTOPINDEX = $016d; LM_DELETEALL = $016e; LIT_CURSOR = (-4); LIT_ERROR = (-3); LIT_MEMERROR = (-2); LIT_NONE = (-1); LIT_FIRST = (-1); LIT_END = (-1); LIT_SORTASCENDING = (-2); LIT_SORTDESCENDING = (-3); LSS_SUBSTRING = $0001; LSS_PREFIX = $0002; LSS_CASESENSITIVE = $0004; MS_ACTIONBAR = $00000001; MS_TITLEBUTTON = $00000002; MS_VERTICALFLIP = $00000004; MS_CONDITIONALCASCADE = $00000040; MM_INSERTITEM = $0180; MM_DELETEITEM = $0181; MM_QUERYITEM = $0182; MM_SETITEM = $0183; MM_QUERYITEMCOUNT = $0184; MM_STARTMENUMODE = $0185; MM_ENDMENUMODE = $0186; MM_REMOVEITEM = $0188; MM_SELECTITEM = $0189; MM_QUERYSELITEMID = $018a; MM_QUERYITEMTEXT = $018b; MM_QUERYITEMTEXTLENGTH = $018c; MM_SETITEMHANDLE = $018d; MM_SETITEMTEXT = $018e; MM_ITEMPOSITIONFROMID = $018f; MM_ITEMIDFROMPOSITION = $0190; MM_QUERYITEMATTR = $0191; MM_SETITEMATTR = $0192; MM_ISITEMVALID = $0193; MM_QUERYITEMRECT = $0194; MM_QUERYDEFAULTITEMID = $0431; MM_SETDEFAULTITEMID = $0432; MIT_END = (-1); MIT_NONE = (-1); MIT_MEMERROR = (-1); MIT_ERROR = (-1); MIT_FIRST = (-2); MIT_LAST = (-3); MID_NONE = MIT_NONE; MID_ERROR = (-1); MIS_TEXT = $0001; MIS_BITMAP = $0002; MIS_SEPARATOR = $0004; MIS_OWNERDRAW = $0008; MIS_SUBMENU = $0010; MIS_MULTMENU = $0020; MIS_SYSCOMMAND = $0040; MIS_HELP = $0080; MIS_STATIC = $0100; MIS_BUTTONSEPARATOR = $0200; MIS_BREAK = $0400; MIS_BREAKSEPARATOR = $0800; MIS_GROUP = $1000; MIS_SINGLE = $2000; MIA_NODISMISS = $0020; MIA_FRAMED = $1000; MIA_CHECKED = $2000; MIA_DISABLED = $4000; MIA_HILITED = $8000; PU_POSITIONONITEM = $0001; PU_HCONSTRAIN = $0002; PU_VCONSTRAIN = $0004; PU_NONE = $0000; PU_MOUSEBUTTON1DOWN = $0008; PU_MOUSEBUTTON2DOWN = $0010; PU_MOUSEBUTTON3DOWN = $0018; PU_SELECTITEM = $0020; PU_MOUSEBUTTON1 = $0040; PU_MOUSEBUTTON2 = $0080; PU_MOUSEBUTTON3 = $0100; PU_KEYBOARD = $0200; SBS_HORZ = 0; SBS_VERT = 1; SBS_THUMBSIZE = 2; SBS_AUTOTRACK = 4; SBS_AUTOSIZE = $2000; SBM_SETSCROLLBAR = $01a0; SBM_SETPOS = $01a1; SBM_QUERYPOS = $01a2; SBM_QUERYRANGE = $01a3; SBM_SETTHUMBSIZE = $01a6; SB_LINEUP = 1; SB_LINEDOWN = 2; SB_LINELEFT = 1; SB_LINERIGHT = 2; SB_PAGEUP = 3; SB_PAGEDOWN = 4; SB_PAGELEFT = 3; SB_PAGERIGHT = 4; SB_SLIDERTRACK = 5; SB_SLIDERPOSITION = 6; SB_ENDSCROLL = 7; FCF_TITLEBAR = $00000001; FCF_SYSMENU = $00000002; FCF_MENU = $00000004; FCF_SIZEBORDER = $00000008; FCF_MINBUTTON = $00000010; FCF_MAXBUTTON = $00000020; FCF_MINMAX = $00000030; FCF_VERTSCROLL = $00000040; FCF_HORZSCROLL = $00000080; FCF_DLGBORDER = $00000100; FCF_BORDER = $00000200; FCF_SHELLPOSITION = $00000400; FCF_TASKLIST = $00000800; FCF_NOBYTEALIGN = $00001000; FCF_NOMOVEWITHOWNER = $00002000; FCF_ICON = $00004000; FCF_ACCELTABLE = $00008000; FCF_SYSMODAL = $00010000; FCF_SCREENALIGN = $00020000; FCF_MOUSEALIGN = $00040000; FCF_HIDEBUTTON = $01000000; FCF_HIDEMAX = $01000020; FCF_DBE_APPSTAT = $80000000; FCF_AUTOICON = $40000000; FCF_STANDARD = $0000CC3F; FS_ICON = $00000001; FS_ACCELTABLE = $00000002; FS_SHELLPOSITION = $00000004; FS_TASKLIST = $00000008; FS_NOBYTEALIGN = $00000010; FS_NOMOVEWITHOWNER = $00000020; FS_SYSMODAL = $00000040; FS_DLGBORDER = $00000080; FS_BORDER = $00000100; FS_SCREENALIGN = $00000200; FS_MOUSEALIGN = $00000400; FS_SIZEBORDER = $00000800; FS_AUTOICON = $00001000; FS_DBE_APPSTAT = $00008000; FS_STANDARD = $0000000F; FF_FLASHWINDOW = $0001; FF_ACTIVE = $0002; FF_FLASHHILITE = $0004; FF_OWNERHIDDEN = $0008; FF_DLGDISMISSED = $0010; FF_OWNERDISABLED = $0020; FF_SELECTED = $0040; FF_NOACTIVATESWP = $0080; WM_FLASHWINDOW = $0040; WM_FORMATFRAME = $0041; WM_UPDATEFRAME = $0042; WM_FOCUSCHANGE = $0043; WM_SETBORDERSIZE = $0044; WM_TRACKFRAME = $0045; WM_MINMAXFRAME = $0046; WM_SETICON = $0047; WM_QUERYICON = $0048; WM_SETACCELTABLE = $0049; WM_QUERYACCELTABLE = $004a; WM_TRANSLATEACCEL = $004b; WM_QUERYTRACKINFO = $004c; WM_QUERYBORDERSIZE = $004d; WM_NEXTMENU = $004e; WM_ERASEBACKGROUND = $004f; WM_QUERYFRAMEINFO = $0050; WM_QUERYFOCUSCHAIN = $0051; WM_OWNERPOSCHANGE = $0052; WM_CALCFRAMERECT = $0053; WM_WINDOWPOSCHANGED = $0055; WM_ADJUSTFRAMEPOS = $0056; WM_QUERYFRAMECTLCOUNT = $0059; WM_QUERYHELPINFO = $005B; WM_SETHELPINFO = $005C; WM_ERROR = $005D; WM_REALIZEPALETTE = $005E; FI_FRAME = $00000001; FI_OWNERHIDE = $00000002; FI_ACTIVATEOK = $00000004; FI_NOMOVEWITHOWNER = $00000008; FID_SYSMENU = $8002; FID_TITLEBAR = $8003; FID_MINMAX = $8004; FID_MENU = $8005; FID_VERTSCROLL = $8006; FID_HORZSCROLL = $8007; FID_CLIENT = $8008; FID_DBE_APPSTAT = $8010; FID_DBE_KBDSTAT = $8011; FID_DBE_PECIC = $8012; FID_DBE_KKPOPUP = $8013; SC_SIZE = $8000; SC_MOVE = $8001; SC_MINIMIZE = $8002; SC_MAXIMIZE = $8003; SC_CLOSE = $8004; SC_NEXT = $8005; SC_APPMENU = $8006; SC_SYSMENU = $8007; SC_RESTORE = $8008; SC_NEXTFRAME = $8009; SC_NEXTWINDOW = $8010; SC_TASKMANAGER = $8011; SC_HELPKEYS = $8012; SC_HELPINDEX = $8013; SC_HELPEXTENDED = $8014; SC_SWITCHPANELIDS = $8015; SC_DBE_FIRST = $8018; SC_DBE_LAST = $801F; SC_BEGINDRAG = $8020; SC_ENDDRAG = $8021; SC_SELECT = $8022; SC_OPEN = $8023; SC_CONTEXTMENU = $8024; SC_CONTEXTHELP = $8025; SC_TEXTEDIT = $8026; SC_BEGINSELECT = $8027; SC_ENDSELECT = $8028; SC_WINDOW = $8029; SC_HIDE = $802a; TBM_SETHILITE = $01e3; TBM_QUERYHILITE = $01e4; SV_SWAPBUTTON = 0; SV_DBLCLKTIME = 1; SV_CXDBLCLK = 2; SV_CYDBLCLK = 3; SV_CXSIZEBORDER = 4; SV_CYSIZEBORDER = 5; SV_ALARM = 6; SV_RESERVEDFIRST1 = 7; SV_RESERVEDLAST1 = 8; SV_CURSORRATE = 9; SV_FIRSTSCROLLRATE = 10; SV_SCROLLRATE = 11; SV_NUMBEREDLISTS = 12; SV_WARNINGFREQ = 13; SV_NOTEFREQ = 14; SV_ERRORFREQ = 15; SV_WARNINGDURATION = 16; SV_NOTEDURATION = 17; SV_ERRORDURATION = 18; SV_RESERVEDFIRST = 19; SV_RESERVEDLAST = 19; SV_CXSCREEN = 20; SV_CYSCREEN = 21; SV_CXVSCROLL = 22; SV_CYHSCROLL = 23; SV_CYVSCROLLARROW = 24; SV_CXHSCROLLARROW = 25; SV_CXBORDER = 26; SV_CYBORDER = 27; SV_CXDLGFRAME = 28; SV_CYDLGFRAME = 29; SV_CYTITLEBAR = 30; SV_CYVSLIDER = 31; SV_CXHSLIDER = 32; SV_CXMINMAXBUTTON = 33; SV_CYMINMAXBUTTON = 34; SV_CYMENU = 35; SV_CXFULLSCREEN = 36; SV_CYFULLSCREEN = 37; SV_CXICON = 38; SV_CYICON = 39; SV_CXPOINTER = 40; SV_CYPOINTER = 41; SV_DEBUG = 42; SV_CMOUSEBUTTONS = 43; SV_CPOINTERBUTTONS = 43; SV_POINTERLEVEL = 44; SV_CURSORLEVEL = 45; SV_TRACKRECTLEVEL = 46; SV_CTIMERS = 47; SV_MOUSEPRESENT = 48; SV_CXBYTEALIGN = 49; SV_CXALIGN = 49; SV_CYBYTEALIGN = 50; SV_CYALIGN = 50; SV_NOTRESERVED = 56; SV_EXTRAKEYBEEP = 57; SV_SETLIGHTS = 58; SV_INSERTMODE = 59; SV_MENUROLLDOWNDELAY = 64; SV_MENUROLLUPDELAY = 65; SV_ALTMNEMONIC = 66; SV_TASKLISTMOUSEACCESS = 67; SV_CXICONTEXTWIDTH = 68; SV_CICONTEXTLINES = 69; SV_CHORDTIME = 70; SV_CXCHORD = 71; SV_CYCHORD = 72; SV_CXMOTION = 73; SV_CYMOTION = 74; SV_BEGINDRAG = 75; SV_ENDDRAG = 76; SV_SINGLESELECT = 77; SV_OPEN = 78; SV_CONTEXTMENU = 79; SV_CONTEXTHELP = 80; SV_TEXTEDIT = 81; SV_BEGINSELECT = 82; SV_ENDSELECT = 83; SV_BEGINDRAGKB = 84; SV_ENDDRAGKB = 85; SV_SELECTKB = 86; SV_OPENKB = 87; SV_CONTEXTMENUKB = 88; SV_CONTEXTHELPKB = 89; SV_TEXTEDITKB = 90; SV_BEGINSELECTKB = 91; SV_ENDSELECTKB = 92; SV_ANIMATION = 93; SV_ANIMATIONSPEED = 94; SV_MONOICONS = 95; SV_KBDALTERED = 96; SV_PRINTSCREEN = 97; SV_CSYSVALUES = 98; PP_FOREGROUNDCOLOR = 1; PP_FOREGROUNDCOLORINDEX = 2; PP_BACKGROUNDCOLOR = 3; PP_BACKGROUNDCOLORINDEX = 4; PP_HILITEFOREGROUNDCOLOR = 5; PP_HILITEFOREGROUNDCOLORINDEX = 6; PP_HILITEBACKGROUNDCOLOR = 7; PP_HILITEBACKGROUNDCOLORINDEX = 8; PP_DISABLEDFOREGROUNDCOLOR = 9; PP_DISABLEDFOREGROUNDCOLORINDEX = 10; PP_DISABLEDBACKGROUNDCOLOR = 11; PP_DISABLEDBACKGROUNDCOLORINDEX = 12; PP_BORDERCOLOR = 13; PP_BORDERCOLORINDEX = 14; PP_FONTNAMESIZE = 15; PP_FONTHANDLE = 16; PP_RESERVED = 17; PP_ACTIVECOLOR = 18; PP_ACTIVECOLORINDEX = 19; PP_INACTIVECOLOR = 20; PP_INACTIVECOLORINDEX = 21; PP_ACTIVETEXTFGNDCOLOR = 22; PP_ACTIVETEXTFGNDCOLORINDEX = 23; PP_ACTIVETEXTBGNDCOLOR = 24; PP_ACTIVETEXTBGNDCOLORINDEX = 25; PP_INACTIVETEXTFGNDCOLOR = 26; PP_INACTIVETEXTFGNDCOLORINDEX = 27; PP_INACTIVETEXTBGNDCOLOR = 28; PP_INACTIVETEXTBGNDCOLORINDEX = 29; PP_SHADOW = 30; PP_MENUFOREGROUNDCOLOR = 31; PP_MENUFOREGROUNDCOLORINDEX = 32; PP_MENUBACKGROUNDCOLOR = 33; PP_MENUBACKGROUNDCOLORINDEX = 34; PP_MENUHILITEFGNDCOLOR = 35; PP_MENUHILITEFGNDCOLORINDEX = 36; PP_MENUHILITEBGNDCOLOR = 37; PP_MENUHILITEBGNDCOLORINDEX = 38; PP_MENUDISABLEDFGNDCOLOR = 39; PP_MENUDISABLEDFGNDCOLORINDEX = 40; PP_MENUDISABLEDBGNDCOLOR = 41; PP_MENUDISABLEDBGNDCOLORINDEX = 42; PP_USER = $8000; QPF_NOINHERIT = $0001; QPF_ID1COLORINDEX = $0002; QPF_ID2COLORINDEX = $0004; QPF_PURERGBCOLOR = $0008; QPF_VALIDFLAGS = $000F; SYSCLR_SHADOWHILITEBGND = (-50); SYSCLR_SHADOWHILITEFGND = (-49); SYSCLR_SHADOWTEXT = (-48); SYSCLR_ENTRYFIELD = (-47); SYSCLR_MENUDISABLEDTEXT = (-46); SYSCLR_MENUHILITE = (-45); SYSCLR_MENUHILITEBGND = (-44); SYSCLR_PAGEBACKGROUND = (-43); SYSCLR_FIELDBACKGROUND = (-42); SYSCLR_BUTTONLIGHT = (-41); SYSCLR_BUTTONMIDDLE = (-40); SYSCLR_BUTTONDARK = (-39); SYSCLR_BUTTONDEFAULT = (-38); SYSCLR_TITLEBOTTOM = (-37); SYSCLR_SHADOW = (-36); SYSCLR_ICONTEXT = (-35); SYSCLR_DIALOGBACKGROUND = (-34); SYSCLR_HILITEFOREGROUND = (-33); SYSCLR_HILITEBACKGROUND = (-32); SYSCLR_INACTIVETITLETEXTBGND = (-31); SYSCLR_ACTIVETITLETEXTBGND = (-30); SYSCLR_INACTIVETITLETEXT = (-29); SYSCLR_ACTIVETITLETEXT = (-28); SYSCLR_OUTPUTTEXT = (-27); SYSCLR_WINDOWSTATICTEXT = (-26); SYSCLR_SCROLLBAR = (-25); SYSCLR_BACKGROUND = (-24); SYSCLR_ACTIVETITLE = (-23); SYSCLR_INACTIVETITLE = (-22); SYSCLR_MENU = (-21); SYSCLR_WINDOW = (-20); SYSCLR_WINDOWFRAME = (-19); SYSCLR_MENUTEXT = (-18); SYSCLR_WINDOWTEXT = (-17); SYSCLR_TITLETEXT = (-16); SYSCLR_ACTIVEBORDER = (-15); SYSCLR_INACTIVEBORDER = (-14); SYSCLR_APPWORKSPACE = (-13); SYSCLR_HELPBACKGROUND = (-12); SYSCLR_HELPTEXT = (-11); SYSCLR_HELPHILITE = (-10); SYSCLR_CSYSCOLORS = 41; TID_CURSOR = $ffff; TID_SCROLL = $fffe; TID_FLASHWINDOW = $fffd; TID_USERMAX = $7fff; AF_CHAR = $0001; AF_VIRTUALKEY = $0002; AF_SCANCODE = $0004; AF_SHIFT = $0008; AF_CONTROL = $0010; AF_ALT = $0020; AF_LONEKEY = $0040; AF_SYSCOMMAND = $0100; AF_HELP = $0200; EAF_DEFAULTOWNER = $0001; EAF_UNCHANGEABLE = $0002; EAF_REUSEICON = $0004; TF_LEFT = $0001; TF_TOP = $0002; TF_RIGHT = $0004; TF_BOTTOM = $0008; TF_MOVE = $000F; TF_SETPOINTERPOS = $0010; TF_GRID = $0020; TF_STANDARD = $0040; TF_ALLINBOUNDARY = $0080; TF_VALIDATETRACKRECT = $0100; TF_PARTINBOUNDARY = $0200; WM_RENDERFMT = $0060; WM_RENDERALLFMTS = $0061; WM_DESTROYCLIPBOARD = $0062; WM_PAINTCLIPBOARD = $0063; WM_SIZECLIPBOARD = $0064; WM_HSCROLLCLIPBOARD = $0065; WM_VSCROLLCLIPBOARD = $0066; WM_DRAWCLIPBOARD = $0067; CF_TEXT = 1; CF_BITMAP = 2; CF_DSPTEXT = 3; CF_DSPBITMAP = 4; CF_METAFILE = 5; CF_DSPMETAFILE = 6; CF_PALETTE = 9; SZFMT_TEXT = '#1'; SZFMT_BITMAP = '#2'; SZFMT_DSPTEXT = '#3'; SZFMT_DSPBITMAP = '#4'; SZFMT_METAFILE = '#5'; SZFMT_DSPMETAFILE = '#6'; SZFMT_PALETTE = '#9'; SZFMT_SYLK = 'Sylk'; SZFMT_DIF = 'Dif'; SZFMT_TIFF = 'Tiff'; SZFMT_OEMTEXT = 'OemText'; SZFMT_DIB = 'Dib'; SZFMT_OWNERDISPLAY = 'OwnerDisplay'; SZFMT_LINK = 'Link'; SZFMT_METAFILEPICT = 'MetaFilePict'; SZFMT_DSPMETAFILEPICT = 'DspMetaFilePict'; SZFMT_CPTEXT = 'Codepage Text'; SZDDEFMT_RTF = 'Rich Text Format'; SZDDEFMT_PTRPICT = 'Printer_Picture'; CFI_OWNERFREE = $0001; CFI_OWNERDISPLAY = $0002; CFI_POINTER = $0400; CFI_HANDLE = $0200; CURSOR_SOLID = $0000; CURSOR_HALFTONE = $0001; CURSOR_FRAME = $0002; CURSOR_FLASH = $0004; CURSOR_SETPOS = $8000; SPTR_ARROW = 1; SPTR_TEXT = 2; SPTR_WAIT = 3; SPTR_SIZE = 4; SPTR_MOVE = 5; SPTR_SIZENWSE = 6; SPTR_SIZENESW = 7; SPTR_SIZEWE = 8; SPTR_SIZENS = 9; SPTR_APPICON = 10; SPTR_ICONINFORMATION = 11; SPTR_ICONQUESTION = 12; SPTR_ICONERROR = 13; SPTR_ICONWARNING = 14; SPTR_CPTR = 14; SPTR_ILLEGAL = 18; SPTR_FILE = 19; SPTR_FOLDER = 20; SPTR_MULTFILE = 21; SPTR_PROGRAM = 22; SPTR_HANDICON = SPTR_ICONERROR; SPTR_QUESICON = SPTR_ICONQUESTION; SPTR_BANGICON = SPTR_ICONWARNING; SPTR_NOTEICON = SPTR_ICONINFORMATION; DP_NORMAL = $0000; DP_HALFTONED = $0001; DP_INVERTED = $0002; SBMP_OLD_SYSMENU = 1; SBMP_OLD_SBUPARROW = 2; SBMP_OLD_SBDNARROW = 3; SBMP_OLD_SBRGARROW = 4; SBMP_OLD_SBLFARROW = 5; SBMP_MENUCHECK = 6; SBMP_OLD_CHECKBOXES = 7; SBMP_BTNCORNERS = 8; SBMP_OLD_MINBUTTON = 9; SBMP_OLD_MAXBUTTON = 10; SBMP_OLD_RESTOREBUTTON = 11; SBMP_OLD_CHILDSYSMENU = 12; SBMP_DRIVE = 15; SBMP_FILE = 16; SBMP_FOLDER = 17; SBMP_TREEPLUS = 18; SBMP_TREEMINUS = 19; SBMP_PROGRAM = 22; SBMP_MENUATTACHED = 23; SBMP_SIZEBOX = 24; SBMP_SYSMENU = 25; SBMP_MINBUTTON = 26; SBMP_MAXBUTTON = 27; SBMP_RESTOREBUTTON = 28; SBMP_CHILDSYSMENU = 29; SBMP_SYSMENUDEP = 30; SBMP_MINBUTTONDEP = 31; SBMP_MAXBUTTONDEP = 32; SBMP_RESTOREBUTTONDEP = 33; SBMP_CHILDSYSMENUDEP = 34; SBMP_SBUPARROW = 35; SBMP_SBDNARROW = 36; SBMP_SBLFARROW = 37; SBMP_SBRGARROW = 38; SBMP_SBUPARROWDEP = 39; SBMP_SBDNARROWDEP = 40; SBMP_SBLFARROWDEP = 41; SBMP_SBRGARROWDEP = 42; SBMP_SBUPARROWDIS = 43; SBMP_SBDNARROWDIS = 44; SBMP_SBLFARROWDIS = 45; SBMP_SBRGARROWDIS = 46; SBMP_COMBODOWN = 47; SBMP_CHECKBOXES = 48; HK_SENDMSG = 0; HK_INPUT = 1; HK_MSGFILTER = 2; HK_JOURNALRECORD = 3; HK_JOURNALPLAYBACK = 4; HK_HELP = 5; HK_LOADER = 6; HK_REGISTERUSERMSG = 7; HK_MSGCONTROL = 8; HK_PLIST_ENTRY = 9; HK_PLIST_EXIT = 10; HK_FINDWORD = 11; HK_CODEPAGECHANGED = 12; HK_WINDOWDC = 15; HK_DESTROYWINDOW = 16; HK_CHECKMSGFILTER = 20; HMQ_CURRENT = 1; MSGF_DIALOGBOX = 1; MSGF_MESSAGEBOX = 2; MSGF_TRACK = 8; MSGF_DDEPOSTMSG = 3; HLPM_FRAME = (-1); HLPM_WINDOW = (-2); HLPM_MENU = (-3); PM_MODEL_1X = 0; PM_MODEL_2X = 1; LHK_DELETEPROC = 1; LHK_DELETELIB = 2; LHK_LOADPROC = 3; LHK_LOADLIB = 4; MCHK_MSGINTEREST = 1; MCHK_CLASSMSGINTEREST = 2; MCHK_SYNCHRONISATION = 3; MCHK_MSGMODE = 4; RUMHK_DATATYPE = 1; RUMHK_MSG = 2; {WinCompareStrings} WCS_ERROR = 0; WCS_EQ = 1; WCS_LT = 2; WCS_GT = 3; WINDBG_HWND_NOT_DESTROYED = $1022; WINDBG_HPTR_NOT_DESTROYED = $1023; WINDBG_HACCEL_NOT_DESTROYED = $1024; WINDBG_HENUM_NOT_DESTROYED = $1025; WINDBG_VISRGN_SEM_BUSY = $1026; WINDBG_USER_SEM_BUSY = $1027; WINDBG_DC_CACHE_BUSY = $1028; WINDBG_HOOK_STILL_INSTALLED = $1029; WINDBG_WINDOW_STILL_LOCKED = $102a; WINDBG_UPDATEPS_ASSERTION_FAIL = $102b; WINDBG_SENDMSG_WITHIN_USER_SEM = $102c; WINDBG_USER_SEM_NOT_ENTERED = $102d; WINDBG_PROC_NOT_EXPORTED = $102e; WINDBG_BAD_SENDMSG_cardinal = $102f; WINDBG_ABNORMAL_EXIT = $1030; WINDBG_INTERNAL_REVISION = $1031; WINDBG_INITSYSTEM_FAILED = $1032; WINDBG_HATOMTBL_NOT_DESTROYED = $1033; WINDBG_WINDOW_UNLOCK_WAIT = $1035; SZDDESYS_TOPIC = 'System'; SZDDESYS_ITEM_TOPICS = 'Topics'; SZDDESYS_ITEM_SYSITEMS = 'SysItems'; SZDDESYS_ITEM_RTNMSG = 'ReturnMessage'; SZDDESYS_ITEM_STATUS = 'Status'; SZDDESYS_ITEM_FORMATS = 'Formats'; SZDDESYS_ITEM_SECURITY = 'Security'; SZDDESYS_ITEM_ITEMFORMATS = 'ItemFormats'; SZDDESYS_ITEM_HELP = 'Help'; SZDDESYS_ITEM_PROTOCOLS = 'Protocols'; SZDDESYS_ITEM_RESTART = 'Restart'; DDECTXT_CASESENSITIVE = $0001; {DDE} DDE_FACK = $0001; DDE_FBUSY = $0002; DDE_FNODATA = $0004; DDE_FACKREQ = $0008; DDE_FRESPONSE = $0010; DDE_NOTPROCESSED = $0020; DDE_FRESERVED = $00C0; DDE_FAPPSTATUS = $FF00; DDEFMT_TEXT = $0001; DDEPM_RETRY = $00000001; DDEPM_NOFREE = $00000002; WM_DDE_FIRST = $00A0; WM_DDE_INITIATE = $00A0; WM_DDE_REQUEST = $00A1; WM_DDE_ACK = $00A2; WM_DDE_DATA = $00A3; WM_DDE_ADVISE = $00A4; WM_DDE_UNADVISE = $00A5; WM_DDE_POKE = $00A6; WM_DDE_EXECUTE = $00A7; WM_DDE_TERMINATE = $00A8; WM_DDE_INITIATEACK = $00A9; WM_DDE_LAST = $00AF; WM_QUERYCONVERTPOS = $00b0; QCP_CONVERT = $0001; QCP_NOCONVERT = $0000; SDT_DESTROY = $0001; SDT_NOBKGND = $0002; SDT_TILE = $0004; SDT_SCALE = $0008; SDT_PATTERN = $0010; SDT_CENTER = $0020; SDT_RETAIN = $0040; SDT_LOADFILE = $0080; STR_DLLNAME = 'keyremap'; WM_DBCSFIRST = $00b0; WM_DBCSLAST = $00cf; function WinRegisterClass(hab : cardinal;pszClassName : pchar;pfnWndProc : proc;flStyle,cbWindowData : cardinal) : longbool; cdecl; function WinDefWindowProc(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinDestroyWindow(hwnd : cardinal) : longbool; cdecl; function WinShowWindow(hwnd : cardinal;fShow : longbool) : longbool; cdecl; function WinQueryWindowRect(hwnd : cardinal;var prclDest : RECTL) : longbool; cdecl; function WinGetPS(hwnd : cardinal) : cardinal; cdecl; function WinReleasePS(hps : cardinal) : longbool; cdecl; function WinEndPaint(hps : cardinal) : longbool; cdecl; function WinGetClipPS(hwnd,hwndClip,fl : cardinal) : cardinal; cdecl; function WinIsWindowShowing(hwnd : cardinal) : longbool; cdecl; function WinBeginPaint(hwnd,hps : cardinal;var prclPaint : RECTL) : cardinal; cdecl; function WinOpenWindowDC(hwnd : cardinal) : cardinal; cdecl; function WinScrollWindow(hwnd : cardinal;dx,dy : longint;var prclScroll,prclClip : RECTL;hrgnUpdate : cardinal;var prclUpdate : RECTL;rgfsw : cardinal) : longint; cdecl; function WinFillRect(hps : cardinal;var prcl : RECTL;lColor : longint) : longbool; cdecl; function WinQueryVersion(hab : cardinal) : cardinal; cdecl; function WinInitialize(flOptions : cardinal) : cardinal; cdecl; function WinTerminate(hab : cardinal) : longbool; cdecl; function WinQueryAnchorBlock(hwnd : cardinal) : cardinal; cdecl; function WinCreateWindow(hwndParent : cardinal;pszClass,pszName : pchar;flStyle : cardinal;x,y,cx,cy : longint;hwndOwner,hwndInsertBehind,id : cardinal;var pCtlData,pPresParams : pointer) : cardinal; cdecl; function WinEnableWindow(hwnd : cardinal;fEnable : longbool) : longbool; cdecl; function WinIsWindowEnabled(hwnd : cardinal) : longbool; cdecl; function WinEnableWindowUpdate(hwnd : cardinal;fEnable : longbool) : longbool; cdecl; function WinIsWindowVisible(hwnd : cardinal) : longbool; cdecl; function WinQueryWindowText(hwnd : cardinal;cchBufferMax : longint;pchBuffer : pchar) : longint; cdecl; function WinSetWindowText(hwnd : cardinal;pszText : pchar) : longbool; cdecl; function WinQueryWindowTextLength(hwnd : cardinal) : longint; cdecl; function WinWindowFromID(hwndParent,id : cardinal) : cardinal; cdecl; function WinIsWindow(hab,hwnd : cardinal) : longbool; cdecl; function WinQueryWindow(hwnd : cardinal;cmd : longint) : cardinal; cdecl; function WinMultWindowFromIDs(hwndParent : cardinal;var prghwnd : cardinal;idFirst,idLast : cardinal) : longint; cdecl; function WinSetParent(hwnd,hwndNewParent : cardinal;fRedraw : longbool) : longbool; cdecl; function WinIsChild(hwnd,hwndParent : cardinal) : longbool; cdecl; function WinSetOwner(hwnd,hwndNewOwner : cardinal) : longbool; cdecl; function WinQueryWindowProcess(hwnd : cardinal;var ppid,ptid : cardinal) : longbool; cdecl; function WinQueryObjectWindow(hwndDesktop : cardinal) : cardinal; cdecl; function WinQueryDesktopWindow(hab,hdc : cardinal) : cardinal; cdecl; function WinSetWindowPos(hwnd,hwndInsertBehind : cardinal;x,y,cx,cy : longint;fl : cardinal) : longbool; cdecl; function WinSetMultWindowPos(hab : cardinal;var pswp : SWP;cswp : cardinal) : longbool; cdecl; function WinQueryWindowPos(hwnd : cardinal;var pswp : SWP) : longbool; cdecl; function WinUpdateWindow(hwnd : cardinal) : longbool; cdecl; function WinInvalidateRect(hwnd : cardinal;var pwrc : RECTL;fIncludeChildren : longbool) : longbool; cdecl; function WinInvalidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl; function WinInvertRect(hps : cardinal;var prcl : RECTL) : longbool; cdecl; function WinDrawBitmap(hpsDst,hbm : cardinal;var pwrcSrc : RECTL;var pptlDst : POINTL;clrFore : longint;clrBack : longint;fl : cardinal) : longbool; cdecl; function WinDrawText(hps : cardinal;cchText : longint;lpchText : pchar;var prcl : RECTL;clrFore,clrBack : longint;flCmd : cardinal) : longint; cdecl; function WinDrawBorder(hps : cardinal;var prcl : RECTL;cx,cy : longint;clrFore,clrBack : longint;flCmd : cardinal) : longbool; cdecl; function WinLoadString(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl; function WinLoadMessage(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl; function WinSetActiveWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl; function WinSubclassWindow(hwnd : cardinal;pfnwp : proc) : proc; cdecl; function WinQueryClassName(hwnd : cardinal;cchMax : longint;pch : pchar) : longint; cdecl; function WinQueryClassInfo(hab : cardinal;pszClassName : pchar;var pClassInfo : CLASSINFO) : longbool; cdecl; function WinQueryActiveWindow(hwndDesktop : cardinal) : cardinal; cdecl; function WinIsThreadActive(hab : cardinal) : longbool; cdecl; function WinQuerySysModalWindow(hwndDesktop : cardinal) : cardinal; cdecl; function WinSetSysModalWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl; function WinQueryWindowUShort(hwnd : cardinal;index : longint) : word; cdecl; function WinSetWindowUShort(hwnd : cardinal;index : longint;us : word) : longbool; cdecl; function WinQueryWindowULong(hwnd : cardinal;index : longint) : cardinal; cdecl; function WinSetWindowULong(hwnd : cardinal;index : longint;ul : cardinal) : longbool; cdecl; function WinQueryWindowPtr(hwnd : cardinal;index : longint) : pointer; cdecl; function WinSetWindowPtr(hwnd : cardinal;index : longint;p : pointer) : longbool; cdecl; function WinSetWindowBits(hwnd : cardinal;index : longint;flData,flMask : cardinal) : longbool; cdecl; function WinBeginEnumWindows(hwnd : cardinal) : cardinal; cdecl; function WinGetNextWindow(henum : cardinal) : cardinal; cdecl; function WinEndEnumWindows(henum : cardinal) : longbool; cdecl; function WinWindowFromPoint(hwnd : cardinal;var pptl : POINTL;fChildren : longbool) : cardinal; cdecl; function WinMapWindowPoints(hwndFrom,hwndTo : cardinal;var prgptl : POINTL;cwpt : longint) : longbool; cdecl; function WinValidateRect(hwnd : cardinal;var prcl : RECTL;fIncludeChildren : longbool) : longbool; cdecl; function WinValidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl; function WinWindowFromDC(hdc : cardinal) : cardinal; cdecl; function WinQueryWindowDC(hwnd : cardinal) : cardinal; cdecl; function WinGetScreenPS(hwndDesktop : cardinal) : cardinal; cdecl; function WinLockWindowUpdate(hwndDesktop,hwndLockUpdate : cardinal) : longbool; cdecl; function WinLockVisRegions(hwndDesktop : cardinal;fLock : longbool) : longbool; cdecl; function WinQueryUpdateRect(hwnd : cardinal;var prcl : RECTL) : longbool; cdecl; function WinQueryUpdateRegion(hwnd,hrgn : cardinal) : longint; cdecl; function WinExcludeUpdateRegion(hps,hwnd : cardinal) : longint; cdecl; function WinSendMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinCreateMsgQueue(hab : cardinal;cmsg : longint) : cardinal; cdecl; function WinDestroyMsgQueue(hmq : cardinal) : longbool; cdecl; function WinQueryQueueInfo(hmq : cardinal;var pmqi : MQINFO;cbCopy : cardinal) : longbool; cdecl; function WinCancelShutdown(hmq : cardinal;fCancelAlways : longbool) : longbool; cdecl; function WinGetMsg(hab : cardinal;var pqmsg : QMSG;hwndFilter,msgFilterFirst,msgFilterLast : cardinal) : longbool; cdecl; function WinPeekMsg(hab : cardinal;var pqmsg : QMSG;hwndFilter,msgFilterFirst,msgFilterLast,fl : cardinal) : longbool; cdecl; function WinDispatchMsg(hab : cardinal;var pqmsg : QMSG) : pointer; cdecl; function WinPostMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl; function WinRegisterUserMsg(hab,msgid : cardinal;datatype1,dir1,datatype2,dir2,datatyper : longint) : longbool; cdecl; function WinRegisterUserDatatype(hab : cardinal;datatype,count : longint;var types : longint) : longbool; cdecl; function WinSetMsgMode(hab : cardinal;classname : pchar;control : longint) : longbool; cdecl; function WinSetSynchroMode(hab : cardinal;mode : longint) : longbool; cdecl; function WinInSendMsg(hab : cardinal) : longbool; cdecl; function WinBroadcastMsg(hwnd,msg : cardinal;mp1,mp2 : pointer;rgf : cardinal) : longbool; cdecl; function WinWaitMsg(hab,msgFirst,msgLast : cardinal) : longbool; cdecl; function WinQueryQueueStatus(hwndDesktop : cardinal) : cardinal; cdecl; function WinQueryMsgPos(hab : cardinal;var pptl : POINTL) : longbool; cdecl; function WinQueryMsgTime(hab : cardinal) : cardinal; cdecl; function WinWaitEventSem(hev,ulTimeout : cardinal) : cardinal; cdecl; function WinRequestMutexSem(hmtx,ulTimeout : cardinal) : cardinal; cdecl; function WinWaitMuxWaitSem(hmux,ulTimeout:cardinal;var pulUser : cardinal) : cardinal; cdecl; function WinPostQueueMsg(hmq,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl; function WinSetMsgInterest(hwnd,msg_class : cardinal;control : longint) : longbool; cdecl; function WinSetClassMsgInterest(hab : cardinal;pszClassName : pchar;msg_class : cardinal;control : longint) : longbool; cdecl; function WinSetFocus(hwndDesktop,hwndSetFocus : cardinal) : longbool; cdecl; function WinFocusChange(hwndDesktop,hwndSetFocus,flFocusChange : cardinal) : longbool; cdecl; function WinSetCapture(hwndDesktop,hwnd : cardinal) : longbool; cdecl; function WinQueryCapture(hwndDesktop : cardinal) : cardinal; cdecl; function WinQueryFocus(hwndDesktop : cardinal) : cardinal; cdecl; function WinGetKeyState(hwndDesktop : cardinal;vkey : longint) : longint; cdecl; function WinGetPhysKeyState(hwndDesktop : cardinal;sc : longint) : longint; cdecl; function WinEnablePhysInput(hwndDesktop : cardinal;fEnable : longbool) : longbool; cdecl; function WinIsPhysInputEnabled(hwndDesktop : cardinal) : longbool; cdecl; function WinSetKeyboardStateTable(hwndDesktop : cardinal;var pKeyStateTable : BYTE;fSet : longbool) : longbool; cdecl; function WinGetDlgMsg(hwndDlg : cardinal;var pqmsg : QMSG) : longbool; cdecl; function WinLoadDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : proc;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl; function WinDlgBox(hwndParent,hwndOwner : cardinal;pfnDlgProc : proc;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl; function WinDismissDlg(hwndDlg,usResult : cardinal) : longbool; cdecl; function WinQueryDlgItemShort(hwndDlg,idItem : cardinal;var pResult : integer;fSigned : longbool) : longbool; cdecl; function WinSetDlgItemShort(hwndDlg,idItem : cardinal;usValue : word;fSigned : longbool) : longbool; cdecl; function WinSetDlgItemText(hwndDlg,idItem : cardinal;pszText : pchar) : longbool; cdecl; function WinQueryDlgItemText(hwndDlg,idItem : cardinal;cchBufferMax : longint;pchBuffer : pchar) : cardinal; cdecl; function WinQueryDlgItemTextLength(hwndDlg,idItem : cardinal) : longint; cdecl; function WinDefDlgProc(hwndDlg,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinAlarm(hwndDesktop,rgfType : cardinal) : longbool; cdecl; function WinMessageBox(hwndParent,hwndOwner : cardinal;pszText,pszCaption : pchar;idWindow,flStyle : cardinal) : cardinal; cdecl; function WinProcessDlg(hwndDlg : cardinal) : cardinal; cdecl; function WinSendDlgItemMsg(hwndDlg,idItem,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinMapDlgPoints(hwndDlg : cardinal;var prgwptl : POINTL;cwpt : cardinal;fCalcWindowCoords : longbool) : longbool; cdecl; function WinEnumDlgItem(hwndDlg,hwnd,code : cardinal) : cardinal; cdecl; function WinSubstituteStrings(hwnd : cardinal;pszSrc : pchar;cchDstMax : longint;pszDst : pchar) : longint; cdecl; function WinCreateDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : proc;var pdlgt : DLGTEMPLATE;pCreateParams : pointer) : cardinal; cdecl; function WinLoadMenu(hwndFrame,hmod,idMenu : cardinal) : cardinal; cdecl; function WinCreateMenu(hwndParent : cardinal;lpmt : pointer) : cardinal; cdecl; function WinPopupMenu(hwndParent,hwndOwner,hwndMenu : cardinal;x,y,idItem : longint;fs : cardinal) : longbool; cdecl; function WinCreateStdWindow(hwndParent,flStyle : cardinal;var pflCreateFlags : cardinal;pszClientClass,pszTitle : pchar;styleClient,hmod,idResources : cardinal;var phwndClient : cardinal) : cardinal; cdecl; function WinFlashWindow(hwndFrame : cardinal;fFlash : longbool) : longbool; cdecl; function WinCreateFrameControls(hwndFrame : cardinal;var pfcdata : FRAMECDATA;pszTitle : pchar) : longbool; cdecl; function WinCalcFrameRect(hwndFrame : cardinal;var prcl : RECTL;fClient : longbool) : longbool; cdecl; function WinGetMinPosition(hwnd : cardinal;var pswp : SWP;var pptl : POINTL) : longbool; cdecl; function WinGetMaxPosition(hwnd : cardinal;var pswp : SWP) : longbool; cdecl; function WinSaveWindowPos(hsvwp : cardinal;var pswp : SWP;cswp : cardinal) : longbool; cdecl; function WinCopyRect(hab : cardinal;var prclDst, prclSrc : RECTL) : longbool; cdecl; function WinSetRect(hab : cardinal;var prcl : RECTL;xLeft,yBottom,xRight,yTop : longint) : longbool; cdecl; function WinIsRectEmpty(hab : cardinal;var prcl : RECTL) : longbool; cdecl; function WinEqualRect(hab : cardinal;var prcl1,prcl2 : RECTL) : longbool; cdecl; function WinSetRectEmpty(hab : cardinal;var prcl : RECTL) : longbool; cdecl; function WinOffsetRect(hab : cardinal;var prcl : RECTL;cx,cy : longint) : longbool; cdecl; function WinInflateRect(hab : cardinal;var prcl : RECTL;cx,cy : longint) : longbool; cdecl; function WinPtInRect(hab : cardinal;var prcl : RECTL;var pptl : POINTL) : longbool; cdecl; function WinIntersectRect(hab : cardinal;var prclDst,prclSrc1,prclSrc2 : RECTL) : longbool; cdecl; function WinUnionRect(hab : cardinal;var prclDst,prclSrc1,prclSrc2 : RECTL) : longbool; cdecl; function WinSubtractRect(hab : cardinal;var prclDst,prclSrc1,prclSrc2 : RECTL) : longbool; cdecl; function WinMakeRect(hab : cardinal;var pwrc : RECTL) : longbool; cdecl; function WinMakePoints(hab : cardinal;var pwpt : POINTL;cwpt : cardinal) : longbool; cdecl; function WinQuerySysValue(hwndDesktop : cardinal;iSysValue : longint) : longint; cdecl; function WinSetSysValue(hwndDesktop : cardinal;iSysValue,lValue : longint) : longbool; cdecl; function WinSetPresParam(hwnd,id,cbParam : cardinal;pbParam : pointer) : longbool; cdecl; function WinQueryPresParam(hwnd,id1,id2 : cardinal;var pulId : cardinal;cbBuf : cardinal;pbBuf : pointer;fs : cardinal) : cardinal; cdecl; function WinRemovePresParam(hwnd,id : cardinal) : longbool; cdecl; function WinQuerySysColor(hwndDesktop : cardinal;clr,lReserved : longint) : longint; cdecl; function WinSetSysColors(hwndDesktop,flOptions,flFormat : cardinal;clrFirst : longint;cclr : cardinal;var pclr : longint) : longbool; cdecl; function WinStartTimer(hab,hwnd,idTimer,dtTimeout : cardinal) : cardinal; cdecl; function WinStopTimer(hab,hwnd,idTimer : cardinal) : longbool; cdecl; function WinGetCurrentTime(hab : cardinal) : cardinal; cdecl; function WinLoadAccelTable(hab,hmod,idAccelTable : cardinal) : cardinal; cdecl; function WinCopyAccelTable(haccel : cardinal;var pAccelTable : ACCELTABLE;cbCopyMax : cardinal) : cardinal; cdecl; function WinCreateAccelTable(hab : cardinal;var pAccelTable : ACCELTABLE) : cardinal; cdecl; function WinDestroyAccelTable(haccel : cardinal) : longbool; cdecl; function WinTranslateAccel(hab,hwnd,haccel : cardinal;var pqmsg : QMSG) : longbool; cdecl; function WinSetAccelTable(hab,haccel,hwndFrame : cardinal) : longbool; cdecl; function WinQueryAccelTable(hab,hwndFrame : cardinal) : cardinal; cdecl; function WinTrackRect(hwnd,hps : cardinal;var pti : TRACKINFO) : longbool; cdecl; function WinShowTrackRect(hwnd : cardinal;fShow : longbool) : longbool; cdecl; function WinSetClipbrdOwner(hab,hwnd : cardinal) : longbool; cdecl; function WinSetClipbrdData(hab,ulData,fmt,rgfFmtInfo : cardinal) : longbool; cdecl; function WinQueryClipbrdData(hab,fmt : cardinal) : cardinal; cdecl; function WinQueryClipbrdFmtInfo(hab,fmt : cardinal;var prgfFmtInfo : cardinal) : longbool; cdecl; function WinSetClipbrdViewer(hab,hwndNewClipViewer : cardinal) : longbool; cdecl; function WinEnumClipbrdFmts(hab,fmt : cardinal) : cardinal; cdecl; function WinEmptyClipbrd(hab : cardinal) : longbool; cdecl; function WinOpenClipbrd(hab : cardinal) : longbool; cdecl; function WinCloseClipbrd(hab : cardinal) : longbool; cdecl; function WinQueryClipbrdOwner(hab : cardinal) : cardinal; cdecl; function WinQueryClipbrdViewer(hab : cardinal) : cardinal; cdecl; function WinDestroyCursor(hwnd : cardinal) : longbool; cdecl; function WinShowCursor(hwnd : cardinal;fShow : longbool) : longbool; cdecl; function WinCreateCursor(hwnd : cardinal;x,y,cx,cy : longint;fs : cardinal;var prclClip : RECTL) : longbool; cdecl; function WinQueryCursorInfo(hwndDesktop : cardinal;var pCursorInfo : CURSORINFO) : longbool; cdecl; function WinSetPointer(hwndDesktop,hptrNew : cardinal) : longbool; cdecl; function WinSetPointerOwner(hptr,pid : cardinal;fDestroy : longbool) : longbool; cdecl; function WinShowPointer(hwndDesktop : cardinal;fShow : longbool) : longbool; cdecl; function WinQuerySysPointer(hwndDesktop : cardinal;iptr : longint;fLoad : longbool) : cardinal; cdecl; function WinLoadPointer(hwndDesktop,hmod,idres : cardinal) : cardinal; cdecl; function WinCreatePointer(hwndDesktop,hbmPointer : cardinal;fPointer : longbool;xHotspot,yHotspot : longint) : cardinal; cdecl; function WinSetPointerPos(hwndDesktop : cardinal;x,y : longint) : longbool; cdecl; function WinDestroyPointer(hptr : cardinal) : longbool; cdecl; function WinQueryPointer(hwndDesktop : cardinal) : cardinal; cdecl; function WinQueryPointerPos(hwndDesktop : cardinal;var pptl : POINTL) : longbool; cdecl; function WinCreatePointerIndirect(hwndDesktop : cardinal;var pptri : POINTERINFO) : cardinal; cdecl; function WinQueryPointerInfo(hptr : cardinal;var pPointerInfo : POINTERINFO) : longbool; cdecl; function WinDrawPointer(hps : cardinal;x,y : longint;hptr,fs : cardinal) : longbool; cdecl; function WinGetSysBitmap(hwndDesktop,ibm : cardinal) : cardinal; cdecl; function WinSetHook(hab : cardinal;hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl; function WinReleaseHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl; function WinCallMsgFilter(hab : cardinal;var pqmsg : QMSG;msgf : cardinal) : longbool; cdecl; function WinSetClassThunkProc(pszClassname : pchar;pfnThunkProc : pointer) : longbool; cdecl; function WinQueryClassThunkProc(pszClassname : pchar) : pointer; cdecl; function WinSetWindowThunkProc(hwnd : cardinal;pfnThunkProc : pointer) : longbool; cdecl; function WinQueryWindowThunkProc(hwnd : cardinal) : pointer; cdecl; function WinQueryWindowModel(hwnd : cardinal) : longint; cdecl; function WinQueryCp(hmq : cardinal) : cardinal; cdecl; function WinSetCp(hmq,idCodePage : cardinal) : longbool; cdecl; function WinQueryCpList(hab,ccpMax : cardinal;var prgcp : cardinal) : cardinal; cdecl; function WinCpTranslateString(hab,cpSrc : cardinal;pszSrc : pchar;cpDst,cchDestMax : cardinal;pchDest : pchar) : longbool; cdecl; function WinCpTranslateChar(hab,cpSrc : cardinal;chSrc : byte;cpDst : cardinal) : byte; cdecl; function WinUpper(hab,idcp,idcc : cardinal;psz : pchar) : cardinal; cdecl; function WinUpperChar(hab,idcp,idcc,c : cardinal) : cardinal; cdecl; function WinNextChar(hab,idcp,idcc : cardinal;psz : pchar) : pchar; cdecl; function WinPrevChar(hab,idcp,idcc : cardinal;pszStart,psz : pchar) : pchar; cdecl; function WinCompareStrings(hab,idcp,idcc : cardinal;psz1,psz2 : pchar;reserved : cardinal) : cardinal; cdecl; function WinCreateAtomTable(cbInitial,cBuckets : cardinal) : cardinal; cdecl; function WinDestroyAtomTable(hAtomTbl : cardinal) : cardinal; cdecl; function WinAddAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl; function WinFindAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl; function WinDeleteAtom(hAtomTbl,atom : cardinal) : cardinal; cdecl; function WinQueryAtomUsage(hAtomTbl,atom : cardinal) : cardinal; cdecl; function WinQueryAtomLength(hAtomTbl,atom : cardinal) : cardinal; cdecl; function WinQueryAtomName(hAtomTbl,atom : cardinal;pchBuffer : pchar;cchBufferMax : cardinal) : cardinal; cdecl; function WinGetLastError(hab : cardinal) : cardinal; cdecl; function WinGetErrorInfo(hab : cardinal) : PERRINFO; cdecl; function WinFreeErrorInfo(var perrinfo : ERRINFO) : longbool; cdecl; {DDE Functions} function WinDdeInitiate(hwndClient : cardinal;pszAppName,pszTopicName : pchar;var pcctxt : CONVCONTEXT) : longbool; cdecl; function WinDdeRespond(hwndClient,hwndServer : cardinal;pszAppName,pszTopicName : pchar;var pcctxt : CONVCONTEXT) : pointer; cdecl; function WinDdePostMsg(hwndTo,hwndFrom,wm : cardinal;var pddest : DDESTRUCT;flOptions : cardinal) : longbool; cdecl; {Library related functions} function WinDeleteProcedure(hab : cardinal;wndproc : proc) : longbool; cdecl; function WinDeleteLibrary(hab,libhandle : cardinal) : longbool; cdecl; function WinLoadProcedure(hab,libhandle : cardinal;procname : pchar) : proc; cdecl; function WinLoadLibrary(hab : cardinal;libname : pchar) : cardinal; cdecl; function WinSetDesktopBkgnd(hwndDesktop : cardinal;var pdskNew : DESKTOP) : cardinal; cdecl; function WinQueryDesktopBkgnd(hwndDesktop : cardinal;var pdsk : DESKTOP) : longbool; cdecl; function WinRealizePalette(hwnd,hps : cardinal;var pcclr : cardinal) : longint; cdecl; function cardinalFROMMP(mp : pointer) : cardinal; cdecl; function integer1FROMMP(mp : pointer) : word; cdecl; function integer2FROMMP(mp : pointer) : word; cdecl; implementation function WinRegisterClass(hab : cardinal;pszClassName : pchar;pfnWndProc : proc;flStyle,cbWindowData : cardinal) : longbool; cdecl;external 'pmwin.dll' index 926; function WinDefWindowProc(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin.dll' index 911; function WinDestroyWindow(hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 728; function WinShowWindow(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin.dll' index 883; function WinQueryWindowRect(hwnd : cardinal;var prclDest : RECTL) : longbool; cdecl;external 'pmwin.dll' index 840; function WinGetPS(hwnd : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 757; function WinReleasePS(hps : cardinal) : longbool; cdecl;external 'pmwin.dll' index 848; function WinEndPaint(hps : cardinal) : longbool; cdecl;external 'pmwin.dll' index 738; function WinGetClipPS(hwnd,hwndClip,fl : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 749; function WinIsWindowShowing(hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 774; function WinBeginPaint(hwnd,hps : cardinal; var prclPaint : RECTL) : cardinal; cdecl;external 'pmwin.dll' index 703; function WinOpenWindowDC(hwnd : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 794; function WinScrollWindow(hwnd : cardinal;dx,dy : longint;var prclScroll,prclClip : RECTL;hrgnUpdate : cardinal;var prclUpdate : RECTL;rgfsw : cardinal) : longint; cdecl;external 'pmwin.dll' index 849; function WinFillRect(hps : cardinal;var prcl : RECTL;lColor : longint) : longbool; cdecl;external 'pmwin.dll' index 743; function WinQueryVersion(hab : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 833; function WinInitialize(flOptions : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 763; function WinTerminate(hab : cardinal) : longbool; cdecl;external 'pmwin.dll' index 888; function WinQueryAnchorBlock(hwnd : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 800; function WinCreateWindow(hwndParent : cardinal;pszClass,pszName : pchar;flStyle : cardinal;x,y,cx,cy : longint;hwndOwner,hwndInsertBehind,id : cardinal;var pCtlData,PresParams : pointer) : cardinal; cdecl;external 'pmwin.dll' index 909; function WinEnableWindow(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;external 'pmwin.dll' index 735; function WinIsWindowEnabled(hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 773; function WinEnableWindowUpdate(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;external 'pmwin.dll' index 736; function WinIsWindowVisible(hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 775; function WinQueryWindowText(hwnd : cardinal;cchBufferMax : longint; pchBuffer : pchar) : longint; cdecl;external 'pmwin.dll' index 841; function WinSetWindowText(hwnd : cardinal;pszText : pchar) : longbool; cdecl;external 'pmwin.dll' index 877; function WinQueryWindowTextLength(hwnd : cardinal) : longint; cdecl;external 'pmwin.dll' index 842; function WinWindowFromID(hwndParent,id : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 899; function WinIsWindow(hab,hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 772; function WinQueryWindow(hwnd : cardinal;cmd : longint) : cardinal; cdecl;external 'pmwin.dll' index 834; function WinMultWindowFromIDs(hwndParent : cardinal;var prghwnd : cardinal;idFirst,idLast : cardinal) : longint; cdecl;external 'pmwin.dll' index 917; function WinSetParent(hwnd,hwndNewParent : cardinal;fRedraw : longbool) : longbool; cdecl;external 'pmwin.dll' index 865; function WinIsChild(hwnd,hwndParent : cardinal) : longbool; cdecl;external 'pmwin.dll' index 768; function WinSetOwner(hwnd,hwndNewOwner : cardinal) : longbool; cdecl;external 'pmwin.dll' index 864; function WinQueryWindowProcess(hwnd : cardinal;var ppid,ptid : cardinal) : longbool; cdecl;external 'pmwin.dll' index 838; function WinQueryObjectWindow(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 820; function WinQueryDesktopWindow(hab,hdc : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 813; function WinSetWindowPos(hwnd,hwndInsertBehind : cardinal;x,y,cx,cy : longint;fl : cardinal) : longbool; cdecl;external 'pmwin.dll' index 875; function WinSetMultWindowPos(hab : cardinal;var pswp : SWP;cswp : cardinal) : longbool; cdecl;external 'pmwin.dll' index 863; function WinQueryWindowPos(hwnd : cardinal;var pswp : SWP) : longbool; cdecl;external 'pmwin.dll' index 837; function WinUpdateWindow(hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 892; function WinInvalidateRect(hwnd : cardinal;var pwrc : RECTL;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin.dll' index 765; function WinInvalidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin.dll' index 766; function WinInvertRect(hps : cardinal;var prcl : RECTL) : longbool; cdecl;external 'pmwin.dll' index 767; function WinDrawBitmap(hpsDst,hbm : cardinal;var pwrcSrc : RECTL;var pptlDst : POINTL;clrFore,clrBack : longint;fl : cardinal) : longbool; cdecl;external 'pmwin.dll' index 730; function WinDrawText(hps : cardinal;cchText : longint;lpchText : pchar;var prcl : RECTL;clrFore,clrBack : longint;flCmd : cardinal) : longint; cdecl;external 'pmwin.dll' index 913; function WinDrawBorder(hps : cardinal;var prcl : RECTL;cx,cy,clrFore,clrBack : longint;flCmd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 731; function WinLoadString(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl;external 'pmwin.dll' index 781; function WinLoadMessage(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl;external 'pmwin.dll' index 779; function WinSetActiveWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 851; function WinSubclassWindow(hwnd : cardinal;pfnwp : proc) : proc; cdecl;external 'pmwin.dll' index 929; function WinQueryClassName(hwnd : cardinal;cchMax : longint; pch : pchar) : longint; cdecl;external 'pmwin.dll' index 805; function WinQueryClassInfo(hab : cardinal;pszClassName : pchar;var pClassInfo : CLASSINFO) : longbool; cdecl;external 'pmwin.dll' index 925; function WinQueryActiveWindow(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 799; function WinIsThreadActive(hab : cardinal) : longbool; cdecl;external 'pmwin.dll' index 771; function WinQuerySysModalWindow(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 827; function WinSetSysModalWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 872; function WinQueryWindowUShort(hwnd : cardinal;index : longint) : word; cdecl;external 'pmwin.dll' index 844; function WinSetWindowUShort(hwnd : cardinal;index : longint;us : word) : longbool; cdecl;external 'pmwin.dll' index 879; function WinQueryWindowULong(hwnd : cardinal;index : longint) : cardinal; cdecl;external 'pmwin.dll' index 843; function WinSetWindowULong(hwnd : cardinal;index : longint;ul : cardinal) : longbool; cdecl;external 'pmwin.dll' index 878; function WinQueryWindowPtr(hwnd : cardinal;index : longint) : pointer; cdecl;external 'pmwin.dll' index 839; function WinSetWindowPtr(hwnd : cardinal;index : longint;p : pointer) : longbool; cdecl;external 'pmwin.dll' index 876; function WinSetWindowBits(hwnd : cardinal;index : longint;flData,flMask : cardinal) : longbool; cdecl;external 'pmwin.dll' index 874; function WinBeginEnumWindows(hwnd : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 702; function WinGetNextWindow(henum : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 756; function WinEndEnumWindows(henum : cardinal) : longbool; cdecl;external 'pmwin.dll' index 737; function WinWindowFromPoint(hwnd : cardinal;var pptl : POINTL;fChildren : longbool) : cardinal; cdecl;external 'pmwin.dll' index 900; function WinMapWindowPoints(hwndFrom,hwndTo : cardinal;var prgptl : POINTL;cwpt : longint) : longbool; cdecl;external 'pmwin.dll' index 788; function WinValidateRect(hwnd : cardinal;var prcl : RECTL;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin.dll' index 895; function WinValidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin.dll' index 896; function WinWindowFromDC(hdc : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 898; function WinQueryWindowDC(hwnd : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 835; function WinGetScreenPS(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 759; function WinLockWindowUpdate(hwndDesktop,hwndLockUpdate : cardinal) : longbool; cdecl;external 'pmwin.dll' index 784; function WinLockVisRegions(hwndDesktop : cardinal;fLock : longbool) : longbool; cdecl;external 'pmwin.dll' index 782; function WinQueryUpdateRect(hwnd : cardinal;var prcl : RECTL) : longbool; cdecl;external 'pmwin.dll' index 831; function WinQueryUpdateRegion(hwnd,hrgn : cardinal) : longint; cdecl;external 'pmwin.dll' index 832; function WinExcludeUpdateRegion(hps,hwnd : cardinal) : longint; cdecl;external 'pmwin.dll' index 742; function WinSendMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin.dll' index 920; function WinCreateMsgQueue(hab : cardinal;cmsg : longint) : cardinal; cdecl;external 'pmwin.dll' index 716; function WinDestroyMsgQueue(hmq : cardinal) : longbool; cdecl;external 'pmwin.dll' index 726; function WinQueryQueueInfo(hmq : cardinal;var pmqi : MQINFO;cbCopy : cardinal) : longbool; cdecl;external 'pmwin.dll' index 824; function WinCancelShutdown(hmq : cardinal;fCancelAlways : longbool) : longbool; cdecl;external 'pmwin.dll' index 705; function WinGetMsg(hab : cardinal;var pqmsg : QMSG;hwndFilter,msgFilterFirst,msgFilterLast : cardinal) : longbool; cdecl;external 'pmwin.dll' index 915; function WinPeekMsg(hab : cardinal;var pqmsg : QMSG;hwndFilter,msgFilterFirst,msgFilterLast,fl : cardinal) : longbool; cdecl;external 'pmwin.dll' index 918; function WinDispatchMsg(hab : cardinal;var pqmsg : QMSG) : pointer; cdecl;external 'pmwin.dll' index 912; function WinPostMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;external 'pmwin.dll' index 919; function WinRegisterUserMsg(hab,msgid : cardinal;datatype1,dir1,datatype2,dir2,datatyper : longint) : longbool; cdecl;external 'pmwin.dll' index 846; function WinRegisterUserDatatype(hab : cardinal;datatype,count : longint;var types : longint) : longbool; cdecl;external 'pmwin.dll' index 845; function WinSetMsgMode(hab : cardinal;classname :pchar;control : longint) : longbool; cdecl;external 'pmwin.dll' index 862; function WinSetSynchroMode(hab : cardinal;mode : longint) : longbool; cdecl;external 'pmwin.dll' index 870; function WinInSendMsg(hab : cardinal) : longbool; cdecl;external 'pmwin.dll' index 761; function WinBroadcastMsg(hwnd,msg : cardinal;mp1,mp2 : pointer;rgf : cardinal) : longbool; cdecl;external 'pmwin.dll' index 901; function WinWaitMsg(hab,msgFirst,msgLast : cardinal) : longbool; cdecl;external 'pmwin.dll' index 897; function WinQueryQueueStatus(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 825; function WinQueryMsgPos(hab : cardinal;var pptl : POINTL) : longbool; cdecl;external 'pmwin.dll' index 818; function WinQueryMsgTime(hab : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 819; function WinWaitEventSem(hev,ulTimeout : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 978; function WinRequestMutexSem(hmtx,ulTimeout : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 979; function WinWaitMuxWaitSem(hmux,ulTimeout : cardinal;var pulUser : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 980; function WinPostQueueMsg(hmq,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;external 'pmwin.dll' index 902; function WinSetMsgInterest(hwnd,msg_class : cardinal;control : longint) : longbool; cdecl;external 'pmwin.dll' index 861; function WinSetClassMsgInterest(hab : cardinal;pszClassName : pchar;msg_class : cardinal;control : longint) : longbool; cdecl;external 'pmwin.dll' index 853; function WinSetFocus(hwndDesktop,hwndSetFocus : cardinal) : longbool; cdecl;external 'pmwin.dll' index 860; function WinFocusChange(hwndDesktop,hwndSetFocus,flFocusChange : cardinal) : longbool; cdecl;external 'pmwin.dll' index 746; function WinSetCapture(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 852; function WinQueryCapture(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 804; function WinQueryFocus(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 817; function WinGetKeyState(hwndDesktop : cardinal;vkey : longint) : longint; cdecl;external 'pmwin.dll' index 752; function WinGetPhysKeyState(hwndDesktop : cardinal;sc : longint) : longint; cdecl;external 'pmwin.dll' index 758; function WinEnablePhysInput(hwndDesktop : cardinal;fEnable : longbool) : longbool; cdecl;external 'pmwin.dll' index 734; function WinIsPhysInputEnabled(hwndDesktop : cardinal) : longbool; cdecl;external 'pmwin.dll' index 769; function WinSetKeyboardStateTable(hwndDesktop : cardinal;var pKeyStateTable : BYTE;fSet : longbool) : longbool; cdecl;external 'pmwin.dll' index 921; function WinGetDlgMsg(hwndDlg : cardinal;var pqmsg : QMSG) : longbool; cdecl;external 'pmwin.dll' index 914; function WinLoadDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : proc;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl;external 'pmwin.dll' index 924; function WinDlgBox(hwndParent,hwndOwner : cardinal;pfnDlgProc : proc;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl;external 'pmwin.dll' index 923; function WinDismissDlg(hwndDlg,usResult : cardinal) : longbool; cdecl;external 'pmwin.dll' index 729; function WinQueryDlgItemShort(hwndDlg,idItem : cardinal;var pResult : integer;fSigned : longbool) : longbool; cdecl;external 'pmwin.dll' index 814; function WinSetDlgItemShort(hwndDlg,idItem : cardinal;usValue : word;fSigned : longbool) : longbool; cdecl;external 'pmwin.dll' index 858; function WinSetDlgItemText(hwndDlg,idItem : cardinal;pszText : pchar) : longbool; cdecl;external 'pmwin.dll' index 859; function WinQueryDlgItemText(hwndDlg,idItem : cardinal;cchBufferMax : longint;pchBuffer : pchar) : cardinal; cdecl;external 'pmwin.dll' index 815; function WinQueryDlgItemTextLength(hwndDlg,idItem : cardinal) : longint; cdecl;external 'pmwin.dll' index 816; function WinDefDlgProc(hwndDlg,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin.dll' index 910; function WinAlarm(hwndDesktop,rgfType : cardinal) : longbool; cdecl;external 'pmwin.dll' index 701; function WinMessageBox(hwndParent,hwndOwner : cardinal;pszText,pszCaption : pchar;idWindow,flStyle : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 789; function WinProcessDlg(hwndDlg : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 796; function WinSendDlgItemMsg(hwndDlg,idItem,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin.dll' index 903; function WinMapDlgPoints(hwndDlg : cardinal;var prgwptl : POINTL;cwpt : cardinal;fCalcWindowCoords : longbool) : longbool; cdecl;external 'pmwin.dll' index 787; function WinEnumDlgItem(hwndDlg,hwnd,code : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 740; function WinSubstituteStrings(hwnd : cardinal;pszSrc : pchar;cchDstMax : longint;pszDst : pchar) : longint; cdecl;external 'pmwin.dll' index 886; function WinCreateDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : proc;var pdlgt : DLGTEMPLATE;pCreateParams : pointer) : cardinal; cdecl;external 'pmwin.dll' index 922; function WinLoadMenu(hwndFrame,hmod,idMenu : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 778; function WinCreateMenu(hwndParent : cardinal;lpmt : pointer) : cardinal; cdecl;external 'pmwin.dll' index 907; function WinPopupMenu(hwndParent,hwndOwner,hwndMenu : cardinal;x,y,idItem : longint;fs : cardinal) : longbool; cdecl;external 'pmwin.dll' index 937; function WinCreateStdWindow(hwndParent,flStyle : cardinal;var pflCreateFlags : cardinal;pszClientClass,pszTitle : pchar;styleClient,hmod,idResources : cardinal;var phwndClient : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 908; function WinFlashWindow(hwndFrame : cardinal;fFlash : longbool) : longbool; cdecl;external 'pmwin.dll' index 745; function WinCreateFrameControls(hwndFrame : cardinal;var pfcdata : FRAMECDATA;pszTitle : pchar) : longbool; cdecl;external 'pmwin.dll' index 906; function WinCalcFrameRect(hwndFrame : cardinal;var prcl : RECTL;fClient : longbool) : longbool; cdecl;external 'pmwin.dll' index 704; function WinGetMinPosition(hwnd : cardinal;var pswp : SWP;var pptl : POINTL) : longbool; cdecl;external 'pmwin.dll' index 755; function WinGetMaxPosition(hwnd : cardinal;var pswp : SWP) : longbool; cdecl;external 'pmwin.dll' index 754; function WinSaveWindowPos(hsvwp : cardinal;var pswp : SWP;cswp : cardinal) : longbool; cdecl;external 'pmwin.dll' index 943; function WinCopyRect(hab : cardinal;var prclDst,prclSrc : RECTL) : longbool; cdecl;external 'pmwin.dll' index 710; function WinSetRect(hab : cardinal;var prcl : RECTL;xLeft,yBottom,xRight,yTop : longint) : longbool; cdecl;external 'pmwin.dll' index 868; function WinIsRectEmpty(hab : cardinal;var prcl : RECTL) : longbool; cdecl;external 'pmwin.dll' index 770; function WinEqualRect(hab : cardinal;var prcl1,prcl2 : RECTL) : longbool; cdecl;external 'pmwin.dll' index 741; function WinSetRectEmpty(hab : cardinal;var prcl : RECTL) : longbool; cdecl;external 'pmwin.dll' index 869; function WinOffsetRect(hab : cardinal;var prcl : RECTL;cx,cy : longint) : longbool; cdecl;external 'pmwin.dll' index 792; function WinInflateRect(hab : cardinal;var prcl : RECTL;cx,cy : longint) : longbool; cdecl;external 'pmwin.dll' index 762; function WinPtInRect(hab : cardinal;var prcl : RECTL;var pptl : POINTL) : longbool; cdecl;external 'pmwin.dll' index 797; function WinIntersectRect(hab : cardinal;var prclDst,prclSrc1,prclSrc2 : RECTL) : longbool; cdecl;external 'pmwin.dll' index 764; function WinUnionRect(hab : cardinal;var prclDst,prclSrc1,prclSrc2 : RECTL) : longbool; cdecl;external 'pmwin.dll' index 891; function WinSubtractRect(hab : cardinal;var prclDst,prclSrc1,prclSrc2 : RECTL) : longbool; cdecl;external 'pmwin.dll' index 887; function WinMakeRect(hab : cardinal;var pwrc : RECTL) : longbool; cdecl;external 'pmwin.dll' index 786; function WinMakePoints(hab : cardinal;var pwpt : POINTL;cwpt : cardinal) : longbool; cdecl;external 'pmwin.dll' index 785; function WinQuerySysValue(hwndDesktop : cardinal;iSysValue : longint) : longint; cdecl;external 'pmwin.dll' index 829; function WinSetSysValue(hwndDesktop : cardinal;iSysValue,lValue : longint) : longbool; cdecl;external 'pmwin.dll' index 873; function WinSetPresParam(hwnd,id,cbParam : cardinal;pbParam : pointer) : longbool; cdecl;external 'pmwin.dll' index 938; function WinQueryPresParam(hwnd,id1,id2 : cardinal;var pulId : cardinal;cbBuf : cardinal;pbBuf : pointer;fs : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 939; function WinRemovePresParam(hwnd,id : cardinal) : longbool; cdecl;external 'pmwin.dll' index 940; function WinQuerySysColor(hwndDesktop : cardinal;clr,lReserved : longint) : longint; cdecl;external 'pmwin.dll' index 826; function WinSetSysColors(hwndDesktop,flOptions,flFormat : cardinal;clrFirst : longint;cclr : cardinal;var pclr : longint) : longbool; cdecl;external 'pmwin.dll' index 871; function WinStartTimer(hab,hwnd,idTimer,dtTimeout : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 884; function WinStopTimer(hab,hwnd,idTimer : cardinal) : longbool; cdecl;external 'pmwin.dll' index 885; function WinGetCurrentTime(hab : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 750; function WinLoadAccelTable(hab,hmod,idAccelTable : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 776; function WinCopyAccelTable(haccel : cardinal;var pAccelTable : ACCELTABLE;cbCopyMax : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 709; function WinCreateAccelTable(hab : cardinal;var pAccelTable : ACCELTABLE) : cardinal; cdecl;external 'pmwin.dll' index 713; function WinDestroyAccelTable(haccel : cardinal) : longbool; cdecl;external 'pmwin.dll' index 723; function WinTranslateAccel(hab,hwnd,haccel : cardinal;var pqmsg : QMSG) : longbool; cdecl;external 'pmwin.dll' index 904; function WinSetAccelTable(hab,haccel,hwndFrame : cardinal) : longbool; cdecl;external 'pmwin.dll' index 850; function WinQueryAccelTable(hab,hwndFrame : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 798; function WinTrackRect(hwnd,hps : cardinal;var pti : TRACKINFO) : longbool; cdecl;external 'pmwin.dll' index 890; function WinShowTrackRect(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin.dll' index 882; function WinSetClipbrdOwner(hab,hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 855; function WinSetClipbrdData(hab,ulData,fmt,rgfFmtInfo : cardinal) : longbool; cdecl;external 'pmwin.dll' index 854; function WinQueryClipbrdData(hab,fmt : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 806; function WinQueryClipbrdFmtInfo(hab,fmt : cardinal;var prgfFmtInfo : cardinal) : longbool; cdecl;external 'pmwin.dll' index 807; function WinSetClipbrdViewer(hab,hwndNewClipViewer : cardinal) : longbool; cdecl;external 'pmwin.dll' index 856; function WinEnumClipbrdFmts(hab,fmt : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 739; function WinEmptyClipbrd(hab : cardinal) : longbool; cdecl;external 'pmwin.dll' index 733; function WinOpenClipbrd(hab : cardinal) : longbool; cdecl;external 'pmwin.dll' index 793; function WinCloseClipbrd(hab : cardinal) : longbool; cdecl;external 'pmwin.dll' index 707; function WinQueryClipbrdOwner(hab : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 808; function WinQueryClipbrdViewer(hab : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 809; function WinDestroyCursor(hwnd : cardinal) : longbool; cdecl;external 'pmwin.dll' index 725; function WinShowCursor(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin.dll' index 880; function WinCreateCursor(hwnd : cardinal;x,y,cx,cy : longint;fs : cardinal;var prclClip : RECTL) : longbool; cdecl;external 'pmwin.dll' index 715; function WinQueryCursorInfo(hwndDesktop : cardinal;var pCursorInfo : CURSORINFO) : longbool; cdecl;external 'pmwin.dll' index 812; function WinSetPointer(hwndDesktop,hptrNew : cardinal) : longbool; cdecl;external 'pmwin.dll' index 866; function WinSetPointerOwner(hptr,pid : cardinal;fDestroy : longbool) : longbool; cdecl;external 'pmwin.dll' index 971; function WinShowPointer(hwndDesktop : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin.dll' index 881; function WinQuerySysPointer(hwndDesktop : cardinal;iptr : longint;fLoad : longbool) : cardinal; cdecl;external 'pmwin.dll' index 828; function WinLoadPointer(hwndDesktop,hmod,idres : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 780; function WinCreatePointer(hwndDesktop,hbmPointer : cardinal;fPointer : longbool;xHotspot,yHotspot : longint) : cardinal; cdecl;external 'pmwin.dll' index 717; function WinSetPointerPos(hwndDesktop : cardinal;x,y : longint) : longbool; cdecl;external 'pmwin.dll' index 867; function WinDestroyPointer(hptr : cardinal) : longbool; cdecl;external 'pmwin.dll' index 727; function WinQueryPointer(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 821; function WinQueryPointerPos(hwndDesktop : cardinal;var pptl : POINTL) : longbool; cdecl;external 'pmwin.dll' index 823; function WinCreatePointerIndirect(hwndDesktop : cardinal;var pptri : POINTERINFO) : cardinal; cdecl;external 'pmwin.dll' index 942; function WinQueryPointerInfo(hptr : cardinal;var pPointerInfo : POINTERINFO) : longbool; cdecl;external 'pmwin.dll' index 822; function WinDrawPointer(hps : cardinal;x,y : longint;hptr,fs : cardinal) : longbool; cdecl;external 'pmwin.dll' index 732; function WinGetSysBitmap(hwndDesktop,ibm : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 760; function WinSetHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;external 'pmwin.dll' index 928; function WinReleaseHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;external 'pmwin.dll' index 927; function WinCallMsgFilter(hab : cardinal;var pqmsg : QMSG;msgf : cardinal) : longbool; cdecl;external 'pmwin.dll' index 905; function WinSetClassThunkProc(pszClassname : pchar;pfnThunkProc : pointer) : longbool; cdecl;external 'pmwin.dll' index 959; function WinQueryClassThunkProc(pszClassname : pchar) : pointer; cdecl;external 'pmwin.dll' index 960; function WinSetWindowThunkProc(hwnd : cardinal;pfnThunkProc : pointer) : longbool; cdecl;external 'pmwin.dll' index 961; function WinQueryWindowThunkProc(hwnd : cardinal) : pointer; cdecl;external 'pmwin.dll' index 962; function WinQueryWindowModel(hwnd : cardinal) : longint; cdecl;external 'pmwin.dll' index 934; function WinQueryCp(hmq : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 810; function WinSetCp(hmq,idCodePage : cardinal) : longbool; cdecl;external 'pmwin.dll' index 857; function WinQueryCpList(hab,ccpMax : cardinal;var prgcp : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 811; function WinCpTranslateString(hab,cpSrc : cardinal;pszSrc : pchar;cpDst,cchDestMax : cardinal;pchDest : pchar) : longbool; cdecl;external 'pmwin.dll' index 712; function WinCpTranslateChar(hab,cpSrc : cardinal;chSrc : byte;cpDst : cardinal) : byte; cdecl;external 'pmwin.dll' index 711; function WinUpper(hab,idcp,idcc : cardinal;psz : pchar) : cardinal; cdecl;external 'pmwin.dll' index 893; function WinUpperChar(hab,idcp,idcc,c : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 894; function WinNextChar(hab,idcp,idcc : cardinal;psz : pchar) : pchar; cdecl;external 'pmwin.dll' index 791; function WinPrevChar(hab,idcp,idcc : cardinal;pszStart,psz : pchar) : pchar; cdecl;external 'pmwin.dll' index 795; function WinCompareStrings(hab,idcp,idcc : cardinal;psz1,psz2 : pchar;reserved : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 708; function WinCreateAtomTable(cbInitial,cBuckets : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 714; function WinDestroyAtomTable(hAtomTbl : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 724; function WinAddAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl;external 'pmwin.dll' index 700; function WinFindAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl;external 'pmwin.dll' index 744; function WinDeleteAtom(hAtomTbl,atom : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 721; function WinQueryAtomUsage(hAtomTbl,atom : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 803; function WinQueryAtomLength(hAtomTbl,atom : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 801; function WinQueryAtomName(hAtomTbl,atom : cardinal;pchBuffer : pchar;cchBufferMax : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 802; function WinGetLastError(hab : cardinal) : cardinal; cdecl;external 'pmwin.dll' index 753; function WinGetErrorInfo(hab : cardinal) : PERRINFO; cdecl;external 'pmwin.dll' index 751; function WinFreeErrorInfo(var perrinfo : ERRINFO) : longbool; cdecl;external 'pmwin.dll' index 748; function WinDdeInitiate(hwndClient : cardinal;pszAppName,pszTopicName : pchar;var pcctxt : CONVCONTEXT) : longbool; cdecl;external 'pmwin.dll' index 718; function WinDdeRespond(hwndClient,hwndServer : cardinal;pszAppName,pszTopicName : pchar;var pcctxt : CONVCONTEXT) : pointer; cdecl;external 'pmwin.dll' index 720; function WinDdePostMsg(hwndTo,hwndFrom,wm : cardinal;var pddest : DDESTRUCT;flOptions : cardinal) : longbool; cdecl;external 'pmwin.dll' index 719; function WinDeleteProcedure(hab : cardinal;wndproc : proc) : longbool; cdecl;external 'pmwin.dll' index 987; function WinDeleteLibrary(hab,libhandle : cardinal) : longbool; cdecl;external 'pmwin.dll' index 722; function WinLoadProcedure(hab,libhandle : cardinal;procname : pchar) : proc; cdecl;external 'pmwin.dll' index 986; function WinLoadLibrary(hab : cardinal;libname : pchar) : cardinal; cdecl;external 'pmwin.dll' index 777; function WinSetDesktopBkgnd(hwndDesktop : cardinal;var pdskNew : DESKTOP) : cardinal; cdecl;external 'pmwin.dll' index 935; function WinQueryDesktopBkgnd(hwndDesktop : cardinal;var pdsk : DESKTOP) : longbool; cdecl;external 'pmwin.dll' index 936; function WinRealizePalette(hwnd,hps : cardinal;var pcclr : cardinal) : longint; cdecl;external 'pmwin.dll' index 941; function cardinalFROMMP(mp : pointer) : cardinal;cdecl; begin cardinalFROMMP:=cardinal(mp); end; function integer1FROMMP(mp : pointer) : word;cdecl; begin {integer1FROMMP:=lo(cardinal(mp)); RBP} end; function integer2FROMMP(mp : pointer) : word;cdecl; begin {integer2FROMMP:=hi(cardinal(mp)) RBP} end; end. { $Log$ Revision 1.6 1999-08-04 15:51:05 hajny * merging changes by RB and DM :-( Revision 1.5 1999/06/02 16:01:29 hajny * changes by Ramon Bosque }