paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-07-28 18:26:05 +02:00
Code Issues Packages Projects Releases Wiki Activity

* New versions by Ramon Bosque

Browse Source
This commit is contained in:
daniel 1999-05-06 08:15:39 +00:00
parent f3f9619662
commit cc192abd33
3 changed files with 1492 additions and 1781 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
rtl/os2/os2def.pas
View File

@ -114,15 +114,15 @@ const
PDEVOPENDATA = pshortint; {Initially, ^PSZ} PDEVOPENDATA = pshortint; {Initially, ^PSZ}
DEVOPENSTRUC = record DEVOPENSTRUC = record
pszLogAddress : pshortint; pszLogAddress : pchar;
pszDriverName : pshortint; pszDriverName : pchar;
pdriv : PDRIVDATA; pdriv : PDRIVDATA;
pszDataType : pshortint; pszDataType : pchar;
pszComment : pshortint; pszComment : pchar;
pszQueueProcName : pshortint; pszQueueProcName : pchar;
pszQueueProcParams : pshortint; pszQueueProcParams : pchar;
pszSpoolerParams : pshortint; pszSpoolerParams : pchar;
pszNetworkParams : pshortint; pszNetworkParams : pchar;
end; end;
PDEVOPENSTRUC = ^DEVOPENSTRUC; PDEVOPENSTRUC = ^DEVOPENSTRUC;
@ -130,11 +130,11 @@ const
PRINTDEST = record PRINTDEST = record
cb : cardinal; cb : cardinal;
lType : longint; lType : longint;
pszToken : pshortint; pszToken : pchar;
lCount : longint; lCount : longint;
pdopData : PDEVOPENDATA; pdopData : PDEVOPENDATA;
fl : cardinal; fl : cardinal;
pszPrinter : pshortint; pszPrinter : pchar;
end; end;
PPRINTDEST = ^PRINTDEST; PPRINTDEST = ^PRINTDEST;

1675
rtl/os2/pmgpi.pas
View File

File diff suppressed because it is too large Load Diff

552
rtl/os2/pmwin.pas
View File

