Last updated: 4.11.1997, 13:10
(* m_comcthlp.mod Aug 3 12:14:16 1997 *)
(* Generated by H2D v1.12 from comcthlp.h. *)
<*+ M2ADDTYPES *>
<*+ M2EXTENSIONS *>
(* Prototypes for macro implementation *)
IMPLEMENTATION MODULE m_comcthlp;
IMPORT SYSTEM;
PROCEDURE ["C"] HotKey_GetHotKey ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define HotKey_GetHotKey(hwnd) \
(WORD)SendMessage((hwnd), HKM_GETHOTKEY, 0, 0L)
*)
BEGIN
END HotKey_GetHotKey;
PROCEDURE ["C"] HotKey_SetHotKey ( hwnd, bVKHotKey, bfMods: ARRAY OF SYSTEM.BYTE );
(*
#define HotKey_SetHotKey(hwnd, bVKHotKey, bfMods) \
(void)SendMessage((hwnd), HKM_SETHOTKEY, MAKEWORD(bVKHotKey, bfMods), 0L)
*)
BEGIN
END HotKey_SetHotKey;
PROCEDURE ["C"] HotKey_SetRules ( hwnd, fwCombInv, fwModInv: ARRAY OF SYSTEM.BYTE );
(*
#define HotKey_SetRules(hwnd, fwCombInv, fwModInv) \
(void)SendMessage((hwnd), HKM_SETRULES, (WPARAM) fwCombInv, MAKELPARAM(fwModInv, 0))
*)
BEGIN
END HotKey_SetRules;
PROCEDURE ["C"] Progress_DeltaPos ( hwnd, nIncrement: ARRAY OF SYSTEM.BYTE );
(*
#define Progress_DeltaPos(hwnd, nIncrement) \
(int)SendMessage((hwnd), PBM_DELTAPOS, (WPARAM) nIncrement, 0L)
*)
BEGIN
END Progress_DeltaPos;
PROCEDURE ["C"] Progress_SetPos ( hwnd, nNewPos: ARRAY OF SYSTEM.BYTE );
(*
#define Progress_SetPos(hwnd, nNewPos) \
(int)SendMessage((hwnd), PBM_SETPOS, (WPARAM) nNewPos, 0L)
*)
BEGIN
END Progress_SetPos;
PROCEDURE ["C"] Progress_SetRange ( hwnd, nMinRange, nMaxRange: ARRAY OF SYSTEM.BYTE
);
(*
#define Progress_SetRange(hwnd, nMinRange, nMaxRange) \
(DWORD)SendMessage((hwnd), PBM_SETRANGE, 0, MAKELPARAM(nMinRange, nMaxRange))
*)
BEGIN
END Progress_SetRange;
PROCEDURE ["C"] Progress_SetStep ( hwnd, nStepInc: ARRAY OF SYSTEM.BYTE );
(*
#define Progress_SetStep(hwnd, nStepInc) \
(int)SendMessage((hwnd), PBM_SETSTEP, (WPARAM) nStepInc, 0L)
*)
BEGIN
END Progress_SetStep;
PROCEDURE ["C"] Progress_StepIt ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define Progress_StepIt(hwnd) \
(int)SendMessage((hwnd), PBM_STEPIT, 0, 0L)
*)
BEGIN
END Progress_StepIt;
PROCEDURE ["C"] RichEdit_CanPaste ( hwnd, uFormat: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_CanPaste(hwnd, uFormat) \
(BOOL)SendMessage((hwnd), EM_CANPASTE, (WPARAM) (UINT) uFormat, 0L)
*)
BEGIN
END RichEdit_CanPaste;
PROCEDURE ["C"] RichEdit_CanUndo ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_CanUndo(hwndCtl) \
((BOOL)(DWORD)SendMessage((hwndCtl), EM_CANUNDO, 0L, 0L))
*)
BEGIN
END RichEdit_CanUndo;
PROCEDURE ["C"] RichEdit_CharFromPos ( hwnd, x, y: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_CharFromPos(hwnd, x, y) \
(DWORD)SendMessage((hwnd), EM_CHARFROMPOS, 0, MAKELPARAM(x, y))
*)
BEGIN
END RichEdit_CharFromPos;
PROCEDURE ["C"] RichEdit_DisplayBand ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_DisplayBand(hwnd, lprc) \
(BOOL)SendMessage((hwnd), EM_DISPLAYBAND, 0, (LPARAM) (LPRECT) lprc)
*)
BEGIN
END RichEdit_DisplayBand;
PROCEDURE ["C"] RichEdit_EmptyUndoBuffer ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_EmptyUndoBuffer(hwndCtl) \
((void)SendMessage((hwndCtl), EM_EMPTYUNDOBUFFER, 0L, 0L))
*)
BEGIN
END RichEdit_EmptyUndoBuffer;
PROCEDURE ["C"] RichEdit_Enable ( hwndCtl, fEnable: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_Enable(hwndCtl, fEnable) \
(BOOL)EnableWindow((hwndCtl), (fEnable))
*)
BEGIN
END RichEdit_Enable;
PROCEDURE ["C"] RichEdit_ExGetSel ( hwnd, lpchr: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_ExGetSel(hwnd, lpchr) \
(void)SendMessage((hwnd), EM_EXGETSEL, 0, (LPARAM) (CHARRANGE FAR *) lpchr)
*)
BEGIN
END RichEdit_ExGetSel;
PROCEDURE ["C"] RichEdit_ExLimitText ( hwnd, cchTextMax: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_ExLimitText(hwnd, cchTextMax) \
(void)SendMessage((hwnd), EM_EXLIMITTEXT, 0, (LPARAM) (DWORD) cchTextMax)
*)
BEGIN
END RichEdit_ExLimitText;
PROCEDURE ["C"] RichEdit_ExLineFromChar ( hwnd, ichCharPos: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_ExLineFromChar(hwnd, ichCharPos) \
(int)SendMessage((hwnd), EM_EXLINEFROMCHAR, 0, (LPARAM) (DWORD) ichCharPos)
*)
BEGIN
END RichEdit_ExLineFromChar;
PROCEDURE ["C"] RichEdit_ExSetSel ( hwnd, ichCharRange: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_ExSetSel(hwnd, ichCharRange) \
(int)SendMessage((hwnd), EM_EXSETSEL, 0, (LPARAM) (CHARRANGE FAR *) ichCharRange)
*)
BEGIN
END RichEdit_ExSetSel;
PROCEDURE ["C"] RichEdit_FindText ( hwnd, fuFlags, lpFindText: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_FindText(hwnd, fuFlags, lpFindText) \
(int)SendMessage((hwnd), EM_FINDTEXT, (WPARAM) (UINT) fuFlags, (LPARAM) (FINDTEXT FAR *) lpFindText)
*)
BEGIN
END RichEdit_FindText;
PROCEDURE ["C"] RichEdit_FindTextEx ( hwnd, fuFlags, lpFindText: ARRAY OF SYSTEM.BYTE
);
(*
#define RichEdit_FindTextEx(hwnd, fuFlags, lpFindText) \
(int)SendMessage((hwnd), EM_FINDTEXTEX, (WPARAM) (UINT) fuFlags, (LPARAM) (FINDTEXT FAR *) lpFindText)
*)
BEGIN
END RichEdit_FindTextEx;
PROCEDURE ["C"] RichEdit_FindWordBreak ( hwnd, code, ichStart: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_FindWordBreak(hwnd, code, ichStart) \
(int)SendMessage((hwnd), EM_FINDWORDBREAK, (WPARAM) (UINT) code, (LPARAM) (DWORD) ichStart)
*)
BEGIN
END RichEdit_FindWordBreak;
PROCEDURE ["C"] RichEdit_FormatRange ( hwnd, fRender, lpFmt: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_FormatRange(hwnd, fRender, lpFmt) \
(int)SendMessage((hwnd), EM_FORMATRANGE, (WPARAM) (BOOL) fRender, (LPARAM) (FORMATRANGE FAR *) lpFmt)
*)
BEGIN
END RichEdit_FormatRange;
PROCEDURE ["C"] RichEdit_GetCharFormat ( hwnd, fSelection, lpFmt: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_GetCharFormat(hwnd, fSelection, lpFmt) \
(DWORD)SendMessage((hwnd), EM_GETCHARFORMAT, (WPARAM) (BOOL) fSelection, (LPARAM) (CHARFORMAT FAR *) lpFmt)
*)
BEGIN
END RichEdit_GetCharFormat;
PROCEDURE ["C"] RichEdit_GetEventMask ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetEventMask(hwnd) \
(DWORD)SendMessage((hwnd), EM_GETEVENTMASK, 0, 0L)
*)
BEGIN
END RichEdit_GetEventMask;
PROCEDURE ["C"] RichEdit_GetFirstVisibleLine ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetFirstVisibleLine(hwndCtl) \
((int)(DWORD)SendMessage((hwndCtl), EM_GETFIRSTVISIBLELINE, 0L, 0L))
*)
BEGIN
END RichEdit_GetFirstVisibleLine;
PROCEDURE ["C"] RichEdit_GetLimitText ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetLimitText(hwnd) \
(int)SendMessage((hwnd), EM_GETLIMITTEXT, 0, 0L)
*)
BEGIN
END RichEdit_GetLimitText;
PROCEDURE ["C"] RichEdit_GetLine ( hwndCtl, line, lpch, cchMax: ARRAY OF SYSTEM.BYTE
);
(*
#define RichEdit_GetLine(hwndCtl, line, lpch, cchMax) \
((*((int *)(lpch)) = (cchMax)), ((int)(DWORD)SendMessage((hwndCtl), EM_GETLINE, (WPARAM)(int)(line), (LPARAM)(LPTSTR)(lpch))))
*)
BEGIN
END RichEdit_GetLine;
PROCEDURE ["C"] RichEdit_GetLineCount ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetLineCount(hwndCtl) \
((int)(DWORD)SendMessage((hwndCtl), EM_GETLINECOUNT, 0L, 0L))
*)
BEGIN
END RichEdit_GetLineCount;
PROCEDURE ["C"] RichEdit_GetModify ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetModify(hwndCtl) \
((BOOL)(DWORD)SendMessage((hwndCtl), EM_GETMODIFY, 0L, 0L))
*)
BEGIN
END RichEdit_GetModify;
PROCEDURE ["C"] RichEdit_GetOleInterface ( hwnd, ppObject: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetOleInterface(hwnd, ppObject) \
(BOOL)SendMessage((hwnd), EM_GETOLEINTERFACE, 0, (LPARAM) (LPVOID FAR *) ppObject)
*)
BEGIN
END RichEdit_GetOleInterface;
PROCEDURE ["C"] RichEdit_GetOptions ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetOptions(hwnd) \
(UINT)SendMessage((hwnd), EM_GETOPTIONS, 0, 0L)
*)
BEGIN
END RichEdit_GetOptions;
PROCEDURE ["C"] RichEdit_GetParaFormat ( hwnd, lpFmt: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetParaFormat(hwnd, lpFmt) \
(DWORD)SendMessage((hwnd), EM_GETPARAFORMAT, 0, (LPARAM) (PARAFORMAT FAR *) lpFmt)
*)
BEGIN
END RichEdit_GetParaFormat;
PROCEDURE ["C"] RichEdit_GetRect ( hwndCtl, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetRect(hwndCtl, lprc) \
((void)SendMessage((hwndCtl), EM_GETRECT, 0L, (LPARAM)(RECT *)(lprc)))
*)
BEGIN
END RichEdit_GetRect;
PROCEDURE ["C"] RichEdit_GetSel ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetSel(hwndCtl) \
((DWORD)SendMessage((hwndCtl), EM_GETSEL, 0L, 0L))
*)
BEGIN
END RichEdit_GetSel;
PROCEDURE ["C"] RichEdit_GetSelText ( hwnd, lpBuf: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetSelText(hwnd, lpBuf) \
(int)SendMessage((hwnd), EM_GETSELTEXT, 0, (LPARAM) (LPSTR) lpBuf)
*)
BEGIN
END RichEdit_GetSelText;
PROCEDURE ["C"] RichEdit_GetText ( hwndCtl, lpch, cchMax: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetText(hwndCtl, lpch, cchMax) \
(int)GetWindowText((hwndCtl), (lpch), (cchMax))
*)
BEGIN
END RichEdit_GetText;
PROCEDURE ["C"] RichEdit_GetTextLength ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetTextLength(hwndCtl) \
(int)GetWindowTextLength(hwndCtl)
*)
BEGIN
END RichEdit_GetTextLength;
PROCEDURE ["C"] RichEdit_GetTextRange ( hwnd, lpRange: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetTextRange(hwnd, lpRange) \
(int)SendMessage((hwnd), EM_GETTEXTRANGE, 0, (LPARAM) (TEXTRANGE FAR *) lpRange)
*)
BEGIN
END RichEdit_GetTextRange;
PROCEDURE ["C"] RichEdit_GetWordBreakProc ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetWordBreakProc(hwndCtl) \
((EDITWORDBREAKPROC)SendMessage((hwndCtl), EM_GETWORDBREAKPROC, 0L, 0L))
*)
BEGIN
END RichEdit_GetWordBreakProc;
PROCEDURE ["C"] RichEdit_GetWordBreakProcEx ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_GetWordBreakProcEx(hwnd) \
(EDITWORDBREAKPROCEX *)SendMessage((hwnd), EM_GETWORDBREAKPROCEX, 0, 0L)
*)
BEGIN
END RichEdit_GetWordBreakProcEx;
PROCEDURE ["C"] RichEdit_HideSelection ( hwnd, fHide, fChangeStyle: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_HideSelection(hwnd, fHide, fChangeStyle) \
(void)SendMessage((hwnd), EM_HIDESELECTION, (WPARAM) (BOOL) fHide, (LPARAM) (BOOL) fChangeStyle)
*)
BEGIN
END RichEdit_HideSelection;
PROCEDURE ["C"] RichEdit_LimitText ( hwndCtl, cchMax: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_LimitText(hwndCtl, cchMax) \
((void)SendMessage((hwndCtl), EM_LIMITTEXT, (WPARAM)(cchMax), 0L))
*)
BEGIN
END RichEdit_LimitText;
PROCEDURE ["C"] RichEdit_LineFromChar ( hwndCtl, ich: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_LineFromChar(hwndCtl, ich) \
((int)(DWORD)SendMessage((hwndCtl), EM_LINEFROMCHAR, (WPARAM)(int)(ich), 0L))
*)
BEGIN
END RichEdit_LineFromChar;
PROCEDURE ["C"] RichEdit_LineIndex ( hwndCtl, line: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_LineIndex(hwndCtl, line) \
((int)(DWORD)SendMessage((hwndCtl), EM_LINEINDEX, (WPARAM)(int)(line), 0L))
*)
BEGIN
END RichEdit_LineIndex;
PROCEDURE ["C"] RichEdit_LineLength ( hwndCtl, line: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_LineLength(hwndCtl, line) \
((int)(DWORD)SendMessage((hwndCtl), EM_LINELENGTH, (WPARAM)(int)(line), 0L))
*)
BEGIN
END RichEdit_LineLength;
PROCEDURE ["C"] RichEdit_PasteSpecial ( hwnd, uFormat: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_PasteSpecial(hwnd, uFormat) \
(void)SendMessage((hwnd), EM_PASTESPECIAL, (WPARAM) (UINT) uFormat, 0L)
*)
BEGIN
END RichEdit_PasteSpecial;
PROCEDURE ["C"] RichEdit_PosFromChar ( hwnd, wCharIndex: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_PosFromChar(hwnd, wCharIndex) \
(DWORD)SendMessage((hwnd), EM_POSFROMCHAR, (WPARAM)wCharIndex, 0L)
*)
BEGIN
END RichEdit_PosFromChar;
PROCEDURE ["C"] RichEdit_ReplaceSel ( hwndCtl, lpszReplace: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_ReplaceSel(hwndCtl, lpszReplace) \
((void)SendMessage((hwndCtl), EM_REPLACESEL, 0L, (LPARAM)(LPCTSTR)(lpszReplace)))
*)
BEGIN
END RichEdit_ReplaceSel;
PROCEDURE ["C"] RichEdit_RequestResize ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_RequestResize(hwnd) \
(void)SendMessage((hwnd), EM_REQUESTRESIZE, 0, 0L)
*)
BEGIN
END RichEdit_RequestResize;
PROCEDURE ["C"] RichEdit_Scroll ( hwndCtl, dv, dh: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_Scroll(hwndCtl, dv, dh) \
((void)SendMessage((hwndCtl), EM_LINESCROLL, (WPARAM)(dh), (LPARAM)(dv)))
*)
BEGIN
END RichEdit_Scroll;
PROCEDURE ["C"] RichEdit_ScrollCaret ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_ScrollCaret(hwndCtl) \
((BOOL)(DWORD)SendMessage((hwndCtl), EM_SCROLLCARET, 0, 0L))
*)
BEGIN
END RichEdit_ScrollCaret;
PROCEDURE ["C"] RichEdit_SelectionType ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SelectionType(hwnd) \
(int)SendMessage((hwnd), EM_SELECTIONTYPE, 0, 0L)
*)
BEGIN
END RichEdit_SelectionType;
PROCEDURE ["C"] RichEdit_SetBkgndColor ( hwnd, fUseSysColor, clr: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_SetBkgndColor(hwnd, fUseSysColor, clr) \
(COLORREF)SendMessage((hwnd), EM_SETBKGNDCOLOR, (WPARAM) (BOOL) fUseSysColor, (LPARAM) (COLORREF) clr)
*)
BEGIN
END RichEdit_SetBkgndColor;
PROCEDURE ["C"] RichEdit_SetCharFormat ( hwnd, uFlags, lpFmt: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetCharFormat(hwnd, uFlags, lpFmt) \
(BOOL)SendMessage((hwnd), EM_SETCHARFORMAT, (WPARAM) (UINT) uFlags, (LPARAM) (CHARFORMAT FAR *) lpFmt)
*)
BEGIN
END RichEdit_SetCharFormat;
PROCEDURE ["C"] RichEdit_SetEventMask ( hwnd, dwMask: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetEventMask(hwnd, dwMask) \
(DWORD)SendMessage((hwnd), EM_SETEVENTMASK, 0, (LPARAM) (DWORD) dwMask)
*)
BEGIN
END RichEdit_SetEventMask;
PROCEDURE ["C"] RichEdit_SetModify ( hwndCtl, fModified: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetModify(hwndCtl, fModified) \
((void)SendMessage((hwndCtl), EM_SETMODIFY, (WPARAM)(UINT)(fModified), 0L))
*)
BEGIN
END RichEdit_SetModify;
PROCEDURE ["C"] RichEdit_SetOleCallback ( hwnd, lpObj: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetOleCallback(hwnd, lpObj) \
(BOOL)SendMessage((hwnd), EM_SETOLECALLBACK, 0, (LPARAM) (IRichEditOleCallback FAR *) lpObj)
*)
BEGIN
END RichEdit_SetOleCallback;
PROCEDURE ["C"] RichEdit_SetOptions ( hwnd, fOperation, fOptions: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_SetOptions(hwnd, fOperation, fOptions) \
(UINT)SendMessage((hwnd), EM_SETOPTIONS, (WPARAM) (UINT) fOperation, (LPARAM) (UINT) fOptions)
*)
BEGIN
END RichEdit_SetOptions;
PROCEDURE ["C"] RichEdit_SetParaFormat ( hwnd, lpFmt: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetParaFormat(hwnd, lpFmt) \
(BOOL)SendMessage((hwnd), EM_SETPARAFORMAT, 0, (LPARAM) (PARAFORMAT FAR *) lpFmt)
*)
BEGIN
END RichEdit_SetParaFormat;
PROCEDURE ["C"] RichEdit_SetReadOnly ( hwndCtl, fReadOnly: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetReadOnly(hwndCtl, fReadOnly) \
((BOOL)(DWORD)SendMessage((hwndCtl), EM_SETREADONLY, (WPARAM)(BOOL)(fReadOnly), 0L))
*)
BEGIN
END RichEdit_SetReadOnly;
PROCEDURE ["C"] RichEdit_SetRect ( hwndCtl, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetRect(hwndCtl, lprc) \
((void)SendMessage((hwndCtl), EM_SETRECT, 0L, (LPARAM)(const RECT *)(lprc)))
*)
BEGIN
END RichEdit_SetRect;
PROCEDURE ["C"] RichEdit_SetSel ( hwndCtl, ichStart, ichEnd: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetSel(hwndCtl, ichStart, ichEnd) \
((void)SendMessage((hwndCtl), EM_SETSEL, (ichStart), (ichEnd)))
*)
BEGIN
END RichEdit_SetSel;
PROCEDURE ["C"] RichEdit_SetTargetDevice ( hwnd, hdcTarget, cxLineWidth: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_SetTargetDevice(hwnd, hdcTarget, cxLineWidth) \
(BOOL)SendMessage((hwnd), EM_SETTARGETDEVICE, (WPARAM) (HDC) hdcTarget, (LPARAM) (int) cxLineWidth)
*)
BEGIN
END RichEdit_SetTargetDevice;
PROCEDURE ["C"] RichEdit_SetText ( hwndCtl, lpsz: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_SetText(hwndCtl, lpsz) \
(BOOL)SetWindowText((hwndCtl), (lpsz))
*)
BEGIN
END RichEdit_SetText;
PROCEDURE ["C"] RichEdit_SetWordBreakProc ( hwndCtl, lpfnWordBreak: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_SetWordBreakProc(hwndCtl, lpfnWordBreak) \
((void)SendMessage((hwndCtl), EM_SETWORDBREAKPROC, 0L, (LPARAM)(EDITWORDBREAKPROC)(lpfnWordBreak)))
*)
BEGIN
END RichEdit_SetWordBreakProc;
PROCEDURE ["C"] RichEdit_SetWordBreakProcEx ( hwnd, pfnWordBreakProcEx: ARRAY OF
SYSTEM.BYTE );
(*
#define RichEdit_SetWordBreakProcEx(hwnd, pfnWordBreakProcEx) \
(EDITWORDBREAKPROCEX *)SendMessage((hwnd), EM_SETWORDBREAKPROCEX, 0, (LPARAM) (EDITWORDBREAKPROCEX *)pfnWordBreakProcEx)
*)
BEGIN
END RichEdit_SetWordBreakProcEx;
PROCEDURE ["C"] RichEdit_StreamIn ( hwnd, uFormat, lpStream: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_StreamIn(hwnd, uFormat, lpStream) \
(int)SendMessage((hwnd), EM_STREAMIN, (WPARAM) (UINT) uFormat, (LPARAM) (EDITSTREAM FAR *) lpStream)
*)
BEGIN
END RichEdit_StreamIn;
PROCEDURE ["C"] RichEdit_StreamOut ( hwnd, uFormat, lpStream: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_StreamOut(hwnd, uFormat, lpStream) \
(int)SendMessage((hwnd), EM_STREAMOUT, (WPARAM) (UINT) uFormat, (LPARAM) (EDITSTREAM FAR *) lpStream)
*)
BEGIN
END RichEdit_StreamOut;
PROCEDURE ["C"] RichEdit_Undo ( hwndCtl: ARRAY OF SYSTEM.BYTE );
(*
#define RichEdit_Undo(hwndCtl) \
((BOOL)(DWORD)SendMessage((hwndCtl), EM_UNDO, 0L, 0L))
*)
BEGIN
END RichEdit_Undo;
PROCEDURE ["C"] Status_GetBorders ( hwnd, aBorders: ARRAY OF SYSTEM.BYTE );
(*
#define Status_GetBorders(hwnd, aBorders) \
(BOOL)SendMessage((hwnd), SB_GETBORDERS, 0, (LPARAM) (LPINT) aBorders)
*)
BEGIN
END Status_GetBorders;
PROCEDURE ["C"] Status_GetParts ( hwnd, nParts, aRightCoord: ARRAY OF SYSTEM.BYTE );
(*
#define Status_GetParts(hwnd, nParts, aRightCoord) \
(int)SendMessage((hwnd), SB_GETPARTS, (WPARAM) nParts, (LPARAM) (LPINT) aRightCoord)
*)
BEGIN
END Status_GetParts;
PROCEDURE ["C"] Status_GetRect ( hwnd, iPart, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define Status_GetRect(hwnd, iPart, lprc) \
(BOOL)SendMessage((hwnd), SB_GETRECT, (WPARAM) iPart, (LPARAM) (LPRECT) lprc)
*)
BEGIN
END Status_GetRect;
PROCEDURE ["C"] Status_GetText ( hwnd, iPart, szText: ARRAY OF SYSTEM.BYTE );
(*
#define Status_GetText(hwnd, iPart, szText) \
(DWORD)SendMessage((hwnd), SB_GETTEXT, (WPARAM) iPart, (LPARAM) (LPSTR) szText)
*)
BEGIN
END Status_GetText;
PROCEDURE ["C"] Status_GetTextLength ( hwnd, iPart: ARRAY OF SYSTEM.BYTE );
(*
#define Status_GetTextLength(hwnd, iPart) \
(DWORD)SendMessage((hwnd), SB_GETTEXTLENGTH, (WPARAM) iPart, 0L)
*)
BEGIN
END Status_GetTextLength;
PROCEDURE ["C"] Status_SetMinHeight ( hwnd, minHeight: ARRAY OF SYSTEM.BYTE );
(*
#define Status_SetMinHeight(hwnd, minHeight) \
(void)SendMessage((hwnd), SB_SETMINHEIGHT, (WPARAM) minHeight, 0L)
*)
BEGIN
END Status_SetMinHeight;
PROCEDURE ["C"] Status_SetParts ( hwnd, nParts, aWidths: ARRAY OF SYSTEM.BYTE );
(*
#define Status_SetParts(hwnd, nParts, aWidths) \
(BOOL)SendMessage((hwnd), SB_SETPARTS, (WPARAM) nParts, (LPARAM) (LPINT) aWidths)
*)
BEGIN
END Status_SetParts;
PROCEDURE ["C"] Status_SetText ( hwnd, iPart, uType, szText: ARRAY OF SYSTEM.BYTE );
(*
#define Status_SetText(hwnd, iPart, uType, szText) \
(BOOL)SendMessage((hwnd), SB_SETTEXT, (WPARAM) (iPart | uType), (LPARAM) (LPSTR) szText)
*)
BEGIN
END Status_SetText;
PROCEDURE ["C"] Status_Simple ( hwnd, fSimple: ARRAY OF SYSTEM.BYTE );
(*
#define Status_Simple(hwnd, fSimple) \
(BOOL)SendMessage((hwnd), SB_SIMPLE, (WPARAM) (BOOL) fSimple, 0L)
*)
BEGIN
END Status_Simple;
PROCEDURE ["C"] ToolBar_AddBitmap ( hwnd, nButtons, lptbab: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_AddBitmap(hwnd, nButtons, lptbab) \
(int)SendMessage((hwnd), TB_ADDBITMAP, (WPARAM)nButtons, (LPARAM)(LPTBADDBITMAP) lptbab)
*)
BEGIN
END ToolBar_AddBitmap;
PROCEDURE ["C"] ToolBar_AddButtons ( hwnd, uNumButtons, lpButtons: ARRAY OF
SYSTEM.BYTE );
(*
#define ToolBar_AddButtons(hwnd, uNumButtons, lpButtons) \
(BOOL)SendMessage((hwnd), TB_ADDBUTTONS, (WPARAM)(UINT)uNumButtons, (LPARAM)(LPTBBUTTON)lpButtons)
*)
BEGIN
END ToolBar_AddButtons;
PROCEDURE ["C"] ToolBar_AddString ( hwnd, hinst, idString: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_AddString(hwnd, hinst, idString) \
(int)SendMessage((hwnd), TB_ADDSTRING, (WPARAM)(HINSTANCE)hinst, (LPARAM)idString)
*)
BEGIN
END ToolBar_AddString;
PROCEDURE ["C"] ToolBar_AutoSize ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_AutoSize(hwnd) \
(void)SendMessage((hwnd), TB_AUTOSIZE, 0, 0L)
*)
BEGIN
END ToolBar_AutoSize;
PROCEDURE ["C"] ToolBar_ButtonCount ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_ButtonCount(hwnd) \
(int)SendMessage((hwnd), TB_BUTTONCOUNT, 0, 0L)
*)
BEGIN
END ToolBar_ButtonCount;
PROCEDURE ["C"] ToolBar_ButtonStructSize ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_ButtonStructSize(hwnd) \
(void)SendMessage((hwnd), TB_BUTTONSTRUCTSIZE, (WPARAM)sizeof(TBBUTTON), 0L)
*)
BEGIN
END ToolBar_ButtonStructSize;
PROCEDURE ["C"] ToolBar_ChangeBitmap ( hwnd, idButton, iBitmap: ARRAY OF SYSTEM.BYTE
);
(*
#define ToolBar_ChangeBitmap(hwnd, idButton, iBitmap) \
(BOOL)SendMessage((hwnd), TB_CHANGEBITMAP, (WPARAM) idButton, (LPARAM)iBitmap);
*)
BEGIN
END ToolBar_ChangeBitmap;
PROCEDURE ["C"] ToolBar_CheckButton ( hwnd, idButton, fCheck: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_CheckButton(hwnd, idButton, fCheck ) \
(BOOL)SendMessage((hwnd), TB_CHECKBUTTON, (WPARAM) idButton, (LPARAM) MAKELONG(fCheck, 0))
*)
BEGIN
END ToolBar_CheckButton;
PROCEDURE ["C"] ToolBar_CommandToIndex ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_CommandToIndex(hwnd, idButton) \
(int)SendMessage((hwnd), TB_COMMANDTOINDEX, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_CommandToIndex;
PROCEDURE ["C"] ToolBar_Customize ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_Customize(hwnd) \
(void)SendMessage((hwnd), TB_CUSTOMIZE, 0, 0L)
*)
BEGIN
END ToolBar_Customize;
PROCEDURE ["C"] ToolBar_DeleteButton ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_DeleteButton(hwnd, idButton) \
(BOOL)SendMessage((hwnd), TB_DELETEBUTTON, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_DeleteButton;
PROCEDURE ["C"] ToolBar_EnableButton ( hwnd, idButton, fEnable: ARRAY OF SYSTEM.BYTE
);
(*
#define ToolBar_EnableButton(hwnd, idButton, fEnable ) \
(BOOL)SendMessage((hwnd), TB_ENABLEBUTTON, (WPARAM) idButton, (LPARAM) MAKELONG(fEnable, 0))
*)
BEGIN
END ToolBar_EnableButton;
PROCEDURE ["C"] ToolBar_GetBitmap ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetBitmap(hwnd, idButton) \
(int)SendMessage((hwnd), TB_GETBITMAP, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_GetBitmap;
PROCEDURE ["C"] ToolBar_GetBitmapFlags ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetBitmapFlags(hwnd) \
(int)SendMessage((hwnd), TB_GETBITMAPFLAGS, 0, 0L)
*)
BEGIN
END ToolBar_GetBitmapFlags;
PROCEDURE ["C"] ToolBar_GetButton ( hwnd, idButton, lpButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetButton(hwnd, idButton, lpButton) \
(BOOL)SendMessage((hwnd), TB_GETBUTTON, (WPARAM)idButton, (LPARAM)(LPTBBUTTON) lpButton)
*)
BEGIN
END ToolBar_GetButton;
PROCEDURE ["C"] ToolBar_GetButtonText ( hwnd, idButton, lpszText: ARRAY OF
SYSTEM.BYTE );
(*
#define ToolBar_GetButtonText(hwnd, idButton, lpszText) \
(int)SendMessage((hwnd), TB_GETBUTTONTEXT, (WPARAM) idButton, (LPARAM)(LPSTR)lpszText)
*)
BEGIN
END ToolBar_GetButtonText;
PROCEDURE ["C"] ToolBar_GetItemRect ( hwnd, idButton, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetItemRect(hwnd, idButton, lprc) \
(BOOL)SendMessage((hwnd), TB_GETITEMRECT, (WPARAM)idButton, (LPARAM)(LPRECT)lprc)
*)
BEGIN
END ToolBar_GetItemRect;
PROCEDURE ["C"] ToolBar_GetRows ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetRows(hwnd) \
(int)SendMessage((hwnd), TB_GETROWS, 0, 0L)
*)
BEGIN
END ToolBar_GetRows;
PROCEDURE ["C"] ToolBar_GetState ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetState(hwnd, idButton) \
(int)SendMessage((hwnd), TB_GETSTATE, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_GetState;
PROCEDURE ["C"] ToolBar_GetToolTips ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_GetToolTips(hwnd) \
(hwnd)SendMessage((hwnd), TB_GETTOOLTIPS, 0, 0L)
*)
BEGIN
END ToolBar_GetToolTips;
PROCEDURE ["C"] ToolBar_HideButton ( hwnd, idButton, fShow: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_HideButton(hwnd, idButton, fShow) \
(BOOL)SendMessage((hwnd), TB_HIDEBUTTON, (WPARAM)idButton, (LPARAM)MAKELONG(fShow, 0))
*)
BEGIN
END ToolBar_HideButton;
PROCEDURE ["C"] ToolBar_Indeterminate ( hwnd, idButton, fIndeterminate: ARRAY OF
SYSTEM.BYTE );
(*
#define ToolBar_Indeterminate(hwnd, idButton, fIndeterminate) \
(BOOL)SendMessage((hwnd), TB_INDETERMINATE, (WPARAM)idButton, (LPARAM) MAKELONG(fIndeterminate, 0))
*)
BEGIN
END ToolBar_Indeterminate;
PROCEDURE ["C"] ToolBar_InsertButton ( hwnd, idButton, lpButton: ARRAY OF SYSTEM.BYTE
);
(*
#define ToolBar_InsertButton(hwnd, idButton, lpButton) \
(BOOL)SendMessage((hwnd), TB_INSERTBUTTON, (WPARAM)idButton, (LPARAM)(LPTBBUTTON)lpButton)
*)
BEGIN
END ToolBar_InsertButton;
PROCEDURE ["C"] ToolBar_IsButtonChecked ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_IsButtonChecked(hwnd, idButton) \
(int)SendMessage((hwnd), TB_ISBUTTONCHECKED, (WPARAM)idButton, 0L)
*)
BEGIN
END ToolBar_IsButtonChecked;
PROCEDURE ["C"] ToolBar_IsButtonEnabled ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_IsButtonEnabled(hwnd, idButton) \
(int)SendMessage((hwnd), TB_ISBUTTONENABLED, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_IsButtonEnabled;
PROCEDURE ["C"] ToolBar_IsButtonHidden ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_IsButtonHidden(hwnd, idButton) \
(int)SendMessage((hwnd), TB_ISBUTTONHIDDEN, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_IsButtonHidden;
PROCEDURE ["C"] ToolBar_IsButtonIndeterminate ( hwnd, idButton: ARRAY OF SYSTEM.BYTE
);
(*
#define ToolBar_IsButtonIndeterminate(hwnd, idButton) \
(int)SendMessage((hwnd), TB_ISBUTTONINDETERMINATE, (WPARAM) idButton, 0L)
*)
BEGIN
END ToolBar_IsButtonIndeterminate;
PROCEDURE ["C"] ToolBar_IsButtonPressed ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_IsButtonPressed(hwnd, idButton) \
(int)SendMessage((hwnd), TB_ISBUTTONPRESSED, (WPARAM) idButton, 0L
*)
BEGIN
END ToolBar_IsButtonPressed;
PROCEDURE ["C"] ToolBar_PressButton ( hwnd, idButton, fPress: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_PressButton(hwnd, idButton, fPress) \
(BOOL)SendMessage((hwnd), TB_PRESSBUTTON, (WPARAM)idButton, (LPARAM)MAKELONG(fPress, 0))
*)
BEGIN
END ToolBar_PressButton;
PROCEDURE ["C"] ToolBar_SaveRestore ( hwnd, fSave, ptbsp: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_SaveRestore(hwnd, fSave, ptbsp) \
(void)SendMessage((hwnd), TB_SAVERESTORE, (WPARAM)(BOOL)fSave, (LPARAM)(TBSAVEPARAMS *)ptbsp)
*)
BEGIN
END ToolBar_SaveRestore;
PROCEDURE ["C"] ToolBar_SetBitmapSize ( hwnd, dxBitmap, dyBitmap: ARRAY OF
SYSTEM.BYTE );
(*
#define ToolBar_SetBitmapSize(hwnd, dxBitmap, dyBitmap) \
(BOOL)SendMessage((hwnd), TB_SETBITMAPSIZE, 0, (LPARAM)MAKELONG(dxBitmap, dyBitmap))
*)
BEGIN
END ToolBar_SetBitmapSize;
PROCEDURE ["C"] ToolBar_SetButtonSize ( hwnd, dxBitmap, dyBitmap: ARRAY OF
SYSTEM.BYTE );
(*
#define ToolBar_SetButtonSize(hwnd, dxBitmap, dyBitmap) \
(BOOL)SendMessage((hwnd), TB_SETBUTTONSIZE, 0, (LPARAM)MAKELONG(dxBitmap, dyBitmap))
*)
BEGIN
END ToolBar_SetButtonSize;
PROCEDURE ["C"] ToolBar_SetCmdID ( hwnd, index, cmdId: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_SetCmdID(hwnd, index, cmdId) \
(BOOL)SendMessage((hwnd), TB_SETCMDID, (WPARAM)(UINT)index, (WPARAM)(UINT)cmdId)
*)
BEGIN
END ToolBar_SetCmdID;
PROCEDURE ["C"] ToolBar_SetParent ( hwnd, hwndParent: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_SetParent(hwnd, hwndParent) \
(void)SendMessage((hwnd), TB_SETPARENT, (WPARAM) (hwnd) hwndParent, 0L)
*)
BEGIN
END ToolBar_SetParent;
PROCEDURE ["C"] ToolBar_SetRows ( hwnd, cRows, fLarger, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_SetRows(hwnd, cRows, fLarger, lprc) \
(void)SendMessage((hwnd), TB_SETROWS, (WPARAM)MAKEWPARAM(cRows, fLarger),(LPARAM)(LPRECT)lprc)
*)
BEGIN
END ToolBar_SetRows;
PROCEDURE ["C"] ToolBar_SetState ( hwnd, idButton, fState: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_SetState(hwnd, idButton, fState) \
(BOOL)SendMessage((hwnd), TB_SETSTATE, (WPARAM)idButton, (LPARAM)MAKELONG(fState, 0))
*)
BEGIN
END ToolBar_SetState;
PROCEDURE ["C"] ToolBar_SetToolTips ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolBar_SetToolTips(hwnd) \
(void)SendMessage((hwnd), TB_SETTOOLTIPS, (WPARAM)(hwnd) hwndToolTip, 0L)
*)
BEGIN
END ToolBar_SetToolTips;
PROCEDURE ["C"] ToolTip_Activate ( hwnd, fActivate: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_Activate(hwnd, fActivate) \
(void)SendMessage((hwnd), TTM_ACTIVATE, (WPARAM) (BOOL) fActivate, 0L)
*)
BEGIN
END ToolTip_Activate;
PROCEDURE ["C"] ToolTip_AddTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_AddTool(hwnd, lpti) \
(BOOL)SendMessage((hwnd), TTM_ADDTOOL, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_AddTool;
PROCEDURE ["C"] ToolTip_DelTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_DelTool(hwnd, lpti) \
(void)SendMessage((hwnd), TTM_DELTOOL, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_DelTool;
PROCEDURE ["C"] ToolTip_EnumTools ( hwnd, iTool, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_EnumTools(hwnd, iTool, lpti) \
(BOOL)SendMessage((hwnd), TTM_ENUMTOOLS, (WPARAM) (UINT) iTool, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_EnumTools;
PROCEDURE ["C"] ToolTip_GetCurrentTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_GetCurrentTool(hwnd, lpti) \
(BOOL)SendMessage((hwnd), TTM_GETCURRENTTOOL, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_GetCurrentTool;
PROCEDURE ["C"] ToolTip_GetText ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_GetText(hwnd, lpti) \
(void)SendMessage((hwnd), TTM_GETTEXT, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_GetText;
PROCEDURE ["C"] ToolTip_GetToolCount ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_GetToolCount(hwnd) \
(int)SendMessage((hwnd), TTM_GETTOOLCOUNT, 0, 0L)
*)
BEGIN
END ToolTip_GetToolCount;
PROCEDURE ["C"] ToolTip_GetToolInfo ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_GetToolInfo(hwnd, lpti) \
(BOOL)SendMessage((hwnd), TTM_GETTOOLINFO, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_GetToolInfo;
PROCEDURE ["C"] ToolTip_HitText ( hwnd, lphti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_HitText(hwnd, lphti) \
(BOOL)SendMessage((hwnd), TTM_HITTEST, 0, (LPARAM) (LPHITTESTINFO) lphti)
*)
BEGIN
END ToolTip_HitText;
PROCEDURE ["C"] ToolTip_NewToolRect ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_NewToolRect(hwnd, lpti) \
(void)SendMessage((hwnd), TTM_NEWTOOLRECT, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_NewToolRect;
PROCEDURE ["C"] ToolTip_RelayEvent ( hwnd, lpmsg: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_RelayEvent(hwnd, lpmsg) \
(void)SendMessage((hwnd), TTM_RELAYEVENT, 0, (LPARAM) (LPMSG) lpmsg)
*)
BEGIN
END ToolTip_RelayEvent;
PROCEDURE ["C"] ToolTip_SetDelayTime ( hwnd, uFlag, iDelay: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_SetDelayTime(hwnd, uFlag, iDelay) \
(void)SendMessage((hwnd), TTM_SETDELAYTIME, (WPARAM) uFlag, (LPARAM) (int) iDelay)
*)
BEGIN
END ToolTip_SetDelayTime;
PROCEDURE ["C"] ToolTip_SetToolInfo ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_SetToolInfo(hwnd, lpti) \
(void)SendMessage((hwnd), TTM_SETTOOLINFO, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_SetToolInfo;
PROCEDURE ["C"] ToolTip_UpdateTipText ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_UpdateTipText(hwnd, lpti) \
(void)SendMessage((hwnd), TTM_UPDATETIPTEXT, 0, (LPARAM) (LPTOOLINFO) lpti)
*)
BEGIN
END ToolTip_UpdateTipText;
PROCEDURE ["C"] ToolTip_WindowFromPoint ( hwnd, lppt: ARRAY OF SYSTEM.BYTE );
(*
#define ToolTip_WindowFromPoint(hwnd, lppt) \
(hwnd)SendMessage((hwnd), TTM_WINDOWFROMPOINT, 0, (POINT FAR *) lppt)
*)
BEGIN
END ToolTip_WindowFromPoint;
PROCEDURE ["C"] TrackBar_ClearSel ( hwnd, fRedraw: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_ClearSel(hwnd, fRedraw) \
(void)SendMessage((hwnd), TBM_CLEARSEL, (WPARAM) (BOOL) fRedraw, 0L)
*)
BEGIN
END TrackBar_ClearSel;
PROCEDURE ["C"] TrackBar_ClearTics ( hwnd, fRedraw: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_ClearTics(hwnd, fRedraw) \
(void)SendMessage((hwnd), TBM_CLEARTICS, (WPARAM) (BOOL) fRedraw, 0L)
*)
BEGIN
END TrackBar_ClearTics;
PROCEDURE ["C"] TrackBar_GetChannelRect ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetChannelRect(hwnd, lprc) \
(void)SendMessage((hwnd), TBM_GETCHANNELRECT, 0, (LPARAM) (LPRECT) lprc)
*)
BEGIN
END TrackBar_GetChannelRect;
PROCEDURE ["C"] TrackBar_GetLineSize ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetLineSize(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETLINESIZE, 0, 0L)
*)
BEGIN
END TrackBar_GetLineSize;
PROCEDURE ["C"] TrackBar_GetNumTics ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetNumTics(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETNUMTICS, 0, 0L)
*)
BEGIN
END TrackBar_GetNumTics;
PROCEDURE ["C"] TrackBar_GetPTics ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetPTics(hwnd) \
(LPLONG)SendMessage((hwnd), TBM_GETPTICS, 0, 0L)
*)
BEGIN
END TrackBar_GetPTics;
PROCEDURE ["C"] TrackBar_GetPageSize ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetPageSize(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETPAGESIZE, 0, 0L)
*)
BEGIN
END TrackBar_GetPageSize;
PROCEDURE ["C"] TrackBar_GetPos ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetPos(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETPOS, 0, 0L)
*)
BEGIN
END TrackBar_GetPos;
PROCEDURE ["C"] TrackBar_GetRangeMax ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetRangeMax(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETRANGEMAX, 0, 0L)
*)
BEGIN
END TrackBar_GetRangeMax;
PROCEDURE ["C"] TrackBar_GetRangeMin ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetRangeMin(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETRANGEMIN, 0, 0L)
*)
BEGIN
END TrackBar_GetRangeMin;
PROCEDURE ["C"] TrackBar_GetSelEnd ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetSelEnd(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETSELEND, 0, 0L)
*)
BEGIN
END TrackBar_GetSelEnd;
PROCEDURE ["C"] TrackBar_GetSelStart ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetSelStart(hwnd) \
(LONG)SendMessage((hwnd), TBM_GETSELSTART, 0, 0L)
*)
BEGIN
END TrackBar_GetSelStart;
PROCEDURE ["C"] TrackBar_GetThumbLength ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetThumbLength(hwnd) \
(UINT)SendMessage((hwnd), TBM_GETTHUMBLENGTH, 0, 0L)
*)
BEGIN
END TrackBar_GetThumbLength;
PROCEDURE ["C"] TrackBar_GetThumbRect ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetThumbRect(hwnd, lprc) \
(void)SendMessage((hwnd), TBM_GETTHUMBRECT, 0, (LPARAM) (LPRECT) lprc)
*)
BEGIN
END TrackBar_GetThumbRect;
PROCEDURE ["C"] TrackBar_GetTic ( hwnd, iTic: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetTic(hwnd, iTic) \
(LONG)SendMessage((hwnd), TBM_GETTIC, (WPARAM) (WORD) iTic, 0L)
*)
BEGIN
END TrackBar_GetTic;
PROCEDURE ["C"] TrackBar_GetTicPos ( hwnd, iTic: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_GetTicPos(hwnd, iTic) \
(LONG)SendMessage((hwnd), TBM_GETTICPOS, (WPARAM) (WORD) iTic, 0L)
*)
BEGIN
END TrackBar_GetTicPos;
PROCEDURE ["C"] TrackBar_SetLineSize ( hwnd, lLineSize: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetLineSize(hwnd, lLineSize) \
(LONG)SendMessage((hwnd), TBM_SETLINESIZE, 0, (LONG) lLineSize)
*)
BEGIN
END TrackBar_SetLineSize;
PROCEDURE ["C"] TrackBar_SetPageSize ( hwnd, lPageSize: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetPageSize(hwnd, lPageSize) \
(LONG)SendMessage((hwnd), TBM_SETPAGESIZE, 0, (LONG) lPageSize)
*)
BEGIN
END TrackBar_SetPageSize;
PROCEDURE ["C"] TrackBar_SetPos ( hwnd, bPosition, lPosition: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetPos(hwnd, bPosition, lPosition) \
(void)SendMessage((hwnd), TBM_SETPOS, (WPARAM) (BOOL) bPosition, (LPARAM) (LONG) lPosition)
*)
BEGIN
END TrackBar_SetPos;
PROCEDURE ["C"] TrackBar_SetRange ( hwnd, bRedraw, lMinimum, lMaximum: ARRAY OF
SYSTEM.BYTE );
(*
#define TrackBar_SetRange(hwnd, bRedraw, lMinimum, lMaximum) \
(void)SendMessage((hwnd), TBM_SETRANGE, (WPARAM) (BOOL) bRedraw, (LPARAM) MAKELONG(lMinimum, lMaximum))
*)
BEGIN
END TrackBar_SetRange;
PROCEDURE ["C"] TrackBar_SetRangeMax ( hwnd, bRedraw, lMaximum: ARRAY OF SYSTEM.BYTE
);
(*
#define TrackBar_SetRangeMax(hwnd, bRedraw, lMaximum) \
(void)SendMessage((hwnd), TBM_SETRANGEMAX, (WPARAM) bRedraw, (LPARAM) lMaximum)
*)
BEGIN
END TrackBar_SetRangeMax;
PROCEDURE ["C"] TrackBar_SetRangeMin ( hwnd, bRedraw, lMinimum: ARRAY OF SYSTEM.BYTE
);
(*
#define TrackBar_SetRangeMin(hwnd, bRedraw, lMinimum) \
(void)SendMessage((hwnd), TBM_SETRANGEMIN, (WPARAM) bRedraw, (LPARAM) lMinimum)
*)
BEGIN
END TrackBar_SetRangeMin;
PROCEDURE ["C"] TrackBar_SetSel ( hwnd, bRedraw, lMinimum, lMaximum: ARRAY OF
SYSTEM.BYTE );
(*
#define TrackBar_SetSel(hwnd, bRedraw, lMinimum, lMaximum) \
(void)SendMessage((hwnd), TBM_SETSEL, (WPARAM) (BOOL) bRedraw, (LPARAM) MAKELONG(lMinimum, lMaximum))
*)
BEGIN
END TrackBar_SetSel;
PROCEDURE ["C"] TrackBar_SetSelEnd ( hwnd, bRedraw, lEnd: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetSelEnd(hwnd, bRedraw, lEnd) \
(void)SendMessage((hwnd), TBM_SETSELEND, (WPARAM) (BOOL) bRedraw, (LPARAM) (LONG) lEnd)
*)
BEGIN
END TrackBar_SetSelEnd;
PROCEDURE ["C"] TrackBar_SetSelStart ( hwnd, bRedraw, lStart: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetSelStart(hwnd, bRedraw, lStart) \
(void)SendMessage((hwnd), TBM_SETSELSTART, (WPARAM) (BOOL) bRedraw, (LPARAM) (LONG) lStart)
*)
BEGIN
END TrackBar_SetSelStart;
PROCEDURE ["C"] TrackBar_SetThumbLength ( hwnd, iLength: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetThumbLength(hwnd, iLength) \
(void)SendMessage((hwnd), TBM_SETTHUMBLENGTH, (WPARAM) (UINT) iLength, 0L)
*)
BEGIN
END TrackBar_SetThumbLength;
PROCEDURE ["C"] TrackBar_SetTic ( hwnd, lPosition: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetTic(hwnd, lPosition) \
(BOOL)SendMessage((hwnd), TBM_SETTIC, 0, (LPARAM) (LONG) lPosition)
*)
BEGIN
END TrackBar_SetTic;
PROCEDURE ["C"] TrackBar_SetTicFreq ( hwnd, wFreq, lPosition: ARRAY OF SYSTEM.BYTE );
(*
#define TrackBar_SetTicFreq(hwnd, wFreq, lPosition) \
(void)SendMessage((hwnd), TBM_SETTICFREQ, (WPARAM) wFreq, (LPARAM) (LONG) lPosition)
*)
BEGIN
END TrackBar_SetTicFreq;
PROCEDURE ["C"] UpDown_GetAccel ( hwnd, cAccels, paAccels: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_GetAccel(hwnd, cAccels, paAccels) \
(int)SendMessage((hwnd), UDM_GETACCEL, (WPARAM) cAccels, (LPARAM) (LPUDACCEL) paAccels)
*)
BEGIN
END UpDown_GetAccel;
PROCEDURE ["C"] UpDown_GetBase ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_GetBase(hwnd) \
(int)SendMessage((hwnd), UDM_GETBASE, 0, 0L)
*)
BEGIN
END UpDown_GetBase;
PROCEDURE ["C"] UpDown_GetBuddy ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_GetBuddy(hwnd) \
(hwnd)SendMessage((hwnd), UDM_GETBUDDY, 0, 0L)
*)
BEGIN
END UpDown_GetBuddy;
PROCEDURE ["C"] UpDown_GetPos ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_GetPos(hwnd) \
(DWORD)SendMessage((hwnd), UDM_GETPOS, 0, 0L)
*)
BEGIN
END UpDown_GetPos;
PROCEDURE ["C"] UpDown_GetRange ( hwnd: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_GetRange(hwnd) \
(DWORD)SendMessage((hwnd), UDM_GETRANGE, 0, 0L)
*)
BEGIN
END UpDown_GetRange;
PROCEDURE ["C"] UpDown_SetAccel ( hwnd, nAccels, aAccels: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_SetAccel(hwnd, nAccels, aAccels) \
(BOOL)SendMessage((hwnd), UDM_SETACCEL, (WPARAM) nAccels, (LPARAM) (LPUDACCEL) aAccels)
*)
BEGIN
END UpDown_SetAccel;
PROCEDURE ["C"] UpDown_SetBase ( hwnd, nBase: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_SetBase(hwnd, nBase) \
(int)SendMessage((hwnd), UDM_SETBASE, (WPARAM) nBase, 0L)
*)
BEGIN
END UpDown_SetBase;
PROCEDURE ["C"] UpDown_SetBuddy ( hwnd, hwndBuddy: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_SetBuddy(hwnd, hwndBuddy) \
(hwnd)SendMessage((hwnd), UDM_SETBUDDY, (WPARAM) (hwnd) hwndBuddy, 0L)
*)
BEGIN
END UpDown_SetBuddy;
PROCEDURE ["C"] UpDown_SetPos ( hwnd, nPos: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_SetPos(hwnd, nPos) \
(short)SendMessage((hwnd), UDM_SETPOS, 0, (LPARAM) MAKELONG((short) nPos, 0))
*)
BEGIN
END UpDown_SetPos;
PROCEDURE ["C"] UpDown_SetRange ( hwnd, nUpper, nLower: ARRAY OF SYSTEM.BYTE );
(*
#define UpDown_SetRange(hwnd, nUpper, nLower) \
(void)SendMessage((hwnd), UDM_SETRANGE, 0, (LPARAM) MAKELONG((short) nUpper, (short) nLower))
*)
BEGIN
END UpDown_SetRange;
END m_comcthlp.