h2d_comcthlp.def: Translation to Stony Brook Modula-2

Last updated: 30.12.1997, 10:15

(* h2d_comcthlp.def  Aug 3  12:14:15  1997 *)
(* Generated by H2D v1.12 from comcthlp.h. *)

DEFINITION MODULE  h2d_comcthlp;

IMPORT SYSTEM;
(* H2D:  Required IMPORT clause: 
IMPORT h2d_comcthlp;
*)

(*  ---------------------------------------------------  *)
(*   COMCTHLP.H -- Helper macros for common controls     *)
(*                 (c) Paul Yao, 1996                    *)
(*                                                       *)
(*   Portions Copyright (c) 1992-1996, Microsoft Corp.   *)
(*  ---------------------------------------------------  *)
(* ------------------------------------------------------------------- *)
(*  Hot-Key Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE HotKey_SetHotKey ( hwnd, bVKHotKey, bfMods: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / HotKey_SetHotKey ( hwnd, bVKHotKey, bfMods: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE HotKey_GetHotKey ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / HotKey_GetHotKey ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE HotKey_SetRules ( hwnd, fwCombInv, fwModInv: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / HotKey_SetRules ( hwnd, fwCombInv, fwModInv: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Progress Bar Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Progress_SetRange ( hwnd, nMinRange, nMaxRange: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Progress_SetRange ( hwnd, nMinRange, nMaxRange: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Progress_SetPos ( hwnd, nNewPos: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Progress_SetPos ( hwnd, nNewPos: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Progress_DeltaPos ( hwnd, nIncrement: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Progress_DeltaPos ( hwnd, nIncrement: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Progress_SetStep ( hwnd, nStepInc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Progress_SetStep ( hwnd, nStepInc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Progress_StepIt ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Progress_StepIt ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Rich Edit Control Helper Macros *)
(* ------------------------------------------------------------------- *)
(* ---------------- Begin Macros Copied from windowsx.h---------------  *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_Enable ( hwndCtl, fEnable: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_Enable ( hwndCtl, fEnable: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetText ( hwndCtl, lpch, cchMax: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetText ( hwndCtl, lpch, cchMax: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetTextLength ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetTextLength ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetText ( hwndCtl, lpsz: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetText ( hwndCtl, lpsz: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_LimitText ( hwndCtl, cchMax: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_LimitText ( hwndCtl, cchMax: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetLineCount ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetLineCount ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetLine ( hwndCtl, line, lpch, cchMax: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetLine ( hwndCtl, line, lpch, cchMax: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetRect ( hwndCtl, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetRect ( hwndCtl, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetRect ( hwndCtl, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetRect ( hwndCtl, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetSel ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetSel ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetSel ( hwndCtl, ichStart, ichEnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetSel ( hwndCtl, ichStart, ichEnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_ReplaceSel ( hwndCtl, lpszReplace: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_ReplaceSel ( hwndCtl, lpszReplace: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetModify ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetModify ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetModify ( hwndCtl, fModified: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetModify ( hwndCtl, fModified: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_ScrollCaret ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_ScrollCaret ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_LineFromChar ( hwndCtl, ich: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_LineFromChar ( hwndCtl, ich: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_LineIndex ( hwndCtl, line: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_LineIndex ( hwndCtl, line: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_LineLength ( hwndCtl, line: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_LineLength ( hwndCtl, line: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_Scroll ( hwndCtl, dv, dh: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_Scroll ( hwndCtl, dv, dh: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_CanUndo ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_CanUndo ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_Undo ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_Undo ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_EmptyUndoBuffer ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_EmptyUndoBuffer ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetFirstVisibleLine ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetFirstVisibleLine ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetReadOnly ( hwndCtl, fReadOnly: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetReadOnly ( hwndCtl, fReadOnly: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetWordBreakProc ( hwndCtl, lpfnWordBreak: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetWordBreakProc ( hwndCtl,
                                          lpfnWordBreak: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetWordBreakProc ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetWordBreakProc ( hwndCtl: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_CanPaste ( hwnd, uFormat: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_CanPaste ( hwnd, uFormat: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_CharFromPos ( hwnd, x, y: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_CharFromPos ( hwnd, x, y: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_DisplayBand ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_DisplayBand ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_ExGetSel ( hwnd, lpchr: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_ExGetSel ( hwnd, lpchr: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_ExLimitText ( hwnd, cchTextMax: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_ExLimitText ( hwnd, cchTextMax: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_ExLineFromChar ( hwnd, ichCharPos: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_ExLineFromChar ( hwnd, ichCharPos: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_ExSetSel ( hwnd, ichCharRange: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_ExSetSel ( hwnd, ichCharRange: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_FindText ( hwnd, fuFlags, lpFindText: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_FindText ( hwnd, fuFlags, lpFindText: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_FindTextEx ( hwnd, fuFlags, lpFindText: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_FindTextEx ( hwnd, fuFlags, lpFindText: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_FindWordBreak ( hwnd, code, ichStart: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_FindWordBreak ( hwnd, code, ichStart: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_FormatRange ( hwnd, fRender, lpFmt: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_FormatRange ( hwnd, fRender, lpFmt: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetCharFormat ( hwnd, fSelection, lpFmt: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetCharFormat ( hwnd, fSelection, lpFmt: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetEventMask ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetEventMask ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetLimitText ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetLimitText ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetOleInterface ( hwnd, ppObject: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetOleInterface ( hwnd, ppObject: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetOptions ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetOptions ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetParaFormat ( hwnd, lpFmt: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetParaFormat ( hwnd, lpFmt: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetSelText ( hwnd, lpBuf: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetSelText ( hwnd, lpBuf: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetTextRange ( hwnd, lpRange: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetTextRange ( hwnd, lpRange: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_GetWordBreakProcEx ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_GetWordBreakProcEx ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ----------------- End Macros Copied from windowsx.h---------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_HideSelection ( hwnd, fHide, fChangeStyle: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_HideSelection ( hwnd, fHide,
                                       fChangeStyle: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_PasteSpecial ( hwnd, uFormat: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_PasteSpecial ( hwnd, uFormat: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_PosFromChar ( hwnd, wCharIndex: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_PosFromChar ( hwnd, wCharIndex: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_RequestResize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_RequestResize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SelectionType ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SelectionType ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetBkgndColor ( hwnd, fUseSysColor, clr: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetBkgndColor ( hwnd, fUseSysColor, clr: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetCharFormat ( hwnd, uFlags, lpFmt: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetCharFormat ( hwnd, uFlags, lpFmt: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetEventMask ( hwnd, dwMask: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetEventMask ( hwnd, dwMask: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetOleCallback ( hwnd, lpObj: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetOleCallback ( hwnd, lpObj: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetOptions ( hwnd, fOperation, fOptions: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetOptions ( hwnd, fOperation, fOptions: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetParaFormat ( hwnd, lpFmt: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetParaFormat ( hwnd, lpFmt: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetTargetDevice ( hwnd, hdcTarget,
                                      cxLineWidth: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetTargetDevice ( hwnd, hdcTarget,
                                         cxLineWidth: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_SetWordBreakProcEx ( hwnd,
                                         pfnWordBreakProcEx: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_SetWordBreakProcEx ( hwnd,
                                            pfnWordBreakProcEx: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_StreamIn ( hwnd, uFormat, lpStream: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_StreamIn ( hwnd, uFormat, lpStream: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE RichEdit_StreamOut ( hwnd, uFormat, lpStream: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / RichEdit_StreamOut ( hwnd, uFormat, lpStream: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Status Bar Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_GetBorders ( hwnd, aBorders: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_GetBorders ( hwnd, aBorders: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_GetParts ( hwnd, nParts, aRightCoord: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_GetParts ( hwnd, nParts, aRightCoord: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_GetRect ( hwnd, iPart, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_GetRect ( hwnd, iPart, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_GetText ( hwnd, iPart, szText: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_GetText ( hwnd, iPart, szText: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_GetTextLength ( hwnd, iPart: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_GetTextLength ( hwnd, iPart: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_SetMinHeight ( hwnd, minHeight: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_SetMinHeight ( hwnd, minHeight: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_SetParts ( hwnd, nParts, aWidths: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_SetParts ( hwnd, nParts, aWidths: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_SetText ( hwnd, iPart, uType, szText: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_SetText ( hwnd, iPart, uType, szText: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE Status_Simple ( hwnd, fSimple: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / Status_Simple ( hwnd, fSimple: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Tool Bar Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_AddBitmap ( hwnd, nButtons, lptbab: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_AddBitmap ( hwnd, nButtons, lptbab: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_AddButtons ( hwnd, uNumButtons, lpButtons: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_AddButtons ( hwnd, uNumButtons,
                                   lpButtons: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_AddString ( hwnd, hinst, idString: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_AddString ( hwnd, hinst, idString: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_AutoSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_AutoSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_ButtonCount ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_ButtonCount ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_ButtonStructSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_ButtonStructSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_ChangeBitmap ( hwnd, idButton, iBitmap: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_ChangeBitmap ( hwnd, idButton, iBitmap: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_CheckButton ( hwnd, idButton, fCheck: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_CheckButton ( hwnd, idButton, fCheck: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_CommandToIndex ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_CommandToIndex ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_Customize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_Customize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_DeleteButton ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_DeleteButton ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_EnableButton ( hwnd, idButton, fEnable: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_EnableButton ( hwnd, idButton, fEnable: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetBitmap ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetBitmap ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetBitmapFlags ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetBitmapFlags ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetButton ( hwnd, idButton, lpButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetButton ( hwnd, idButton, lpButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetButtonText ( hwnd, idButton, lpszText: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetButtonText ( hwnd, idButton, lpszText: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetItemRect ( hwnd, idButton, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetItemRect ( hwnd, idButton, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetRows ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetRows ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetState ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetState ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_GetToolTips ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_GetToolTips ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_HideButton ( hwnd, idButton, fShow: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_HideButton ( hwnd, idButton, fShow: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_Indeterminate ( hwnd, idButton,
                                   fIndeterminate: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_Indeterminate ( hwnd, idButton,
                                      fIndeterminate: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_InsertButton ( hwnd, idButton, lpButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_InsertButton ( hwnd, idButton, lpButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_IsButtonChecked ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_IsButtonChecked ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_IsButtonEnabled ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_IsButtonEnabled ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_IsButtonHidden ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_IsButtonHidden ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_IsButtonIndeterminate ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_IsButtonIndeterminate ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_IsButtonPressed ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_IsButtonPressed ( hwnd, idButton: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_PressButton ( hwnd, idButton, fPress: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_PressButton ( hwnd, idButton, fPress: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SaveRestore ( hwnd, fSave, ptbsp: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SaveRestore ( hwnd, fSave, ptbsp: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetBitmapSize ( hwnd, dxBitmap, dyBitmap: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetBitmapSize ( hwnd, dxBitmap, dyBitmap: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetButtonSize ( hwnd, dxBitmap, dyBitmap: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetButtonSize ( hwnd, dxBitmap, dyBitmap: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetCmdID ( hwnd, index, cmdId: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetCmdID ( hwnd, index, cmdId: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetParent ( hwnd, hwndParent: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetParent ( hwnd, hwndParent: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetRows ( hwnd, cRows, fLarger, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetRows ( hwnd, cRows, fLarger, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetState ( hwnd, idButton, fState: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetState ( hwnd, idButton, fState: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolBar_SetToolTips ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolBar_SetToolTips ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Tool Tip Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_Activate ( hwnd, fActivate: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_Activate ( hwnd, fActivate: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_AddTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_AddTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_DelTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_DelTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_EnumTools ( hwnd, iTool, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_EnumTools ( hwnd, iTool, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_GetCurrentTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_GetCurrentTool ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_GetText ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_GetText ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_GetToolCount ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_GetToolCount ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_GetToolInfo ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_GetToolInfo ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_HitText ( hwnd, lphti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_HitText ( hwnd, lphti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_NewToolRect ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_NewToolRect ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_RelayEvent ( hwnd, lpmsg: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_RelayEvent ( hwnd, lpmsg: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_SetDelayTime ( hwnd, uFlag, iDelay: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_SetDelayTime ( hwnd, uFlag, iDelay: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_SetToolInfo ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_SetToolInfo ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_UpdateTipText ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_UpdateTipText ( hwnd, lpti: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE ToolTip_WindowFromPoint ( hwnd, lppt: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / ToolTip_WindowFromPoint ( hwnd, lppt: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Track Bar Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_ClearSel ( hwnd, fRedraw: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_ClearSel ( hwnd, fRedraw: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_ClearTics ( hwnd, fRedraw: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_ClearTics ( hwnd, fRedraw: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetChannelRect ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetChannelRect ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetLineSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetLineSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetNumTics ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetNumTics ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetPageSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetPageSize ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetPos ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetPos ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetPTics ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetPTics ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetRangeMax ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetRangeMax ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetRangeMin ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetRangeMin ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetSelEnd ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetSelEnd ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetSelStart ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetSelStart ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetThumbLength ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetThumbLength ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetThumbRect ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetThumbRect ( hwnd, lprc: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetTic ( hwnd, iTic: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetTic ( hwnd, iTic: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_GetTicPos ( hwnd, iTic: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_GetTicPos ( hwnd, iTic: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetLineSize ( hwnd, lLineSize: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetLineSize ( hwnd, lLineSize: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetPageSize ( hwnd, lPageSize: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetPageSize ( hwnd, lPageSize: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetPos ( hwnd, bPosition, lPosition: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetPos ( hwnd, bPosition, lPosition: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetRange ( hwnd, bRedraw, lMinimum,
                               lMaximum: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetRange ( hwnd, bRedraw, lMinimum,
                                  lMaximum: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetRangeMax ( hwnd, bRedraw, lMaximum: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetRangeMax ( hwnd, bRedraw, lMaximum: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetRangeMin ( hwnd, bRedraw, lMinimum: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetRangeMin ( hwnd, bRedraw, lMinimum: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetSel ( hwnd, bRedraw, lMinimum, lMaximum: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetSel ( hwnd, bRedraw, lMinimum,
                                lMaximum: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetSelEnd ( hwnd, bRedraw, lEnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetSelEnd ( hwnd, bRedraw, lEnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetSelStart ( hwnd, bRedraw, lStart: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetSelStart ( hwnd, bRedraw, lStart: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetThumbLength ( hwnd, iLength: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetThumbLength ( hwnd, iLength: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetTic ( hwnd, lPosition: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetTic ( hwnd, lPosition: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE TrackBar_SetTicFreq ( hwnd, wFreq, lPosition: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / TrackBar_SetTicFreq ( hwnd, wFreq, lPosition: ARRAY OF SYSTEM.BYTE );

<* END *>

(* ------------------------------------------------------------------- *)
(*  Up / Down Control Helper Macros *)
(* ------------------------------------------------------------------- *)

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_GetAccel ( hwnd, cAccels, paAccels: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_GetAccel ( hwnd, cAccels, paAccels: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_GetBase ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_GetBase ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_GetBuddy ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_GetBuddy ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_GetPos ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_GetPos ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_GetRange ( hwnd: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_GetRange ( hwnd: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_SetAccel ( hwnd, nAccels, aAccels: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_SetAccel ( hwnd, nAccels, aAccels: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_SetBase ( hwnd, nBase: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_SetBase ( hwnd, nBase: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_SetBuddy ( hwnd, hwndBuddy: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_SetBuddy ( hwnd, hwndBuddy: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_SetPos ( hwnd, nPos: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_SetPos ( hwnd, nPos: ARRAY OF SYSTEM.BYTE );

<* END *>

<* IF __GEN_C__ THEN *>

(* H2D: this procedure corresponds to a macro. *)
PROCEDURE UpDown_SetRange ( hwnd, nUpper, nLower: ARRAY OF SYSTEM.BYTE );

<* ELSE *>

PROCEDURE  / UpDown_SetRange ( hwnd, nUpper, nLower: ARRAY OF SYSTEM.BYTE );

<* END *>

END h2d_comcthlp.