@ -39,8 +39,8 @@ unit pmwin;
y : longint; y : longint;
x : longint; x : longint;
flStyle : cardinal; flStyle : cardinal;
pszText : pshortint; pszText : pchar;
pszClass : pshortint; pszClass : pchar;
hwndParent : cardinal; hwndParent : cardinal;
end; end;
PCREATESTRUCT = ^CREATESTRUCT; PCREATESTRUCT = ^CREATESTRUCT;
@ -71,7 +71,7 @@ unit pmwin;
WNDPARAMS = record WNDPARAMS = record
fsStatus : cardinal; fsStatus : cardinal;
cchText : cardinal; cchText : cardinal;
pszText : pshortint; pszText : pchar;
cbPresParams : cardinal; cbPresParams : cardinal;
pPresParams : pointer; pPresParams : pointer;
cbCtlData : cardinal; cbCtlData : cardinal;
@ -169,8 +169,8 @@ unit pmwin;
PCONVCONTEXT = ^CONVCONTEXT; PCONVCONTEXT = ^CONVCONTEXT;
DDEINIT = record DDEINIT = record
cb : cardinal; cb : cardinal;
pszAppName : pshortint; pszAppName : pchar;
pszTopic : pshortint; pszTopic : pchar;
offConvContext : cardinal; offConvContext : cardinal;
end; end;
PDDEINIT = ^DDEINIT; PDDEINIT = ^DDEINIT;
@ -1586,7 +1586,7 @@ const
WM_DBCSFIRST = $00b0; WM_DBCSFIRST = $00b0;
WM_DBCSLAST = $00cf; WM_DBCSLAST = $00cf;
function WinRegisterClass(hab : cardinal;pszClassName : pshortint;pfnWndProc : ppointer;flStyle,cbWindowData : cardinal) : longbool; cdecl; function WinRegisterClass(hab : cardinal;pszClassName : pchar;pfnWndProc : ppointer;flStyle,cbWindowData : cardinal) : longbool; cdecl;
function WinDefWindowProc(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinDefWindowProc(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;
function WinDestroyWindow(hwnd : cardinal) : longbool; cdecl; function WinDestroyWindow(hwnd : cardinal) : longbool; cdecl;
function WinShowWindow(hwnd : cardinal;fShow : longbool) : longbool; cdecl; function WinShowWindow(hwnd : cardinal;fShow : longbool) : longbool; cdecl;
@ -1604,13 +1604,13 @@ const
function WinInitialize(flOptions : cardinal) : cardinal; cdecl; function WinInitialize(flOptions : cardinal) : cardinal; cdecl;
function WinTerminate(hab : cardinal) : longbool; cdecl; function WinTerminate(hab : cardinal) : longbool; cdecl;
function WinQueryAnchorBlock(hwnd : cardinal) : cardinal; cdecl; function WinQueryAnchorBlock(hwnd : cardinal) : cardinal; cdecl;
function WinCreateWindow(hwndParent : cardinal;pszClass,pszName : pshortint;flStyle : cardinal;x,y,cx,cy : longint;hwndOwner,hwndInsertBehind,id : cardinal;pCtlData,pPresParams : pointer) : cardinal; cdecl; function WinCreateWindow(hwndParent : cardinal;pszClass,pszName : pchar;flStyle : cardinal;x,y,cx,cy : longint;hwndOwner,hwndInsertBehind,id : cardinal;pCtlData,pPresParams : pointer) : cardinal; cdecl;
function WinEnableWindow(hwnd : cardinal;fEnable : longbool) : longbool; cdecl; function WinEnableWindow(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;
function WinIsWindowEnabled(hwnd : cardinal) : longbool; cdecl; function WinIsWindowEnabled(hwnd : cardinal) : longbool; cdecl;
function WinEnableWindowUpdate(hwnd : cardinal;fEnable : longbool) : longbool; cdecl; function WinEnableWindowUpdate(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;
function WinIsWindowVisible(hwnd : cardinal) : longbool; cdecl; function WinIsWindowVisible(hwnd : cardinal) : longbool; cdecl;
function WinQueryWindowText(hwnd : cardinal;cchBufferMax : longint;pchBuffer : pshortint) : longint; cdecl; function WinQueryWindowText(hwnd : cardinal;cchBufferMax : longint;pchBuffer : pshortint) : longint; cdecl;
function WinSetWindowText(hwnd : cardinal;pszText : pshortint) : longbool; cdecl; function WinSetWindowText(hwnd : cardinal;pszText : pchar) : longbool; cdecl;
function WinQueryWindowTextLength(hwnd : cardinal) : longint; cdecl; function WinQueryWindowTextLength(hwnd : cardinal) : longint; cdecl;
function WinWindowFromID(hwndParent,id : cardinal) : cardinal; cdecl; function WinWindowFromID(hwndParent,id : cardinal) : cardinal; cdecl;
function WinIsWindow(hab,hwnd : cardinal) : longbool; cdecl; function WinIsWindow(hab,hwnd : cardinal) : longbool; cdecl;
@ -1632,12 +1632,12 @@ const
function WinDrawBitmap(hpsDst,hbm : cardinal;pwrcSrc : PRECTL;pptlDst : PPOINTL;clrFore : longint;clrBack : longint;fl : cardinal) : longbool; cdecl; function WinDrawBitmap(hpsDst,hbm : cardinal;pwrcSrc : PRECTL;pptlDst : PPOINTL;clrFore : longint;clrBack : longint;fl : cardinal) : longbool; cdecl;
function WinDrawText(hps : cardinal;cchText : longint;lpchText : pshortint;prcl : PRECTL;clrFore,clrBack : longint;flCmd : cardinal) : longint; cdecl; function WinDrawText(hps : cardinal;cchText : longint;lpchText : pshortint;prcl : PRECTL;clrFore,clrBack : longint;flCmd : cardinal) : longint; cdecl;
function WinDrawBorder(hps : cardinal;prcl : PRECTL;cx,cy : longint;clrFore,clrBack : longint;flCmd : cardinal) : longbool; cdecl; function WinDrawBorder(hps : cardinal;prcl : PRECTL;cx,cy : longint;clrFore,clrBack : longint;flCmd : cardinal) : longbool; cdecl;
function WinLoadString(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pshortint) : longint; cdecl; function WinLoadString(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl;
function WinLoadMessage(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pshortint) : longint; cdecl; function WinLoadMessage(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl;
function WinSetActiveWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl; function WinSetActiveWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;
function WinSubclassWindow(hwnd : cardinal;pfnwp : ppointer) : ppointer; cdecl; function WinSubclassWindow(hwnd : cardinal;pfnwp : ppointer) : ppointer; cdecl;
function WinQueryClassName(hwnd : cardinal;cchMax : longint;pch : pshortint) : longint; cdecl; function WinQueryClassName(hwnd : cardinal;cchMax : longint;pch : pshortint) : longint; cdecl;
function WinQueryClassInfo(hab : cardinal;pszClassName : pshortint;pClassInfo : PCLASSINFO) : longbool; cdecl; function WinQueryClassInfo(hab : cardinal;pszClassName : pchar;pClassInfo : PCLASSINFO) : longbool; cdecl;
function WinQueryActiveWindow(hwndDesktop : cardinal) : cardinal; cdecl; function WinQueryActiveWindow(hwndDesktop : cardinal) : cardinal; cdecl;
function WinIsThreadActive(hab : cardinal) : longbool; cdecl; function WinIsThreadActive(hab : cardinal) : longbool; cdecl;
function WinQuerySysModalWindow(hwndDesktop : cardinal) : cardinal; cdecl; function WinQuerySysModalWindow(hwndDesktop : cardinal) : cardinal; cdecl;
@ -1675,7 +1675,7 @@ const
function WinPostMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : longbool; 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 WinRegisterUserMsg(hab,msgid : cardinal;datatype1,dir1,datatype2,dir2,datatyper : longint) : longbool; cdecl;
function WinRegisterUserDatatype(hab : cardinal;datatype,count : longint;types : Plongint) : longbool; cdecl; function WinRegisterUserDatatype(hab : cardinal;datatype,count : longint;types : Plongint) : longbool; cdecl;
function WinSetMsgMode(hab : cardinal;classname : pshortint;control : longint) : longbool; cdecl; function WinSetMsgMode(hab : cardinal;classname : pchar;control : longint) : longbool; cdecl;
function WinSetSynchroMode(hab : cardinal;mode : longint) : longbool; cdecl; function WinSetSynchroMode(hab : cardinal;mode : longint) : longbool; cdecl;
function WinInSendMsg(hab : cardinal) : longbool; cdecl; function WinInSendMsg(hab : cardinal) : longbool; cdecl;
function WinBroadcastMsg(hwnd,msg : cardinal;mp1,mp2 : pointer;rgf : cardinal) : longbool; cdecl; function WinBroadcastMsg(hwnd,msg : cardinal;mp1,mp2 : pointer;rgf : cardinal) : longbool; cdecl;
@ -1688,7 +1688,7 @@ const
function WinWaitMuxWaitSem(hmux,ulTimeout:cardinal;pulUser : pcardinal) : cardinal; cdecl; function WinWaitMuxWaitSem(hmux,ulTimeout:cardinal;pulUser : pcardinal) : cardinal; cdecl;
function WinPostQueueMsg(hmq,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl; function WinPostQueueMsg(hmq,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;
function WinSetMsgInterest(hwnd,msg_class : cardinal;control : longint) : longbool; cdecl; function WinSetMsgInterest(hwnd,msg_class : cardinal;control : longint) : longbool; cdecl;
function WinSetClassMsgInterest(hab : cardinal;pszClassName : pshortint;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 WinSetFocus(hwndDesktop,hwndSetFocus : cardinal) : longbool; cdecl;
function WinFocusChange(hwndDesktop,hwndSetFocus,flFocusChange : cardinal) : longbool; cdecl; function WinFocusChange(hwndDesktop,hwndSetFocus,flFocusChange : cardinal) : longbool; cdecl;
function WinSetCapture(hwndDesktop,hwnd : cardinal) : longbool; cdecl; function WinSetCapture(hwndDesktop,hwnd : cardinal) : longbool; cdecl;
@ -1705,24 +1705,24 @@ const
function WinDismissDlg(hwndDlg,usResult : cardinal) : longbool; cdecl; function WinDismissDlg(hwndDlg,usResult : cardinal) : longbool; cdecl;
function WinQueryDlgItemShort(hwndDlg,idItem : cardinal;pResult : Pinteger;fSigned : longbool) : longbool; cdecl; function WinQueryDlgItemShort(hwndDlg,idItem : cardinal;pResult : Pinteger;fSigned : longbool) : longbool; cdecl;
function WinSetDlgItemShort(hwndDlg,idItem : cardinal;usValue : word;fSigned : longbool) : longbool; cdecl; function WinSetDlgItemShort(hwndDlg,idItem : cardinal;usValue : word;fSigned : longbool) : longbool; cdecl;
function WinSetDlgItemText(hwndDlg,idItem : cardinal;pszText : pshortint) : longbool; cdecl; function WinSetDlgItemText(hwndDlg,idItem : cardinal;pszText : pchar) : longbool; cdecl;
function WinQueryDlgItemText(hwndDlg,idItem : cardinal;cchBufferMax : longint;pchBuffer : pshortint) : cardinal; cdecl; function WinQueryDlgItemText(hwndDlg,idItem : cardinal;cchBufferMax : longint;pchBuffer : pchar) : cardinal; cdecl;
function WinQueryDlgItemTextLength(hwndDlg,idItem : cardinal) : longint; cdecl; function WinQueryDlgItemTextLength(hwndDlg,idItem : cardinal) : longint; cdecl;
function WinDefDlgProc(hwndDlg,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinDefDlgProc(hwndDlg,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;
function WinAlarm(hwndDesktop,rgfType : cardinal) : longbool; cdecl; function WinAlarm(hwndDesktop,rgfType : cardinal) : longbool; cdecl;
function WinMessageBox(hwndParent,hwndOwner : cardinal;pszText,pszCaption : pshortint;idWindow,flStyle : cardinal) : cardinal; cdecl; function WinMessageBox(hwndParent,hwndOwner : cardinal;pszText,pszCaption : pchar;idWindow,flStyle : cardinal) : cardinal; cdecl;
function WinProcessDlg(hwndDlg : cardinal) : cardinal; cdecl; function WinProcessDlg(hwndDlg : cardinal) : cardinal; cdecl;
function WinSendDlgItemMsg(hwndDlg,idItem,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl; function WinSendDlgItemMsg(hwndDlg,idItem,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;
function WinMapDlgPoints(hwndDlg : cardinal;prgwptl : PPOINTL;cwpt : cardinal;fCalcWindowCoords : longbool) : longbool; cdecl; function WinMapDlgPoints(hwndDlg : cardinal;prgwptl : PPOINTL;cwpt : cardinal;fCalcWindowCoords : longbool) : longbool; cdecl;
function WinEnumDlgItem(hwndDlg,hwnd,code : cardinal) : cardinal; cdecl; function WinEnumDlgItem(hwndDlg,hwnd,code : cardinal) : cardinal; cdecl;
function WinSubstituteStrings(hwnd : cardinal;pszSrc : pshortint;cchDstMax : longint;pszDst : pshortint) : longint; cdecl; function WinSubstituteStrings(hwnd : cardinal;pszSrc : pchar;cchDstMax : longint;pszDst : pchar) : longint; cdecl;
function WinCreateDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;pdlgt : PDLGTEMPLATE;pCreateParams : pointer) : cardinal; cdecl; function WinCreateDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;pdlgt : PDLGTEMPLATE;pCreateParams : pointer) : cardinal; cdecl;
function WinLoadMenu(hwndFrame,hmod,idMenu : cardinal) : cardinal; cdecl; function WinLoadMenu(hwndFrame,hmod,idMenu : cardinal) : cardinal; cdecl;
function WinCreateMenu(hwndParent : cardinal;lpmt : pointer) : 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 WinPopupMenu(hwndParent,hwndOwner,hwndMenu : cardinal;x,y,idItem : longint;fs : cardinal) : longbool; cdecl;
function WinCreateStdWindow(hwndParent,flStyle : cardinal;pflCreateFlags : pcardinal;pszClientClass,pszTitle : pshortint;styleClient,hmod,idResources : cardinal;phwndClient : pcardinal) : cardinal; cdecl; function WinCreateStdWindow(hwndParent,flStyle : cardinal;pflCreateFlags : pcardinal;pszClientClass,pszTitle : pchar;styleClient,hmod,idResources : cardinal;phwndClient : pcardinal) : cardinal; cdecl;
function WinFlashWindow(hwndFrame : cardinal;fFlash : longbool) : longbool; cdecl; function WinFlashWindow(hwndFrame : cardinal;fFlash : longbool) : longbool; cdecl;
function WinCreateFrameControls(hwndFrame : cardinal;pfcdata : PFRAMECDATA;pszTitle : pshortint) : longbool; cdecl; function WinCreateFrameControls(hwndFrame : cardinal;pfcdata : PFRAMECDATA;pszTitle : pchar) : longbool; cdecl;
function WinCalcFrameRect(hwndFrame : cardinal;prcl : PRECTL;fClient : longbool) : longbool; cdecl; function WinCalcFrameRect(hwndFrame : cardinal;prcl : PRECTL;fClient : longbool) : longbool; cdecl;
function WinGetMinPosition(hwnd : cardinal;pswp : PSWP;pptl : PPOINTL) : longbool; cdecl; function WinGetMinPosition(hwnd : cardinal;pswp : PSWP;pptl : PPOINTL) : longbool; cdecl;
function WinGetMaxPosition(hwnd : cardinal;pswp : PSWP) : longbool; cdecl; function WinGetMaxPosition(hwnd : cardinal;pswp : PSWP) : longbool; cdecl;
@ -1791,41 +1791,41 @@ const
function WinSetHook(hab : cardinal;hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; 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 WinReleaseHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;
function WinCallMsgFilter(hab : cardinal;pqmsg : PQMSG;msgf : cardinal) : longbool; cdecl; function WinCallMsgFilter(hab : cardinal;pqmsg : PQMSG;msgf : cardinal) : longbool; cdecl;
function WinSetClassThunkProc(pszClassname : pshortint;pfnThunkProc : pointer) : longbool; cdecl; function WinSetClassThunkProc(pszClassname : pchar;pfnThunkProc : pointer) : longbool; cdecl;
function WinQueryClassThunkProc(pszClassname : pshortint) : pointer; cdecl; function WinQueryClassThunkProc(pszClassname : pchar) : pointer; cdecl;
function WinSetWindowThunkProc(hwnd : cardinal;pfnThunkProc : pointer) : longbool; cdecl; function WinSetWindowThunkProc(hwnd : cardinal;pfnThunkProc : pointer) : longbool; cdecl;
function WinQueryWindowThunkProc(hwnd : cardinal) : pointer; cdecl; function WinQueryWindowThunkProc(hwnd : cardinal) : pointer; cdecl;
function WinQueryWindowModel(hwnd : cardinal) : longint; cdecl; function WinQueryWindowModel(hwnd : cardinal) : longint; cdecl;
function WinQueryCp(hmq : cardinal) : cardinal; cdecl; function WinQueryCp(hmq : cardinal) : cardinal; cdecl;
function WinSetCp(hmq,idCodePage : cardinal) : longbool; cdecl; function WinSetCp(hmq,idCodePage : cardinal) : longbool; cdecl;
function WinQueryCpList(hab,ccpMax : cardinal;prgcp : pcardinal) : cardinal; cdecl; function WinQueryCpList(hab,ccpMax : cardinal;prgcp : pcardinal) : cardinal; cdecl;
function WinCpTranslateString(hab,cpSrc : cardinal;pszSrc : pshortint;cpDst,cchDestMax : cardinal;pchDest : pshortint) : longbool; 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 WinCpTranslateChar(hab,cpSrc : cardinal;chSrc : byte;cpDst : cardinal) : byte; cdecl;
function WinUpper(hab,idcp,idcc : cardinal;psz : pshortint) : cardinal; cdecl; function WinUpper(hab,idcp,idcc : cardinal;psz : pchar) : cardinal; cdecl;
function WinUpperChar(hab,idcp,idcc,c : cardinal) : cardinal; cdecl; function WinUpperChar(hab,idcp,idcc,c : cardinal) : cardinal; cdecl;
function WinNextChar(hab,idcp,idcc : cardinal;psz : pshortint) : pshortint; cdecl; function WinNextChar(hab,idcp,idcc : cardinal;psz : pchar) : pshortint; cdecl;
function WinPrevChar(hab,idcp,idcc : cardinal;pszStart,psz : pshortint) : pshortint; cdecl; function WinPrevChar(hab,idcp,idcc : cardinal;pszStart,psz : pchar) : pshortint; cdecl;
function WinCompareStrings(hab,idcp,idcc : cardinal;psz1,psz2 : pshortint;reserved : cardinal) : cardinal; cdecl; function WinCompareStrings(hab,idcp,idcc : cardinal;psz1,psz2 : pchar;reserved : cardinal) : cardinal; cdecl;
function WinCreateAtomTable(cbInitial,cBuckets : cardinal) : cardinal; cdecl; function WinCreateAtomTable(cbInitial,cBuckets : cardinal) : cardinal; cdecl;
function WinDestroyAtomTable(hAtomTbl : cardinal) : cardinal; cdecl; function WinDestroyAtomTable(hAtomTbl : cardinal) : cardinal; cdecl;
function WinAddAtom(hAtomTbl : cardinal;pszAtomName : pshortint) : cardinal; cdecl; function WinAddAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl;
function WinFindAtom(hAtomTbl : cardinal;pszAtomName : pshortint) : cardinal; cdecl; function WinFindAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl;
function WinDeleteAtom(hAtomTbl,atom : cardinal) : cardinal; cdecl; function WinDeleteAtom(hAtomTbl,atom : cardinal) : cardinal; cdecl;
function WinQueryAtomUsage(hAtomTbl,atom : cardinal) : cardinal; cdecl; function WinQueryAtomUsage(hAtomTbl,atom : cardinal) : cardinal; cdecl;
function WinQueryAtomLength(hAtomTbl,atom : cardinal) : cardinal; cdecl; function WinQueryAtomLength(hAtomTbl,atom : cardinal) : cardinal; cdecl;
function WinQueryAtomName(hAtomTbl,atom : cardinal;pchBuffer : pshortint;cchBufferMax : cardinal) : cardinal; cdecl; function WinQueryAtomName(hAtomTbl,atom : cardinal;pchBuffer : pchar;cchBufferMax : cardinal) : cardinal; cdecl;
function WinGetLastError(hab : cardinal) : cardinal; cdecl; function WinGetLastError(hab : cardinal) : cardinal; cdecl;
function WinGetErrorInfo(hab : cardinal) : PERRINFO; cdecl; function WinGetErrorInfo(hab : cardinal) : PERRINFO; cdecl;
function WinFreeErrorInfo(perrinfo : PERRINFO) : longbool; cdecl; function WinFreeErrorInfo(perrinfo : PERRINFO) : longbool; cdecl;
{DDE Functions} {DDE Functions}
function WinDdeInitiate(hwndClient : cardinal;pszAppName,pszTopicName : pshortint;pcctxt : PCONVCONTEXT) : longbool; cdecl; function WinDdeInitiate(hwndClient : cardinal;pszAppName,pszTopicName : pchar;pcctxt : PCONVCONTEXT) : longbool; cdecl;
function WinDdeRespond(hwndClient,hwndServer : cardinal;pszAppName,pszTopicName : pshortint;pcctxt : PCONVCONTEXT) : pointer; cdecl; function WinDdeRespond(hwndClient,hwndServer : cardinal;pszAppName,pszTopicName : pchar;pcctxt : PCONVCONTEXT) : pointer; cdecl;
function WinDdePostMsg(hwndTo,hwndFrom,wm : cardinal;pddest : PDDESTRUCT;flOptions : cardinal) : longbool; cdecl; function WinDdePostMsg(hwndTo,hwndFrom,wm : cardinal;pddest : PDDESTRUCT;flOptions : cardinal) : longbool; cdecl;
{Library related functions} {Library related functions}
function WinDeleteProcedure(hab : cardinal;wndproc : ppointer) : longbool; cdecl; function WinDeleteProcedure(hab : cardinal;wndproc : ppointer) : longbool; cdecl;
function WinDeleteLibrary(hab,libhandle : cardinal) : longbool; cdecl; function WinDeleteLibrary(hab,libhandle : cardinal) : longbool; cdecl;
function WinLoadProcedure(hab,libhandle : cardinal;procname : pshortint) : ppointer; cdecl; function WinLoadProcedure(hab,libhandle : cardinal;procname : pchar) : ppointer; cdecl;
function WinLoadLibrary(hab : cardinal;libname : pshortint) : cardinal; cdecl; function WinLoadLibrary(hab : cardinal;libname : pchar) : cardinal; cdecl;
function WinSetDesktopBkgnd(hwndDesktop : cardinal;pdskNew : PDESKTOP) : cardinal; cdecl; function WinSetDesktopBkgnd(hwndDesktop : cardinal;pdskNew : PDESKTOP) : cardinal; cdecl;
function WinQueryDesktopBkgnd(hwndDesktop : cardinal;pdsk : PDESKTOP) : longbool; cdecl; function WinQueryDesktopBkgnd(hwndDesktop : cardinal;pdsk : PDESKTOP) : longbool; cdecl;
function WinRealizePalette(hwnd,hps : cardinal;pcclr : pcardinal) : longint; cdecl; function WinRealizePalette(hwnd,hps : cardinal;pcclr : pcardinal) : longint; cdecl;
@ -1835,247 +1835,248 @@ const
implementation implementation
function WinRegisterClass(hab : cardinal;pszClassName : pshortint;pfnWndProc : ppointer;flStyle,cbWindowData : cardinal) : longbool; cdecl;external; function WinRegisterClass(hab : cardinal;pszClassName : pchar;pfnWndProc : ppointer;flStyle,cbWindowData : cardinal) : longbool; cdecl;external 'pmwin' index 926;
function WinDefWindowProc(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external; function WinDefWindowProc(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin' index 911;
function WinDestroyWindow(hwnd : cardinal) : longbool; cdecl;external; function WinDestroyWindow(hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 728;
function WinShowWindow(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external; function WinShowWindow(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin' index 883;
function WinQueryWindowRect(hwnd : cardinal;prclDest : PRECTL) : longbool; cdecl;external; function WinQueryWindowRect(hwnd : cardinal;prclDest : PRECTL) : longbool; cdecl;external 'pmwin' index 840;
function WinGetPS(hwnd : cardinal) : cardinal; cdecl;external; function WinGetPS(hwnd : cardinal) : cardinal; cdecl;external 'pmwin' index 757;
function WinReleasePS(hps : cardinal) : longbool; cdecl;external; function WinReleasePS(hps : cardinal) : longbool; cdecl;external 'pmwin' index 848;
function WinEndPaint(hps : cardinal) : longbool; cdecl;external; function WinEndPaint(hps : cardinal) : longbool; cdecl;external 'pmwin' index 738;
function WinGetClipPS(hwnd,hwndClip,fl : cardinal) : cardinal; cdecl;external; function WinGetClipPS(hwnd,hwndClip,fl : cardinal) : cardinal; cdecl;external 'pmwin' index 749;
function WinIsWindowShowing(hwnd : cardinal) : longbool; cdecl;external; function WinIsWindowShowing(hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 774;
function WinBeginPaint(hwnd,hps : cardinal;prclPaint : PRECTL) : cardinal; cdecl;external; function WinBeginPaint(hwnd,hps : cardinal;prclPaint : PRECTL) : cardinal; cdecl;external 'pmwin' index 703;
function WinOpenWindowDC(hwnd : cardinal) : cardinal; cdecl;external; function WinOpenWindowDC(hwnd : cardinal) : cardinal; cdecl;external 'pmwin' index 794;
function WinScrollWindow(hwnd : cardinal;dx,dy : longint;prclScroll,prclClip : PRECTL;hrgnUpdate : cardinal;prclUpdate : PRECTL;rgfsw : cardinal) : longint; cdecl;external; function WinScrollWindow(hwnd : cardinal;dx,dy : longint;prclScroll,prclClip : PRECTL;hrgnUpdate : cardinal;prclUpdate : PRECTL;rgfsw : cardinal) : longint; cdecl;external 'pmwin' index 849;
function WinFillRect(hps : cardinal;prcl : PRECTL;lColor : longint) : longbool; cdecl;external; function WinFillRect(hps : cardinal;prcl : PRECTL;lColor : longint) : longbool; cdecl;external 'pmwin' index 743;
function WinQueryVersion(hab : cardinal) : cardinal; cdecl;external; function WinQueryVersion(hab : cardinal) : cardinal; cdecl;external 'pmwin' index 833;
function WinInitialize(flOptions : cardinal) : cardinal; cdecl;external; function WinInitialize(flOptions : cardinal) : cardinal; cdecl;external 'pmwin' index 763;
function WinTerminate(hab : cardinal) : longbool; cdecl;external; function WinTerminate(hab : cardinal) : longbool; cdecl;external 'pmwin' index 888;
function WinQueryAnchorBlock(hwnd : cardinal) : cardinal; cdecl;external; function WinQueryAnchorBlock(hwnd : cardinal) : cardinal; cdecl;external 'pmwin' index 800;
function WinCreateWindow(hwndParent : cardinal;pszClass,pszName : pshortint;flStyle : cardinal;x,y,cx,cy : longint;hwndOwner,hwndInsertBehind,id : cardinal;pCtlData,pPresParams : pointer) : cardinal; cdecl;external; function WinCreateWindow(hwndParent : cardinal;pszClass,pszName : pchar;flStyle : cardinal;x,y,cx,cy : longint;hwndOwner,hwndInsertBehind,id : cardinal;pCtlData,pPresParams : pointer) : cardinal; cdecl;external 'pmwin' index 909;
function WinEnableWindow(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;external; function WinEnableWindow(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;external 'pmwin' index 735;
function WinIsWindowEnabled(hwnd : cardinal) : longbool; cdecl;external; function WinIsWindowEnabled(hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 773;
function WinEnableWindowUpdate(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;external; function WinEnableWindowUpdate(hwnd : cardinal;fEnable : longbool) : longbool; cdecl;external 'pmwin' index 736;
function WinIsWindowVisible(hwnd : cardinal) : longbool; cdecl;external; function WinIsWindowVisible(hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 775;
function WinQueryWindowText(hwnd : cardinal;cchBufferMax : longint;pchBuffer : pshortint) : longint; cdecl;external; function WinQueryWindowText(hwnd : cardinal;cchBufferMax : longint;pchBuffer : pshortint) : longint; cdecl;external 'pmwin' index 841;
function WinSetWindowText(hwnd : cardinal;pszText : pshortint) : longbool; cdecl;external; function WinSetWindowText(hwnd : cardinal;pszText : pchar) : longbool; cdecl;external 'pmwin' index 877;
function WinQueryWindowTextLength(hwnd : cardinal) : longint; cdecl;external; function WinQueryWindowTextLength(hwnd : cardinal) : longint; cdecl;external 'pmwin' index 842;
function WinWindowFromID(hwndParent,id : cardinal) : cardinal; cdecl;external; function WinWindowFromID(hwndParent,id : cardinal) : cardinal; cdecl;external 'pmwin' index 899;
function WinIsWindow(hab,hwnd : cardinal) : longbool; cdecl;external; function WinIsWindow(hab,hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 772;
function WinQueryWindow(hwnd : cardinal;cmd : longint) : cardinal; cdecl;external; function WinQueryWindow(hwnd : cardinal;cmd : longint) : cardinal; cdecl;external 'pmwin' index 834;
function WinMultWindowFromIDs(hwndParent : cardinal;prghwnd : pcardinal;idFirst,idLast : cardinal) : longint; cdecl;external; function WinMultWindowFromIDs(hwndParent : cardinal;prghwnd : pcardinal;idFirst,idLast : cardinal) : longint; cdecl;external 'pmwin' index 917;
function WinSetParent(hwnd,hwndNewParent : cardinal;fRedraw : longbool) : longbool; cdecl;external; function WinSetParent(hwnd,hwndNewParent : cardinal;fRedraw : longbool) : longbool; cdecl;external 'pmwin' index 865;
function WinIsChild(hwnd,hwndParent : cardinal) : longbool; cdecl;external; function WinIsChild(hwnd,hwndParent : cardinal) : longbool; cdecl;external 'pmwin' index 768;
function WinSetOwner(hwnd,hwndNewOwner : cardinal) : longbool; cdecl;external; function WinSetOwner(hwnd,hwndNewOwner : cardinal) : longbool; cdecl;external 'pmwin' index 864;
function WinQueryWindowProcess(hwnd : cardinal;ppid,ptid : pcardinal) : longbool; cdecl;external; function WinQueryWindowProcess(hwnd : cardinal;ppid,ptid : pcardinal) : longbool; cdecl;external 'pmwin' index 838;
function WinQueryObjectWindow(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinQueryObjectWindow(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 820;
function WinQueryDesktopWindow(hab,hdc : cardinal) : cardinal; cdecl;external; function WinQueryDesktopWindow(hab,hdc : cardinal) : cardinal; cdecl;external 'pmwin' index 813;
function WinSetWindowPos(hwnd,hwndInsertBehind : cardinal;x,y,cx,cy : longint;fl : cardinal) : longbool; cdecl;external; function WinSetWindowPos(hwnd,hwndInsertBehind : cardinal;x,y,cx,cy : longint;fl : cardinal) : longbool; cdecl;external 'pmwin' index 875;
function WinSetMultWindowPos(hab : cardinal;pswp : PSWP;cswp : cardinal) : longbool; cdecl;external; function WinSetMultWindowPos(hab : cardinal;pswp : PSWP;cswp : cardinal) : longbool; cdecl;external 'pmwin' index 863;
function WinQueryWindowPos(hwnd : cardinal;pswp : PSWP) : longbool; cdecl;external; function WinQueryWindowPos(hwnd : cardinal;pswp : PSWP) : longbool; cdecl;external 'pmwin' index 837;
function WinUpdateWindow(hwnd : cardinal) : longbool; cdecl;external; function WinUpdateWindow(hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 892;
function WinInvalidateRect(hwnd : cardinal;pwrc : PRECTL;fIncludeChildren : longbool) : longbool; cdecl;external; function WinInvalidateRect(hwnd : cardinal;pwrc : PRECTL;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin' index 765;
function WinInvalidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl;external; function WinInvalidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin' index 766;
function WinInvertRect(hps : cardinal;prcl : PRECTL) : longbool; cdecl;external; function WinInvertRect(hps : cardinal;prcl : PRECTL) : longbool; cdecl;external 'pmwin' index 767;
function WinDrawBitmap(hpsDst,hbm : cardinal;pwrcSrc : PRECTL;pptlDst : PPOINTL;clrFore,clrBack : longint;fl : cardinal) : longbool; cdecl;external; function WinDrawBitmap(hpsDst,hbm : cardinal;pwrcSrc : PRECTL;pptlDst : PPOINTL;clrFore,clrBack : longint;fl : cardinal) : longbool; cdecl;external 'pmwin' index 730;
function WinDrawText(hps : cardinal;cchText : longint;lpchText : pshortint;prcl : PRECTL;clrFore,clrBack : longint;flCmd : cardinal) : longint; cdecl;external; function WinDrawText(hps : cardinal;cchText : longint;lpchText : pshortint;prcl : PRECTL;clrFore,clrBack : longint;flCmd : cardinal) : longint; cdecl;external 'pmwin' index 913;
function WinDrawBorder(hps : cardinal;prcl : PRECTL;cx,cy,clrFore,clrBack : longint;flCmd : cardinal) : longbool; cdecl;external; function WinDrawBorder(hps : cardinal;prcl : PRECTL;cx,cy,clrFore,clrBack : longint;flCmd : cardinal) : longbool; cdecl;external 'pmwin' index 731;
function WinLoadString(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pshortint) : longint; cdecl;external; function WinLoadString(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl;external 'pmwin' index 781;
function WinLoadMessage(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pshortint) : longint; cdecl;external; function WinLoadMessage(hab,hmod,id : cardinal;cchMax : longint;pchBuffer : pchar) : longint; cdecl;external 'pmwin' index 779;
function WinSetActiveWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external; function WinSetActiveWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 851;
function WinSubclassWindow(hwnd : cardinal;pfnwp : ppointer) : ppointer; cdecl;external; function WinSubclassWindow(hwnd : cardinal;pfnwp : ppointer) : ppointer; cdecl;external 'pmwin' index 929;
function WinQueryClassName(hwnd : cardinal;cchMax : longint;pch : pshortint) : longint; cdecl;external; function WinQueryClassName(hwnd : cardinal;cchMax : longint;pch : pshortint) : longint; cdecl;external 'pmwin' index 805;
function WinQueryClassInfo(hab : cardinal;pszClassName : pshortint;pClassInfo : PCLASSINFO) : longbool; cdecl;external; function WinQueryClassInfo(hab : cardinal;pszClassName : pchar;pClassInfo : PCLASSINFO) : longbool; cdecl;external 'pmwin' index 925;
function WinQueryActiveWindow(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinQueryActiveWindow(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 799;
function WinIsThreadActive(hab : cardinal) : longbool; cdecl;external; function WinIsThreadActive(hab : cardinal) : longbool; cdecl;external 'pmwin' index 771;
function WinQuerySysModalWindow(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinQuerySysModalWindow(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 827;
function WinSetSysModalWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external; function WinSetSysModalWindow(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 872;
function WinQueryWindowUShort(hwnd : cardinal;index : longint) : word; cdecl;external; function WinQueryWindowUShort(hwnd : cardinal;index : longint) : word; cdecl;external 'pmwin' index 844;
function WinSetWindowUShort(hwnd : cardinal;index : longint;us : word) : longbool; cdecl;external; function WinSetWindowUShort(hwnd : cardinal;index : longint;us : word) : longbool; cdecl;external 'pmwin' index 879;
function WinQueryWindowULong(hwnd : cardinal;index : longint) : cardinal; cdecl;external; function WinQueryWindowULong(hwnd : cardinal;index : longint) : cardinal; cdecl;external 'pmwin' index 843;
function WinSetWindowULong(hwnd : cardinal;index : longint;ul : cardinal) : longbool; cdecl;external; function WinSetWindowULong(hwnd : cardinal;index : longint;ul : cardinal) : longbool; cdecl;external 'pmwin' index 878;
function WinQueryWindowPtr(hwnd : cardinal;index : longint) : pointer; cdecl;external; function WinQueryWindowPtr(hwnd : cardinal;index : longint) : pointer; cdecl;external 'pmwin' index 839;
function WinSetWindowPtr(hwnd : cardinal;index : longint;p : pointer) : longbool; cdecl;external; function WinSetWindowPtr(hwnd : cardinal;index : longint;p : pointer) : longbool; cdecl;external 'pmwin' index 876;
function WinSetWindowBits(hwnd : cardinal;index : longint;flData,flMask : cardinal) : longbool; cdecl;external; function WinSetWindowBits(hwnd : cardinal;index : longint;flData,flMask : cardinal) : longbool; cdecl;external 'pmwin' index 874;
function WinBeginEnumWindows(hwnd : cardinal) : cardinal; cdecl;external; function WinBeginEnumWindows(hwnd : cardinal) : cardinal; cdecl;external 'pmwin' index 702;
function WinGetNextWindow(henum : cardinal) : cardinal; cdecl;external; function WinGetNextWindow(henum : cardinal) : cardinal; cdecl;external 'pmwin' index 756;
function WinEndEnumWindows(henum : cardinal) : longbool; cdecl;external; function WinEndEnumWindows(henum : cardinal) : longbool; cdecl;external 'pmwin' index 737;
function WinWindowFromPoint(hwnd : cardinal;pptl : PPOINTL;fChildren : longbool) : cardinal; cdecl;external; function WinWindowFromPoint(hwnd : cardinal;pptl : PPOINTL;fChildren : longbool) : cardinal; cdecl;external 'pmwin' index 900;
function WinMapWindowPoints(hwndFrom,hwndTo : cardinal;prgptl : PPOINTL;cwpt : longint) : longbool; cdecl;external; function WinMapWindowPoints(hwndFrom,hwndTo : cardinal;prgptl : PPOINTL;cwpt : longint) : longbool; cdecl;external 'pmwin' index 788;
function WinValidateRect(hwnd : cardinal;prcl : PRECTL;fIncludeChildren : longbool) : longbool; cdecl;external; function WinValidateRect(hwnd : cardinal;prcl : PRECTL;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin' index 895;
function WinValidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl;external; function WinValidateRegion(hwnd,hrgn : cardinal;fIncludeChildren : longbool) : longbool; cdecl;external 'pmwin' index 896;
function WinWindowFromDC(hdc : cardinal) : cardinal; cdecl;external; function WinWindowFromDC(hdc : cardinal) : cardinal; cdecl;external 'pmwin' index 898;
function WinQueryWindowDC(hwnd : cardinal) : cardinal; cdecl;external; function WinQueryWindowDC(hwnd : cardinal) : cardinal; cdecl;external 'pmwin' index 835;
function WinGetScreenPS(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinGetScreenPS(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 759;
function WinLockWindowUpdate(hwndDesktop,hwndLockUpdate : cardinal) : longbool; cdecl;external; function WinLockWindowUpdate(hwndDesktop,hwndLockUpdate : cardinal) : longbool; cdecl;external 'pmwin' index 784;
function WinLockVisRegions(hwndDesktop : cardinal;fLock : longbool) : longbool; cdecl;external; function WinLockVisRegions(hwndDesktop : cardinal;fLock : longbool) : longbool; cdecl;external 'pmwin' index 782;
function WinQueryUpdateRect(hwnd : cardinal;prcl : PRECTL) : longbool; cdecl;external; function WinQueryUpdateRect(hwnd : cardinal;prcl : PRECTL) : longbool; cdecl;external 'pmwin' index 831;
function WinQueryUpdateRegion(hwnd,hrgn : cardinal) : longint; cdecl;external; function WinQueryUpdateRegion(hwnd,hrgn : cardinal) : longint; cdecl;external 'pmwin' index 832;
function WinExcludeUpdateRegion(hps,hwnd : cardinal) : longint; cdecl;external; function WinExcludeUpdateRegion(hps,hwnd : cardinal) : longint; cdecl;external 'pmwin' index 742;
function WinSendMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external; function WinSendMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin' index 920;
function WinCreateMsgQueue(hab : cardinal;cmsg : longint) : cardinal; cdecl;external; function WinCreateMsgQueue(hab : cardinal;cmsg : longint) : cardinal; cdecl;external 'pmwin' index 716;
function WinDestroyMsgQueue(hmq : cardinal) : longbool; cdecl;external; function WinDestroyMsgQueue(hmq : cardinal) : longbool; cdecl;external 'pmwin' index 726;
function WinQueryQueueInfo(hmq : cardinal;pmqi : PMQINFO;cbCopy : cardinal) : longbool; cdecl;external; function WinQueryQueueInfo(hmq : cardinal;pmqi : PMQINFO;cbCopy : cardinal) : longbool; cdecl;external 'pmwin' index 824;
function WinCancelShutdown(hmq : cardinal;fCancelAlways : longbool) : longbool; cdecl;external; function WinCancelShutdown(hmq : cardinal;fCancelAlways : longbool) : longbool; cdecl;external 'pmwin' index 705;
function WinGetMsg(hab : cardinal;pqmsg : PQMSG;hwndFilter,msgFilterFirst,msgFilterLast : cardinal) : longbool; cdecl;external; function WinGetMsg(hab : cardinal;pqmsg : PQMSG;hwndFilter,msgFilterFirst,msgFilterLast : cardinal) : longbool; cdecl;external 'pmwin' index 915;
function WinPeekMsg(hab : cardinal;pqmsg : PQMSG;hwndFilter,msgFilterFirst,msgFilterLast,fl : cardinal) : longbool; cdecl;external; function WinPeekMsg(hab : cardinal;pqmsg : PQMSG;hwndFilter,msgFilterFirst,msgFilterLast,fl : cardinal) : longbool; cdecl;external 'pmwin' index 918;
function WinDispatchMsg(hab : cardinal;pqmsg : PQMSG) : pointer; cdecl;external; function WinDispatchMsg(hab : cardinal;pqmsg : PQMSG) : pointer; cdecl;external 'pmwin' index 912;
function WinPostMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;external; function WinPostMsg(hwnd,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;external 'pmwin' index 919;
function WinRegisterUserMsg(hab,msgid : cardinal;datatype1,dir1,datatype2,dir2,datatyper : longint) : longbool; cdecl;external; function WinRegisterUserMsg(hab,msgid : cardinal;datatype1,dir1,datatype2,dir2,datatyper : longint) : longbool; cdecl;external 'pmwin' index 846;
function WinRegisterUserDatatype(hab : cardinal;datatype,count : longint;types : Plongint) : longbool; cdecl;external; function WinRegisterUserDatatype(hab : cardinal;datatype,count : longint;types : Plongint) : longbool; cdecl;external 'pmwin' index 845;
function WinSetMsgMode(hab : cardinal;classname : pshortint;control : longint) : longbool; cdecl;external; function WinSetMsgMode(hab : cardinal;classname :pchar;control : longint) : longbool; cdecl;external 'pmwin' index 862;
function WinSetSynchroMode(hab : cardinal;mode : longint) : longbool; cdecl;external; function WinSetSynchroMode(hab : cardinal;mode : longint) : longbool; cdecl;external 'pmwin' index 870;
function WinInSendMsg(hab : cardinal) : longbool; cdecl;external; function WinInSendMsg(hab : cardinal) : longbool; cdecl;external 'pmwin' index 761;
function WinBroadcastMsg(hwnd,msg : cardinal;mp1,mp2 : pointer;rgf : cardinal) : longbool; cdecl;external; function WinBroadcastMsg(hwnd,msg : cardinal;mp1,mp2 : pointer;rgf : cardinal) : longbool; cdecl;external 'pmwin' index 901;
function WinWaitMsg(hab,msgFirst,msgLast : cardinal) : longbool; cdecl;external; function WinWaitMsg(hab,msgFirst,msgLast : cardinal) : longbool; cdecl;external 'pmwin' index 897;
function WinQueryQueueStatus(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinQueryQueueStatus(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 825;
function WinQueryMsgPos(hab : cardinal;pptl : PPOINTL) : longbool; cdecl;external; function WinQueryMsgPos(hab : cardinal;pptl : PPOINTL) : longbool; cdecl;external 'pmwin' index 818;
function WinQueryMsgTime(hab : cardinal) : cardinal; cdecl;external; function WinQueryMsgTime(hab : cardinal) : cardinal; cdecl;external 'pmwin' index 819;
function WinWaitEventSem(hev,ulTimeout : cardinal) : cardinal; cdecl;external; function WinWaitEventSem(hev,ulTimeout : cardinal) : cardinal; cdecl;external 'pmwin' index 978;
function WinRequestMutexSem(hmtx,ulTimeout : cardinal) : cardinal; cdecl;external; function WinRequestMutexSem(hmtx,ulTimeout : cardinal) : cardinal; cdecl;external 'pmwin' index 979;
function WinWaitMuxWaitSem(hmux,ulTimeout : cardinal;pulUser : pcardinal) : cardinal; cdecl;external; function WinWaitMuxWaitSem(hmux,ulTimeout : cardinal;pulUser : pcardinal) : cardinal; cdecl;external 'pmwin' index 980;
function WinPostQueueMsg(hmq,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;external; function WinPostQueueMsg(hmq,msg : cardinal;mp1,mp2 : pointer) : longbool; cdecl;external 'pmwin' index 902;
function WinSetMsgInterest(hwnd,msg_class : cardinal;control : longint) : longbool; cdecl;external; function WinSetMsgInterest(hwnd,msg_class : cardinal;control : longint) : longbool; cdecl;external 'pmwin' index 861;
function WinSetClassMsgInterest(hab : cardinal;pszClassName : pshortint;msg_class : cardinal;control : longint) : longbool; cdecl;external; function WinSetClassMsgInterest(hab : cardinal;pszClassName : pchar;msg_class : cardinal;control : longint) : longbool; cdecl;external 'pmwin' index 853;
function WinSetFocus(hwndDesktop,hwndSetFocus : cardinal) : longbool; cdecl;external; function WinSetFocus(hwndDesktop,hwndSetFocus : cardinal) : longbool; cdecl;external 'pmwin' index 860;
function WinFocusChange(hwndDesktop,hwndSetFocus,flFocusChange : cardinal) : longbool; cdecl;external; function WinFocusChange(hwndDesktop,hwndSetFocus,flFocusChange : cardinal) : longbool; cdecl;external 'pmwin' index 746;
function WinSetCapture(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external; function WinSetCapture(hwndDesktop,hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 852;
function WinQueryCapture(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinQueryCapture(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 804;
function WinQueryFocus(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinQueryFocus(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 817;
function WinGetKeyState(hwndDesktop : cardinal;vkey : longint) : longint; cdecl;external; function WinGetKeyState(hwndDesktop : cardinal;vkey : longint) : longint; cdecl;external 'pmwin' index 752;
function WinGetPhysKeyState(hwndDesktop : cardinal;sc : longint) : longint; cdecl;external; function WinGetPhysKeyState(hwndDesktop : cardinal;sc : longint) : longint; cdecl;external 'pmwin' index 758;
function WinEnablePhysInput(hwndDesktop : cardinal;fEnable : longbool) : longbool; cdecl;external; function WinEnablePhysInput(hwndDesktop : cardinal;fEnable : longbool) : longbool; cdecl;external 'pmwin' index 734;
function WinIsPhysInputEnabled(hwndDesktop : cardinal) : longbool; cdecl;external; function WinIsPhysInputEnabled(hwndDesktop : cardinal) : longbool; cdecl;external 'pmwin' index 769;
function WinSetKeyboardStateTable(hwndDesktop : cardinal;pKeyStateTable : PBYTE;fSet : longbool) : longbool; cdecl;external; function WinSetKeyboardStateTable(hwndDesktop : cardinal;pKeyStateTable : PBYTE;fSet : longbool) : longbool; cdecl;external 'pmwin' index 921;
function WinGetDlgMsg(hwndDlg : cardinal;pqmsg : PQMSG) : longbool; cdecl;external; function WinGetDlgMsg(hwndDlg : cardinal;pqmsg : PQMSG) : longbool; cdecl;external 'pmwin' index 914;
function WinLoadDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl;external; function WinLoadDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl;external 'pmwin' index 924;
function WinDlgBox(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl;external; function WinDlgBox(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;hmod,idDlg : cardinal;pCreateParams : pointer) : cardinal; cdecl;external 'pmwin' index 923;
function WinDismissDlg(hwndDlg,usResult : cardinal) : longbool; cdecl;external; function WinDismissDlg(hwndDlg,usResult : cardinal) : longbool; cdecl;external 'pmwin' index 729;
function WinQueryDlgItemShort(hwndDlg,idItem : cardinal;pResult : Pinteger;fSigned : longbool) : longbool; cdecl;external; function WinQueryDlgItemShort(hwndDlg,idItem : cardinal;pResult : Pinteger;fSigned : longbool) : longbool; cdecl;external 'pmwin' index 814;
function WinSetDlgItemShort(hwndDlg,idItem : cardinal;usValue : word;fSigned : longbool) : longbool; cdecl;external; function WinSetDlgItemShort(hwndDlg,idItem : cardinal;usValue : word;fSigned : longbool) : longbool; cdecl;external 'pmwin' index 858;
function WinSetDlgItemText(hwndDlg,idItem : cardinal;pszText : pshortint) : longbool; cdecl;external; function WinSetDlgItemText(hwndDlg,idItem : cardinal;pszText : pchar) : longbool; cdecl;external 'pmwin' index 859;
function WinQueryDlgItemText(hwndDlg,idItem : cardinal;cchBufferMax : longint;pchBuffer : pshortint) : cardinal; cdecl;external; function WinQueryDlgItemText(hwndDlg,idItem : cardinal;cchBufferMax : longint;pchBuffer : pchar) : cardinal; cdecl;external 'pmwin' index 815;
function WinQueryDlgItemTextLength(hwndDlg,idItem : cardinal) : longint; cdecl;external; function WinQueryDlgItemTextLength(hwndDlg,idItem : cardinal) : longint; cdecl;external 'pmwin' index 816;
function WinDefDlgProc(hwndDlg,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external; function WinDefDlgProc(hwndDlg,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin' index 910;
function WinAlarm(hwndDesktop,rgfType : cardinal) : longbool; cdecl;external; function WinAlarm(hwndDesktop,rgfType : cardinal) : longbool; cdecl;external 'pmwin' index 701;
function WinMessageBox(hwndParent,hwndOwner : cardinal;pszText,pszCaption : pshortint;idWindow,flStyle : cardinal) : cardinal; cdecl;external; function WinMessageBox(hwndParent,hwndOwner : cardinal;pszText,pszCaption : pchar;idWindow,flStyle : cardinal) : cardinal; cdecl;external 'pmwin' index 789;
function WinProcessDlg(hwndDlg : cardinal) : cardinal; cdecl;external; function WinProcessDlg(hwndDlg : cardinal) : cardinal; cdecl;external 'pmwin' index 796;
function WinSendDlgItemMsg(hwndDlg,idItem,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external; function WinSendDlgItemMsg(hwndDlg,idItem,msg : cardinal;mp1,mp2 : pointer) : pointer; cdecl;external 'pmwin' index 903;
function WinMapDlgPoints(hwndDlg : cardinal;prgwptl : PPOINTL;cwpt : cardinal;fCalcWindowCoords : longbool) : longbool; cdecl;external; function WinMapDlgPoints(hwndDlg : cardinal;prgwptl : PPOINTL;cwpt : cardinal;fCalcWindowCoords : longbool) : longbool; cdecl;external 'pmwin' index 787;
function WinEnumDlgItem(hwndDlg,hwnd,code : cardinal) : cardinal; cdecl;external; function WinEnumDlgItem(hwndDlg,hwnd,code : cardinal) : cardinal; cdecl;external 'pmwin' index 740;
function WinSubstituteStrings(hwnd : cardinal;pszSrc : pshortint;cchDstMax : longint;pszDst : pshortint) : longint; cdecl;external; function WinSubstituteStrings(hwnd : cardinal;pszSrc : pchar;cchDstMax : longint;pszDst : pchar) : longint; cdecl;external 'pmwin' index 886;
function WinCreateDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;pdlgt : PDLGTEMPLATE;pCreateParams : pointer) : cardinal; cdecl;external; function WinCreateDlg(hwndParent,hwndOwner : cardinal;pfnDlgProc : ppointer;pdlgt : PDLGTEMPLATE;pCreateParams : pointer) : cardinal; cdecl;external 'pmwin' index 922;
function WinLoadMenu(hwndFrame,hmod,idMenu : cardinal) : cardinal; cdecl;external; function WinLoadMenu(hwndFrame,hmod,idMenu : cardinal) : cardinal; cdecl;external 'pmwin' index 778;
function WinCreateMenu(hwndParent : cardinal;lpmt : pointer) : cardinal; cdecl;external; function WinCreateMenu(hwndParent : cardinal;lpmt : pointer) : cardinal; cdecl;external 'pmwin' index 907;
function WinPopupMenu(hwndParent,hwndOwner,hwndMenu : cardinal;x,y,idItem : longint;fs : cardinal) : longbool; cdecl;external; function WinPopupMenu(hwndParent,hwndOwner,hwndMenu : cardinal;x,y,idItem : longint;fs : cardinal) : longbool; cdecl;external 'pmwin' index 937;
function WinCreateStdWindow(hwndParent,flStyle : cardinal;pflCreateFlags : pcardinal;pszClientClass,pszTitle : pshortint;styleClient,hmod,idResources : cardinal;phwndClient : pcardinal) : cardinal; cdecl;external; function WinCreateStdWindow(hwndParent,flStyle : cardinal;pflCreateFlags : pcardinal;pszClientClass,pszTitle : pchar;styleClient,hmod,idResources : cardinal;phwndClient : pcardinal) : cardinal; cdecl;external 'pmwin' index 908;
function WinFlashWindow(hwndFrame : cardinal;fFlash : longbool) : longbool; cdecl;external; function WinFlashWindow(hwndFrame : cardinal;fFlash : longbool) : longbool; cdecl;external 'pmwin' index 745;
function WinCreateFrameControls(hwndFrame : cardinal;pfcdata : PFRAMECDATA;pszTitle : pshortint) : longbool; cdecl;external; function WinCreateFrameControls(hwndFrame : cardinal;pfcdata : PFRAMECDATA;pszTitle : pchar) : longbool; cdecl;external 'pmwin' index 906;
function WinCalcFrameRect(hwndFrame : cardinal;prcl : PRECTL;fClient : longbool) : longbool; cdecl;external; function WinCalcFrameRect(hwndFrame : cardinal;prcl : PRECTL;fClient : longbool) : longbool; cdecl;external 'pmwin' index 704;
function WinGetMinPosition(hwnd : cardinal;pswp : PSWP;pptl : PPOINTL) : longbool; cdecl;external; function WinGetMinPosition(hwnd : cardinal;pswp : PSWP;pptl : PPOINTL) : longbool; cdecl;external 'pmwin' index 755;
function WinGetMaxPosition(hwnd : cardinal;pswp : PSWP) : longbool; cdecl;external; function WinGetMaxPosition(hwnd : cardinal;pswp : PSWP) : longbool; cdecl;external 'pmwin' index 754;
function WinSaveWindowPos(hsvwp : cardinal;pswp : PSWP;cswp : cardinal) : longbool; cdecl;external; function WinSaveWindowPos(hsvwp : cardinal;pswp : PSWP;cswp : cardinal) : longbool; cdecl;external 'pmwin' index 943;
function WinCopyRect(hab : cardinal;prclDst,prclSrc : PRECTL) : longbool; cdecl;external; function WinCopyRect(hab : cardinal;prclDst,prclSrc : PRECTL) : longbool; cdecl;external 'pmwin' index 710;
function WinSetRect(hab : cardinal;prcl : PRECTL;xLeft,yBottom,xRight,yTop : longint) : longbool; cdecl;external;
function WinIsRectEmpty(hab : cardinal;prcl : PRECTL) : longbool; cdecl;external; function WinSetRect(hab : cardinal;prcl : PRECTL;xLeft,yBottom,xRight,yTop : longint) : longbool; cdecl;external 'pmwin' index 868;
function WinEqualRect(hab : cardinal;prcl1,prcl2 : PRECTL) : longbool; cdecl;external; function WinIsRectEmpty(hab : cardinal;prcl : PRECTL) : longbool; cdecl;external 'pmwin' index 770;
function WinSetRectEmpty(hab : cardinal;prcl : PRECTL) : longbool; cdecl;external; function WinEqualRect(hab : cardinal;prcl1,prcl2 : PRECTL) : longbool; cdecl;external 'pmwin' index 741;
function WinOffsetRect(hab : cardinal;prcl : PRECTL;cx,cy : longint) : longbool; cdecl;external; function WinSetRectEmpty(hab : cardinal;prcl : PRECTL) : longbool; cdecl;external 'pmwin' index 869;
function WinInflateRect(hab : cardinal;prcl : PRECTL;cx,cy : longint) : longbool; cdecl;external; function WinOffsetRect(hab : cardinal;prcl : PRECTL;cx,cy : longint) : longbool; cdecl;external 'pmwin' index 792;
function WinPtInRect(hab : cardinal;prcl : PRECTL;pptl : PPOINTL) : longbool; cdecl;external; function WinInflateRect(hab : cardinal;prcl : PRECTL;cx,cy : longint) : longbool; cdecl;external 'pmwin' index 762;
function WinIntersectRect(hab : cardinal;prclDst,prclSrc1,prclSrc2 : PRECTL) : longbool; cdecl;external; function WinPtInRect(hab : cardinal;prcl : PRECTL;pptl : PPOINTL) : longbool; cdecl;external 'pmwin' index 797;
function WinUnionRect(hab : cardinal;prclDst,prclSrc1,prclSrc2 : PRECTL) : longbool; cdecl;external; function WinIntersectRect(hab : cardinal;prclDst,prclSrc1,prclSrc2 : PRECTL) : longbool; cdecl;external 'pmwin' index 764;
function WinSubtractRect(hab : cardinal;prclDst,prclSrc1,prclSrc2 : PRECTL) : longbool; cdecl;external; function WinUnionRect(hab : cardinal;prclDst,prclSrc1,prclSrc2 : PRECTL) : longbool; cdecl;external 'pmwin' index 891;
function WinMakeRect(hab : cardinal;pwrc : PRECTL) : longbool; cdecl;external; function WinSubtractRect(hab : cardinal;prclDst,prclSrc1,prclSrc2 : PRECTL) : longbool; cdecl;external 'pmwin' index 887;
function WinMakePoints(hab : cardinal;pwpt : PPOINTL;cwpt : cardinal) : longbool; cdecl;external; function WinMakeRect(hab : cardinal;pwrc : PRECTL) : longbool; cdecl;external 'pmwin' index 786;
function WinQuerySysValue(hwndDesktop : cardinal;iSysValue : longint) : longint; cdecl;external; function WinMakePoints(hab : cardinal;pwpt : PPOINTL;cwpt : cardinal) : longbool; cdecl;external 'pmwin' index 785;
function WinSetSysValue(hwndDesktop : cardinal;iSysValue,lValue : longint) : longbool; cdecl;external; function WinQuerySysValue(hwndDesktop : cardinal;iSysValue : longint) : longint; cdecl;external 'pmwin' index 829;
function WinSetPresParam(hwnd,id,cbParam : cardinal;pbParam : pointer) : longbool; cdecl;external; function WinSetSysValue(hwndDesktop : cardinal;iSysValue,lValue : longint) : longbool; cdecl;external 'pmwin' index 873;
function WinQueryPresParam(hwnd,id1,id2 : cardinal;pulId : pcardinal;cbBuf : cardinal;pbBuf : pointer;fs : cardinal) : cardinal; cdecl;external; function WinSetPresParam(hwnd,id,cbParam : cardinal;pbParam : pointer) : longbool; cdecl;external 'pmwin' index 938;
function WinRemovePresParam(hwnd,id : cardinal) : longbool; cdecl;external; function WinQueryPresParam(hwnd,id1,id2 : cardinal;pulId : pcardinal;cbBuf : cardinal;pbBuf : pointer;fs : cardinal) : cardinal; cdecl;external 'pmwin' index 939;
function WinQuerySysColor(hwndDesktop : cardinal;clr,lReserved : longint) : longint; cdecl;external; function WinRemovePresParam(hwnd,id : cardinal) : longbool; cdecl;external 'pmwin' index 940;
function WinSetSysColors(hwndDesktop,flOptions,flFormat : cardinal;clrFirst : longint;cclr : cardinal;pclr : Plongint) : longbool; cdecl;external; function WinQuerySysColor(hwndDesktop : cardinal;clr,lReserved : longint) : longint; cdecl;external 'pmwin' index 826;
function WinStartTimer(hab,hwnd,idTimer,dtTimeout : cardinal) : cardinal; cdecl;external; function WinSetSysColors(hwndDesktop,flOptions,flFormat : cardinal;clrFirst : longint;cclr : cardinal;pclr : Plongint) : longbool; cdecl;external 'pmwin' index 871;
function WinStopTimer(hab,hwnd,idTimer : cardinal) : longbool; cdecl;external; function WinStartTimer(hab,hwnd,idTimer,dtTimeout : cardinal) : cardinal; cdecl;external 'pmwin' index 884;
function WinGetCurrentTime(hab : cardinal) : cardinal; cdecl;external; function WinStopTimer(hab,hwnd,idTimer : cardinal) : longbool; cdecl;external 'pmwin' index 885;
function WinLoadAccelTable(hab,hmod,idAccelTable : cardinal) : cardinal; cdecl;external; function WinGetCurrentTime(hab : cardinal) : cardinal; cdecl;external 'pmwin' index 750;
function WinCopyAccelTable(haccel : cardinal;pAccelTable : PACCELTABLE;cbCopyMax : cardinal) : cardinal; cdecl;external; function WinLoadAccelTable(hab,hmod,idAccelTable : cardinal) : cardinal; cdecl;external 'pmwin' index 776;
function WinCreateAccelTable(hab : cardinal;pAccelTable : PACCELTABLE) : cardinal; cdecl;external; function WinCopyAccelTable(haccel : cardinal;pAccelTable : PACCELTABLE;cbCopyMax : cardinal) : cardinal; cdecl;external 'pmwin' index 709;
function WinDestroyAccelTable(haccel : cardinal) : longbool; cdecl;external; function WinCreateAccelTable(hab : cardinal;pAccelTable : PACCELTABLE) : cardinal; cdecl;external 'pmwin' index 713;
function WinTranslateAccel(hab,hwnd,haccel : cardinal;pqmsg : PQMSG) : longbool; cdecl;external; function WinDestroyAccelTable(haccel : cardinal) : longbool; cdecl;external 'pmwin' index 723;
function WinSetAccelTable(hab,haccel,hwndFrame : cardinal) : longbool; cdecl;external; function WinTranslateAccel(hab,hwnd,haccel : cardinal;pqmsg : PQMSG) : longbool; cdecl;external 'pmwin' index 904;
function WinQueryAccelTable(hab,hwndFrame : cardinal) : cardinal; cdecl;external; function WinSetAccelTable(hab,haccel,hwndFrame : cardinal) : longbool; cdecl;external 'pmwin' index 850;
function WinTrackRect(hwnd,hps : cardinal;pti : PTRACKINFO) : longbool; cdecl;external; function WinQueryAccelTable(hab,hwndFrame : cardinal) : cardinal; cdecl;external 'pmwin' index 798;
function WinShowTrackRect(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external; function WinTrackRect(hwnd,hps : cardinal;pti : PTRACKINFO) : longbool; cdecl;external 'pmwin' index 890;
function WinSetClipbrdOwner(hab,hwnd : cardinal) : longbool; cdecl;external; function WinShowTrackRect(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin' index 882;
function WinSetClipbrdData(hab,ulData,fmt,rgfFmtInfo : cardinal) : longbool; cdecl;external; function WinSetClipbrdOwner(hab,hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 855;
function WinQueryClipbrdData(hab,fmt : cardinal) : cardinal; cdecl;external; function WinSetClipbrdData(hab,ulData,fmt,rgfFmtInfo : cardinal) : longbool; cdecl;external 'pmwin' index 854;
function WinQueryClipbrdFmtInfo(hab,fmt : cardinal;prgfFmtInfo : pcardinal) : longbool; cdecl;external; function WinQueryClipbrdData(hab,fmt : cardinal) : cardinal; cdecl;external 'pmwin' index 806;
function WinSetClipbrdViewer(hab,hwndNewClipViewer : cardinal) : longbool; cdecl;external; function WinQueryClipbrdFmtInfo(hab,fmt : cardinal;prgfFmtInfo : pcardinal) : longbool; cdecl;external 'pmwin' index 807;
function WinEnumClipbrdFmts(hab,fmt : cardinal) : cardinal; cdecl;external; function WinSetClipbrdViewer(hab,hwndNewClipViewer : cardinal) : longbool; cdecl;external 'pmwin' index 856;
function WinEmptyClipbrd(hab : cardinal) : longbool; cdecl;external; function WinEnumClipbrdFmts(hab,fmt : cardinal) : cardinal; cdecl;external 'pmwin' index 739;
function WinOpenClipbrd(hab : cardinal) : longbool; cdecl;external; function WinEmptyClipbrd(hab : cardinal) : longbool; cdecl;external 'pmwin' index 733;
function WinCloseClipbrd(hab : cardinal) : longbool; cdecl;external; function WinOpenClipbrd(hab : cardinal) : longbool; cdecl;external 'pmwin' index 793;
function WinQueryClipbrdOwner(hab : cardinal) : cardinal; cdecl;external; function WinCloseClipbrd(hab : cardinal) : longbool; cdecl;external 'pmwin' index 707;
function WinQueryClipbrdViewer(hab : cardinal) : cardinal; cdecl;external; function WinQueryClipbrdOwner(hab : cardinal) : cardinal; cdecl;external 'pmwin' index 808;
function WinDestroyCursor(hwnd : cardinal) : longbool; cdecl;external; function WinQueryClipbrdViewer(hab : cardinal) : cardinal; cdecl;external 'pmwin' index 809;
function WinShowCursor(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external; function WinDestroyCursor(hwnd : cardinal) : longbool; cdecl;external 'pmwin' index 725;
function WinCreateCursor(hwnd : cardinal;x,y,cx,cy : longint;fs : cardinal;prclClip : PRECTL) : longbool; cdecl;external; function WinShowCursor(hwnd : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin' index 880;
function WinQueryCursorInfo(hwndDesktop : cardinal;pCursorInfo : PCURSORINFO) : longbool; cdecl;external; function WinCreateCursor(hwnd : cardinal;x,y,cx,cy : longint;fs : cardinal;prclClip : PRECTL) : longbool; cdecl;external 'pmwin' index 715;
function WinSetPointer(hwndDesktop,hptrNew : cardinal) : longbool; cdecl;external; function WinQueryCursorInfo(hwndDesktop : cardinal;pCursorInfo : PCURSORINFO) : longbool; cdecl;external 'pmwin' index 812;
function WinSetPointerOwner(hptr,pid : cardinal;fDestroy : longbool) : longbool; cdecl;external; function WinSetPointer(hwndDesktop,hptrNew : cardinal) : longbool; cdecl;external 'pmwin' index 866;
function WinShowPointer(hwndDesktop : cardinal;fShow : longbool) : longbool; cdecl;external; function WinSetPointerOwner(hptr,pid : cardinal;fDestroy : longbool) : longbool; cdecl;external 'pmwin' index 971;
function WinQuerySysPointer(hwndDesktop : cardinal;iptr : longint;fLoad : longbool) : cardinal; cdecl;external; function WinShowPointer(hwndDesktop : cardinal;fShow : longbool) : longbool; cdecl;external 'pmwin' index 881;
function WinLoadPointer(hwndDesktop,hmod,idres : cardinal) : cardinal; cdecl;external; function WinQuerySysPointer(hwndDesktop : cardinal;iptr : longint;fLoad : longbool) : cardinal; cdecl;external 'pmwin' index 828;
function WinCreatePointer(hwndDesktop,hbmPointer : cardinal;fPointer : longbool;xHotspot,yHotspot : longint) : cardinal; cdecl;external; function WinLoadPointer(hwndDesktop,hmod,idres : cardinal) : cardinal; cdecl;external 'pmwin' index 780;
function WinSetPointerPos(hwndDesktop : cardinal;x,y : longint) : longbool; cdecl;external; function WinCreatePointer(hwndDesktop,hbmPointer : cardinal;fPointer : longbool;xHotspot,yHotspot : longint) : cardinal; cdecl;external 'pmwin' index 717;
function WinDestroyPointer(hptr : cardinal) : longbool; cdecl;external; function WinSetPointerPos(hwndDesktop : cardinal;x,y : longint) : longbool; cdecl;external 'pmwin' index 867;
function WinQueryPointer(hwndDesktop : cardinal) : cardinal; cdecl;external; function WinDestroyPointer(hptr : cardinal) : longbool; cdecl;external 'pmwin' index 727;
function WinQueryPointerPos(hwndDesktop : cardinal;pptl : PPOINTL) : longbool; cdecl;external; function WinQueryPointer(hwndDesktop : cardinal) : cardinal; cdecl;external 'pmwin' index 821;
function WinCreatePointerIndirect(hwndDesktop : cardinal;pptri : PPOINTERINFO) : cardinal; cdecl;external; function WinQueryPointerPos(hwndDesktop : cardinal;pptl : PPOINTL) : longbool; cdecl;external 'pmwin' index 823;
function WinQueryPointerInfo(hptr : cardinal;pPointerInfo : PPOINTERINFO) : longbool; cdecl;external; function WinCreatePointerIndirect(hwndDesktop : cardinal;pptri : PPOINTERINFO) : cardinal; cdecl;external 'pmwin' index 942;
function WinDrawPointer(hps : cardinal;x,y : longint;hptr,fs : cardinal) : longbool; cdecl;external; function WinQueryPointerInfo(hptr : cardinal;pPointerInfo : PPOINTERINFO) : longbool; cdecl;external 'pmwin' index 822;
function WinGetSysBitmap(hwndDesktop,ibm : cardinal) : cardinal; cdecl;external; function WinDrawPointer(hps : cardinal;x,y : longint;hptr,fs : cardinal) : longbool; cdecl;external 'pmwin' index 732;
function WinSetHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;external; function WinGetSysBitmap(hwndDesktop,ibm : cardinal) : cardinal; cdecl;external 'pmwin' index 760;
function WinReleaseHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;external; function WinSetHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;external 'pmwin' index 928;
function WinCallMsgFilter(hab : cardinal;pqmsg : PQMSG;msgf : cardinal) : longbool; cdecl;external; function WinReleaseHook(hab,hmq : cardinal;iHook : longint;pfnHook : pointer;hmod : cardinal) : longbool; cdecl;external 'pmwin' index 927;
function WinSetClassThunkProc(pszClassname : pshortint;pfnThunkProc : pointer) : longbool; cdecl;external; function WinCallMsgFilter(hab : cardinal;pqmsg : PQMSG;msgf : cardinal) : longbool; cdecl;external 'pmwin' index 905;
function WinQueryClassThunkProc(pszClassname : pshortint) : pointer; cdecl;external; function WinSetClassThunkProc(pszClassname : pchar;pfnThunkProc : pointer) : longbool; cdecl;external 'pmwin' index 959;
function WinSetWindowThunkProc(hwnd : cardinal;pfnThunkProc : pointer) : longbool; cdecl;external; function WinQueryClassThunkProc(pszClassname : pchar) : pointer; cdecl;external 'pmwin' index 960;
function WinQueryWindowThunkProc(hwnd : cardinal) : pointer; cdecl;external; function WinSetWindowThunkProc(hwnd : cardinal;pfnThunkProc : pointer) : longbool; cdecl;external 'pmwin' index 961;
function WinQueryWindowModel(hwnd : cardinal) : longint; cdecl;external; function WinQueryWindowThunkProc(hwnd : cardinal) : pointer; cdecl;external 'pmwin' index 962;
function WinQueryCp(hmq : cardinal) : cardinal; cdecl;external; function WinQueryWindowModel(hwnd : cardinal) : longint; cdecl;external 'pmwin' index 934;
function WinSetCp(hmq,idCodePage : cardinal) : longbool; cdecl;external; function WinQueryCp(hmq : cardinal) : cardinal; cdecl;external 'pmwin' index 810;
function WinQueryCpList(hab,ccpMax : cardinal;prgcp : pcardinal) : cardinal; cdecl;external; function WinSetCp(hmq,idCodePage : cardinal) : longbool; cdecl;external 'pmwin' index 857;
function WinCpTranslateString(hab,cpSrc : cardinal;pszSrc : pshortint;cpDst,cchDestMax : cardinal;pchDest : pshortint) : longbool; cdecl;external; function WinQueryCpList(hab,ccpMax : cardinal;prgcp : pcardinal) : cardinal; cdecl;external 'pmwin' index 811;
function WinCpTranslateChar(hab,cpSrc : cardinal;chSrc : byte;cpDst : cardinal) : byte; cdecl;external; function WinCpTranslateString(hab,cpSrc : cardinal;pszSrc : pchar;cpDst,cchDestMax : cardinal;pchDest : pchar) : longbool; cdecl;external 'pmwin' index 712;
function WinUpper(hab,idcp,idcc : cardinal;psz : pshortint) : cardinal; cdecl;external; function WinCpTranslateChar(hab,cpSrc : cardinal;chSrc : byte;cpDst : cardinal) : byte; cdecl;external 'pmwin' index 711;
function WinUpperChar(hab,idcp,idcc,c : cardinal) : cardinal; cdecl;external; function WinUpper(hab,idcp,idcc : cardinal;psz : pchar) : cardinal; cdecl;external 'pmwin' index 893;
function WinNextChar(hab,idcp,idcc : cardinal;psz : pshortint) : pshortint; cdecl;external; function WinUpperChar(hab,idcp,idcc,c : cardinal) : cardinal; cdecl;external 'pmwin' index 894;
function WinPrevChar(hab,idcp,idcc : cardinal;pszStart,psz : pshortint) : pshortint; cdecl;external; function WinNextChar(hab,idcp,idcc : cardinal;psz : pchar) : pshortint; cdecl;external 'pmwin' index 791;
function WinCompareStrings(hab,idcp,idcc : cardinal;psz1,psz2 : pshortint;reserved : cardinal) : cardinal; cdecl;external; function WinPrevChar(hab,idcp,idcc : cardinal;pszStart,psz : pchar) : pshortint; cdecl;external 'pmwin' index 795;
function WinCreateAtomTable(cbInitial,cBuckets : cardinal) : cardinal; cdecl;external; function WinCompareStrings(hab,idcp,idcc : cardinal;psz1,psz2 : pchar;reserved : cardinal) : cardinal; cdecl;external 'pmwin' index 708;
function WinDestroyAtomTable(hAtomTbl : cardinal) : cardinal; cdecl;external; function WinCreateAtomTable(cbInitial,cBuckets : cardinal) : cardinal; cdecl;external 'pmwin' index 714;
function WinAddAtom(hAtomTbl : cardinal;pszAtomName : pshortint) : cardinal; cdecl;external; function WinDestroyAtomTable(hAtomTbl : cardinal) : cardinal; cdecl;external 'pmwin' index 724;
function WinFindAtom(hAtomTbl : cardinal;pszAtomName : pshortint) : cardinal; cdecl;external; function WinAddAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl;external 'pmwin' index 700;
function WinDeleteAtom(hAtomTbl,atom : cardinal) : cardinal; cdecl;external; function WinFindAtom(hAtomTbl : cardinal;pszAtomName : pchar) : cardinal; cdecl;external 'pmwin' index 744;
function WinQueryAtomUsage(hAtomTbl,atom : cardinal) : cardinal; cdecl;external; function WinDeleteAtom(hAtomTbl,atom : cardinal) : cardinal; cdecl;external 'pmwin' index 721;
function WinQueryAtomLength(hAtomTbl,atom : cardinal) : cardinal; cdecl;external; function WinQueryAtomUsage(hAtomTbl,atom : cardinal) : cardinal; cdecl;external 'pmwin' index 803;
function WinQueryAtomName(hAtomTbl,atom : cardinal;pchBuffer : pshortint;cchBufferMax : cardinal) : cardinal; cdecl;external; function WinQueryAtomLength(hAtomTbl,atom : cardinal) : cardinal; cdecl;external 'pmwin' index 801;
function WinGetLastError(hab : cardinal) : cardinal; cdecl;external; function WinQueryAtomName(hAtomTbl,atom : cardinal;pchBuffer : pchar;cchBufferMax : cardinal) : cardinal; cdecl;external 'pmwin' index 802;
function WinGetErrorInfo(hab : cardinal) : PERRINFO; cdecl;external; function WinGetLastError(hab : cardinal) : cardinal; cdecl;external 'pmwin' index 753;
function WinFreeErrorInfo(perrinfo : PERRINFO) : longbool; cdecl;external; function WinGetErrorInfo(hab : cardinal) : PERRINFO; cdecl;external 'pmwin' index 751;
function WinDdeInitiate(hwndClient : cardinal;pszAppName,pszTopicName : pshortint;pcctxt : PCONVCONTEXT) : longbool; cdecl;external; function WinFreeErrorInfo(perrinfo : PERRINFO) : longbool; cdecl;external 'pmwin' index 748;
function WinDdeRespond(hwndClient,hwndServer : cardinal;pszAppName,pszTopicName : pshortint;pcctxt : PCONVCONTEXT) : pointer; cdecl;external; function WinDdeInitiate(hwndClient : cardinal;pszAppName,pszTopicName : pchar;pcctxt : PCONVCONTEXT) : longbool; cdecl;external 'pmwin' index 718;
function WinDdePostMsg(hwndTo,hwndFrom,wm : cardinal;pddest : PDDESTRUCT;flOptions : cardinal) : longbool; cdecl;external; function WinDdeRespond(hwndClient,hwndServer : cardinal;pszAppName,pszTopicName : pchar;pcctxt : PCONVCONTEXT) : pointer; cdecl;external 'pmwin' index 720;
function WinDeleteProcedure(hab : cardinal;wndproc : ppointer) : longbool; cdecl;external; function WinDdePostMsg(hwndTo,hwndFrom,wm : cardinal;pddest : PDDESTRUCT;flOptions : cardinal) : longbool; cdecl;external 'pmwin' index 719;
function WinDeleteLibrary(hab,libhandle : cardinal) : longbool; cdecl;external; function WinDeleteProcedure(hab : cardinal;wndproc : ppointer) : longbool; cdecl;external 'pmwin' index 987;
function WinLoadProcedure(hab,libhandle : cardinal;procname : pshortint) : ppointer; cdecl;external; function WinDeleteLibrary(hab,libhandle : cardinal) : longbool; cdecl;external 'pmwin' index 722;
function WinLoadLibrary(hab : cardinal;libname : pshortint) : cardinal; cdecl;external; function WinLoadProcedure(hab,libhandle : cardinal;procname : pchar) : ppointer; cdecl;external 'pmwin' index 986;
function WinSetDesktopBkgnd(hwndDesktop : cardinal;pdskNew : PDESKTOP) : cardinal; cdecl;external; function WinLoadLibrary(hab : cardinal;libname : pchar) : cardinal; cdecl;external 'pmwin' index 777;
function WinQueryDesktopBkgnd(hwndDesktop : cardinal;pdsk : PDESKTOP) : longbool; cdecl;external; function WinSetDesktopBkgnd(hwndDesktop : cardinal;pdskNew : PDESKTOP) : cardinal; cdecl;external 'pmwin' index 935;
function WinRealizePalette(hwnd,hps : cardinal;pcclr : pcardinal) : longint; cdecl;external; function WinQueryDesktopBkgnd(hwndDesktop : cardinal;pdsk : PDESKTOP) : longbool; cdecl;external 'pmwin' index 936;
function WinRealizePalette(hwnd,hps : cardinal;pcclr : pcardinal) : longint; cdecl;external 'pmwin' index 941;
function cardinalFROMMP(mp : pointer) : cardinal;cdecl; function cardinalFROMMP(mp : pointer) : cardinal;cdecl;
begin begin
cardinalFROMMP:=cardinal(mp); cardinalFROMMP:=cardinal(mp);
@ -2086,6 +2087,7 @@ const
end; end;
function integer2FROMMP(mp : pointer) : word;cdecl; function integer2FROMMP(mp : pointer) : word;cdecl;
begin begin
integer2FROMMP:=hi(cardinal(mp)); integer2FROMMP:=hi(cardinal(mp))
end; end;
end. end.