home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / dtx9202 / apisearc / api.dat next >
Encoding:
Text File  |  1991-11-15  |  35.4 KB  |  584 lines
  1. function AccessResource(Instance, ResInfo: THandle): Integer;
  2. function AddAtom(Str: PChar): TAtom;
  3. function AddFontResource(Filename: PChar): Integer;
  4. procedure AdjustWindowRect(var Rect: TRect; Style: LongInt; Menu: Bool);
  5. procedure AdjustWindowRectEx(var Rect: TRect; Style: LongInt; Menu: Bool; ExtStyle: LongInt);
  6. function AllocCStoDSAlias(Selector: Word): Word;
  7. function AllocDStoCSAlias(Selector: Word): Word;
  8. function AllocResource(Instance: THandle; ResInfo: THandle;Size: LongInt): THandle;
  9. function AllocSelector(Selector: Word): Word;
  10. procedure AnimatePalette(Palette: HPalette; StartIndex,    NumEntires: Word;var PaletteColors);
  11. function AnsiLower(Str: PChar): PChar;
  12. function AnsiLowerBuff(Str: PChar; Length: Word): Word;
  13. function AnsiNext(CurrentChar: PChar): PChar;
  14. function AnsiPrev(Start, CurrentChar: PChar): PChar;
  15. function AnsiToOem(AnsiStr, OemStr: PChar): Integer;
  16. procedure AnsiToOemBuff(AnsiStr, OemStr: PChar; Length: Integer);
  17. function AnsiUpper(Str: PChar): PChar;
  18. function AnsiUpperBuff(Str: PChar; Length: Word): Word;
  19. function AnyPopup: Bool;
  20. function AppendMenu(Menu: HMenu; Flags, IDNewItem: Word; NewItem: PChar): Bool;
  21. function Arc(DC: HDC; X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer): Bool;
  22. function ArrangeIconicWindows(Wnd: HWnd): Word;
  23. function BeginDeferWindowPos(NumWindows: Integer): THandle;
  24. function BeginPaint(Wnd: HWnd; var Paint: TPaintStruct): HDC;
  25. function BitBlt(DestDC: HDC; X, Y, nWidth, Height: Integer; SrcDC: HDC;XSrc, YSrc: Integer; Rop: LongInt): Bool;
  26. procedure BringWindowToTop(Wnd: HWnd);
  27. function BuildCommDCB(Def: PChar; var DCB: TDCB): Integer;
  28. function CallMsgFilter(var Msg: TMsg; Code: Integer): Bool;
  29. function CallWindowProc(PrevWndFunc: TFarProc; Wnd: HWnd; Msg, wParam: Word;lParam: LongInt): LongInt;
  30. function Catch(var CatchBuf: TCatchBuf): Integer;
  31. function ChangeClipboardChain(Wnd, WndNext: HWnd): Bool;
  32. function ChangeMenu(A: HMenu; B: Word; C: PChar; D: Word; E: Word): Bool;
  33. function ChangeSelector(DestSelector, SourceSelector: Word): Word;
  34. procedure CheckDlgButton(Dlg: HWnd; IDButton: Integer; Check: Word);
  35. function CheckMenuItem(Menu: HMenu; IDCheckItem, Check: Word): Bool;
  36. procedure CheckRadioButton(Dlg: HWnd; IDFirstButton, IDLastButton,IDCheckButton: Integer);
  37. function ChildWindowFromPoint(Wnd: HWnd; Point: TPoint): HWnd;
  38. function Chord(DC: HDC; X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer): Bool;
  39. function ClearCommBreak(Cid: Integer): Integer;
  40. procedure ClientToScreen(Wnd: HWnd; var Point: TPoint);
  41. procedure ClipCursor(Rect: PRect);
  42. function CloseClipboard: Bool;
  43. function CloseComm(Cid: Integer): Integer;
  44. function CloseMetaFile(DC: THandle): THandle;
  45. procedure CloseSound;
  46. procedure CloseWindow(Wnd: HWnd);
  47. function CombineRgn(DestRgn, SrcRgn1, SrcRgn2: HRgn;CombineMode: Integer): Integer;
  48. function CopyMetaFile(SrcMetaFile: THandle; FileName: PChar): THandle;
  49. procedure CopyRect(var DestRect, SourceRect: TRect);
  50. function CountClipboardFormats: Integer;
  51. function CountVoiceNotes(Voice: Integer): Integer;
  52. function CreateBitmap(Width, Height: Integer; Planes, BitCount: Byte;Bits: Pointer): HBitmap;
  53. function CreateBitmapIndirect(var Bitmap: TBitmap): HBitmap;
  54. function CreateBrushIndirect(var LogBrush: TLogBrush): HBrush;
  55. procedure CreateCaret(Wnd: HWnd; Bitmap: HBitmap; Width, Height: Integer);
  56. function CreateCompatibleBitmap(DC: HDC; Width, Height: Integer): HBitmap;
  57. function CreateCompatibleDC(DC: HDC): HDC;
  58. function CreateCursor(Instance: THandle; Xhotspot, Yhotspot: Integer;Width, Height: Integer; ANDbitPlane, XORbitPlane: Pointer): HCursor;
  59. function CreateDC(DriverName, DeviceName, OutPut: PChar;InitData: Pointer): HDC;
  60. function CreateDialog(Instance: THandle; TemplateName: PChar;WndParent: HWnd; DialogFunc: TFarProc): HWnd;
  61. function CreateDialogIndirect(Instance: THandle; DialogTemplate: Pointer;WndParent: HWnd; DialogFunc: TFarProc): HWnd;
  62. function CreateDialogIndirectParam(Instance: THandle;DialogTemplate: Pointer; WndParent: HWnd; DialogFunc: TFarProc;InitParam: LongInt): HWnd;
  63. function CreateDialogParam(Instance: THandle; TemplateName: PChar;WndParent: HWnd; DialogFunc: TFarProc; InitParam: LongInt): HWnd;
  64. function CreateDIBitmap(DC: HDC; var InfoHeader: TBitmapInfoHeader;dwUsage: LongInt; InitBits: PChar; var InitInfo: TBitmapInfo;wUsage: Word): HBitmap;
  65. function CreateDIBPatternBrush(PackedDIB: THandle; Usage: Word): HBrush;
  66. function CreateDiscardableBitmap(DC: HDC; Width, Height: Integer): HBitmap;
  67. function CreateEllipticRgn(X1, Y1, X2, Y2: Integer): HRgn;
  68. function CreateEllipticRgnIndirect(var Rect: TRect): HRgn;
  69. function CreateFont(Height, Width, Escapement, Orientation,Weight: Integer; Italic, Underline, StrikeOut, CharSet, OutputPrecision,  ClipPrecision, Quality, PitchAndFamily: Byte;Facename: PChar): HFont;
  70. function CreateFontIndirect(var LogFont: TLogFont): HFont;
  71. function CreateHatchBrush(Index: Integer; Color: TColorRef): HBrush;
  72. function CreateIC(DriverName, DeviceName, Output: PChar;InitData: Pointer): HDC;
  73. function CreateIcon(Instance: THandle; Width, Height: Integer;Planes, BitsPixel: Byte; ANDbits, XORbits: Pointer): HIcon;
  74. function CreateMenu: HMenu;
  75. function CreateMetaFile(Filename: PChar): THandle;
  76. function CreatePalette(var LogPalette: TLogPalette): HPalette;
  77. function CreatePatternBrush(Bitmap: HBitmap): HBrush;
  78. function CreatePen(PenStyle, Width: Integer; Color: TColorRef): HPen;
  79. function CreatePenIndirect(var LogPen: TLogPen): HPen;
  80. function CreatePolygonRgn(var Points; Count, PolyFillMode: Integer): HRgn;
  81. function CreatePolyPolygonRgn(var Points; var PolyCounts; Count,PolyFillMode: Integer): HRgn;
  82. function CreatePopupMenu: HMenu;
  83. function CreateRectRgn(X1, Y1, X2, Y2: Integer): HRgn;
  84. function CreateRectRgnIndirect(var Rect: TRect): HRgn;
  85. function CreateRoundRectRgn(X1, Y1, X2, Y2, X3, Y3: Integer): HRgn;
  86. function CreateSolidBrush(Color: TColorRef): HBrush;
  87. function CreateWindow(ClassName, WindowName: PChar; Style: LongInt; X, Y, Width, Height: Integer; WndParent: HWnd; Menu: HMenu;  Instance: THandle; Param: Pointer): HWnd;
  88. function CreateWindowEx(ExStyle: LongInt; ClassName, WindowName: PChar;Style: LongInt; X, Y, Width, Height: Integer; WndParent: HWnd;  Menu: HMenu; Instance: THandle; Param: Pointer): HWnd;
  89. procedure DebugBreak;
  90. function DefDlgProc(Dlg: HWnd; Msg, wParam: Word; lParam: LongInt): LongInt;
  91. function DeferWindowPos(WinPosInfo: THandle; Wnd, WndInsertAfter: HWnd;x, y, cx, cy: Integer; Flags: Word): THandle;
  92. function DefFrameProc(Wnd, WndMDIClient: HWnd; Msg, wParam: Word;lParam: LongInt): LongInt;
  93. function DefHookProc(Code: Integer; wParam: Word; lParam: LongInt;lpfnNextHook: TFarProc): LongInt;
  94. function DefineHandleTable(Offset: Word): Bool;
  95. function DefMDIChildProc(Wnd: HWnd; Msg, wParam: Word;lParam: LongInt): LongInt;
  96. function DefWindowProc(Wnd: HWnd; Msg, wParam: Word;  lParam: LongInt): LongInt;
  97. function DeleteAtom(AnAtom: TAtom): TAtom;
  98. function DeleteDC(DC: HDC): Bool;
  99. function DeleteMenu(Menu: HMenu; Position, Flags: Word): Bool;
  100. function DeleteMetaFile(MF: THandle): Bool;
  101. function DeleteObject(Handle: THandle): Bool;
  102. procedure DestroyCaret;
  103. function DestroyCursor(Cursor: HCursor): Bool;
  104. function DestroyIcon(Icon: HIcon): Bool;
  105. function DestroyMenu(Menu: HMenu): Bool;
  106. function DestroyWindow(Wnd: HWnd): Bool;
  107. function DialogBox(Instance: THandle; Templatename: PChar;  WndParent: HWnd; DialogFunc: TFarProc): Integer;
  108. function DialogBoxIndirect(Instance, DialogTemplate: THandle; WndParent: HWnd; DialogFunc: TFarProc): Integer;
  109. function DialogBoxIndirectParam(Instance, DialogTemplate: THandle; WndParent: HWnd; DialogFunc: TFarProc; InitParam: LongInt): Integer;
  110. function DialogBoxParam(Instance: THandle; TemplateName: PChar;  WndParent: HWnd; DialogFunc: TFarProc; InitParam: LongInt): Integer;
  111. function DispatchMessage(var Msg: TMsg): LongInt;
  112. function DlgDirList(Dlg: HWnd; PathSpec: PChar; IDListBox,  IDStaticPath: Integer; Filetype: Word): Integer;
  113. function DlgDirListComboBox(Dlg: HWnd; PathSpec: PChar; IDComboBox, IDStaticText: Integer; Filetype: Word): Integer;
  114. function DlgDirSelect(Dlg: HWnd; Str: PChar; IDListBox: Integer): Bool;
  115. function DlgDirSelectComboBox(Dlg: HWnd; Str: PChar;  IDComboBox: Integer): Bool;
  116. procedure DOS3Call;
  117. function DPtoLP(DC: HDC; var Points; Count: Integer): Bool;
  118. procedure DrawFocusRect(DC: HDC; var Rect: TRect);
  119. function DrawIcon(DC: HDC; X, Y: Integer; Icon: HIcon): Bool;
  120. procedure DrawMenuBar(Wnd: HWnd);
  121. function DrawText(DC: HDC; Str: PChar; Count: Integer; var Rect: TRect; Format: Word): Integer;
  122. function Ellipse(DC: HDC; X1, Y1, X2, Y2: Integer): Bool;
  123. function EmptyClipboard: Bool;
  124. function EnableHardwareInput(EnableInput: Bool): Bool;
  125. function EnableMenuItem(Menu: HMenu; IDEnableItem: Word;  Enable: Word): Bool;
  126. function EnableWindow(Wnd: HWnd; Enable: Bool): Bool;
  127. procedure EndDeferWindowPos(WinPosInfo: THandle);
  128. procedure EndDialog(Dlg: HWnd; Result: Integer);
  129. procedure EndPaint(Wnd: HWnd; var Paint: TPaintStruct);
  130. function EnumChildWindows(WndParent: HWnd; EnumFunc: TFarProc;lParam: LongInt): Bool;
  131. function EnumClipboardFormats(Format: Word): Word;
  132. function EnumFonts(DC: HDC; Facename: PChar; FontFunc: TFarProc; Data: Pointer): Integer;
  133. function EnumMetaFile(DC: HDC; MF: THandle; CallbackFunc: TFarProc;  ClientData: Pointer): Bool;
  134. function EnumObjects(DC: HDC; ObjectType: Integer; ObjectFunc: TFarProc;  Data: Pointer): Integer;
  135. function EnumProps(Wnd: HWnd; EnumFunc: TFarProc): Integer;
  136. function EnumTaskWindows(Task: THandle; EnumFunc: TFarProc;  lParam: LongInt): Bool;
  137. function EnumWindows(EnumFunc: TFarProc; lParam: LongInt): Bool;
  138. function EqualRect(var Rect1, Rect2: TRect): Bool;
  139. function EqualRgn(SrcRgn1, SrcRgn2: HRgn): Bool;
  140. function Escape(DC: HDC; Escape, Count: Integer; InData,  OutData: Pointer): Integer;
  141. function EscapeCommFunction(Cid: Integer; Func: Integer): Integer;
  142. function ExcludeClipRect(DC: HDC; X1, Y1, X2, Y2: Integer): Integer;
  143. function ExcludeUpdateRgn(DC: HDC; Wnd: HWnd): Integer;
  144. function ExitWindows(Reserved: LongInt; ReturnCode: Word): Bool;
  145. function ExtFloodFill(DC: HDC; X, Y: Integer; Color: TColorRef;  FillType: Word): Bool;
  146. function ExtTextOut(DC: HDC; X, Y: Integer; Options: Word;  Rect: PRect; Str: PChar; Count: Word; Dx: PInteger): Bool;
  147. procedure FatalAppExit(Action: Word; MessageText: PChar);
  148. procedure FatalExit(Code: Integer);
  149. function FillRect(DC: HDC; var Rect: TRect; Brush: HBrush): Integer;
  150. function FillRgn(DC: HDC; Rgn: HRgn; Brush: HBrush): Bool;
  151. function FindAtom(Str: PChar): TAtom;
  152. function FindResource(Instance: THandle; Name, ResType: PChar): THandle;
  153. function FindWindow(Classname, WindowName: PChar): HWnd;
  154. function FlashWindow(Wnd: HWnd; Invert: Bool): Bool;
  155. function FloodFill(DC: HDC; X, Y: Integer; Color: TColorRef): Bool;
  156. function FlushComm(Cid, Queue: Integer): Integer;
  157. procedure FrameRect(DC: HDC; var Rect: TRect; Brush: HBrush);
  158. function FrameRgn(DC: HDC; Rgn: HRgn; Brush: HBrush; Width,  Height: Integer): Bool;
  159. procedure FreeLibrary(LibModule: THandle);
  160. function FreeModule(Module: THandle): Bool;
  161. procedure FreeProcInstance(Proc: TFarProc);
  162. function FreeResource(ResData: THandle): Bool;
  163. function FreeSelector(Selector: Word): Word;
  164. function GetActiveWindow: HWnd;
  165. function GetAspectRatioFilter(DC: HDC): LongInt;
  166. function GetAsyncKeyState(Key: Integer): Integer;
  167. function GetAtomHandle(AnAtom: TAtom): THandle;
  168. function GetAtomName(AnAtom: TAtom; Buffer: PChar; Size: Integer): Word;
  169. function GetBitmapBits(Bitmap: HBitmap; Count: LongInt;  Bits: Pointer): LongInt;
  170. function GetBitmapDimension(Bitmap: HBitmap): LongInt;
  171. function GetBkColor(DC: HDC): LongInt;
  172. function GetBkMode(DC: HDC): Integer;
  173. function GetBrushOrg(DC: HDC): LongInt;
  174. function GetCapture: HWnd;
  175. function GetCaretBlinkTime: Word;
  176. procedure GetCaretPos(var Point: TPoint);
  177. function GetCharWidth(DC: HDC; FirstChar, LastChar: Word;  var Buffer): Bool;
  178. function GetClassInfo(Instance: THandle; ClassInfo: PChar;  var WndClass: TWndClass): Bool;
  179. function GetClassLong(Wnd: HWnd; Index: Integer): LongInt;
  180. function GetClassName(Wnd: HWnd; ClassName: PChar;  MaxCount: Integer): Integer;
  181. function GetClassWord(Wnd: HWnd; Index: Integer): Word;
  182. procedure GetClientRect(Wnd: HWnd; var Rect: TRect);
  183. function GetClipboardData(Format: Word): THandle;
  184. function GetClipboardFormatName(Format: Word; FormatName: PChar;  MaxCount: Integer): Integer;
  185. function GetClipboardOwner: HWnd;
  186. function GetClipboardViewer: HWnd;
  187. function GetClipBox(DC: HDC; var Rect: TRect): Integer;
  188. function GetCodeHandle(Proc: TFarProc): THandle;
  189. procedure GetCodeInfo(Proc: TFarProc; SegInfo: Pointer);
  190. function GetCommError(Cid: Integer; var Stat: TComStat): Integer;
  191. function GetCommEventMask(Cid, EvtMask: Integer): Word;
  192. function GetCommState(Cid: Integer; var DCB: TDCB): Integer;
  193. function GetCurrentPDB: Word;
  194. function GetCurrentPosition(DC: HDC): LongInt;
  195. function GetCurrentTask: THandle;
  196. function GetCurrentTime: LongInt;
  197. procedure GetCursorPos(var Point: TPoint);
  198. function GetDC(Wnd: HWnd): HDC;
  199. function GetDCOrg(DC: HDC): LongInt;
  200. function GetDesktopHwnd: HWnd;
  201. function GetDesktopWindow: HWnd;
  202. function GetDeviceCaps(DC: HDC; Index: Integer): Integer;
  203. function GetDialogBaseUnits: LongInt;
  204. function GetDIBits(DC: HDC; Bitmap: HBitmap; StartScan, NumScans: Word;  Bits: Pointer; var BitInfo: TBitmapInfo; Usage: Word): Integer;
  205. function GetDlgCtrlID(Wnd: HWnd): Integer;
  206. function GetDlgItem(Dlg: HWnd; IDDlgItem: Integer): HWnd;
  207. function GetDlgItemInt(Dlg: HWnd; IDDlgItem: Integer;Translate: PBool; Signed: Bool): Word;
  208. function GetDlgItemText(Dlg: HWnd; IDDlgItem: Integer; Str: PChar;MaxCount: Integer): Integer;
  209. function GetDOSEnvironment: PChar;
  210. function GetDoubleClickTime: Word;
  211. function GetDriveType(Drive: Integer): Word;
  212. function GetEnvironment(PortName: PChar; Environ: Pointer; MaxCount: Word): Integer;
  213. function GetFocus: HWnd;
  214. function GetFreeSpace(Flag: Word): LongInt;
  215. function GetInputState: Bool;
  216. function GetInstanceData(Instance: THandle; Data: Word; Count: Integer): Integer;
  217. function GetKBCodePage: Integer;
  218. procedure GetKeyboardState(var KeyState: TKeyboardState);
  219. function GetKeyboardType(TypeFlag: Integer): Integer;
  220. function GetKeyNameText(lParam: LongInt; Buffer: PChar; Size: Integer): Integer;
  221. function GetKeyState(VirtKey: Integer): Integer;
  222. function GetLastActivePopup(Owner: HWnd): HWnd;
  223. function GetMapMode(DC: HDC): Integer;
  224. function GetMenu(Wnd: HWnd): HMenu;
  225. function GetMenuCheckMarkDimensions: LongInt;
  226. function GetMenuItemCount(Menu: HMenu): Word;
  227. function GetMenuItemID(Menu: HMenu; Pos: Integer): Word;
  228. function GetMenuState(Menu: HMenu; Id, Flags: Word): Word;
  229. function GetMenuString(Menu: HMenu; IDItem: Word; Str: PChar;  MaxCount: Integer; Flag: Word): Integer;
  230. function GetMessage(var Msg: TMsg; Wnd: HWnd; MsgFilterMin,MsgFilterMax: Word): Bool;
  231. function GetMessagePos: LongInt;
  232. function GetMessageTime: LongInt;
  233. function GetMetaFile(Filename: PChar): THandle;
  234. function GetMetaFileBits(MF: THandle): THandle;
  235. function GetModuleFileName(Module: THandle; Filename: PChar; Size: Integer): Integer;
  236. function GetModuleHandle(ModuleName: PChar): THandle;
  237. function GetModuleUsage(Module: THandle): Integer;
  238. function GetNearestColor(DC: HDC; Color: TColorRef): TColorRef;
  239. function GetNearestPaletteIndex(Palette: HPalette; Color: TColorRef): Word;
  240. function GetNextDlgGroupItem(Dlg, Ctl: HWnd; Previous: Bool): HWnd;
  241. function GetNextDlgTabItem(Dlg, Ctl: HWnd; Previous: Bool): HWnd;
  242. function GetNextWindow(Wnd: HWnd; Flag: Word): HWnd;
  243. function GetNumTasks: Word;
  244. function GetObject(hObject: THandle; Count: Integer;lpObject: Pointer): Integer;
  245. function GetPaletteEntries(Palette: HPalette; StartIndex, NumEntries: Word;var PaletteEntries): Word;
  246. function GetParent(Wnd: HWnd): HWnd;
  247. function GetPixel(DC: HDC; X, Y: Integer): TColorRef;
  248. function GetPolyFillMode(DC: HDC): Integer;
  249. function GetPriorityClipboardFormat(var PriorityList; Count: Integer): Integer;
  250. function GetPrivateProfileInt(ApplicationName, KeyName: PChar;Default: Integer; FileName: PChar): Integer;
  251. function GetPrivateProfileString(ApplicationName, KeyName: PChar;Default: PChar; ReturnedString: PChar; Size: Integer;FileName: PChar): Integer;
  252. function GetProcAddress(Module: THandle; ProcName: PChar): TFarProc;
  253. function GetProfileInt(AppName, KeyName: PChar;  Default: Integer): Word;
  254. function GetProfileString(AppName, KeyName, Default, ReturnedString: PChar;  Size: Integer): Integer;
  255. function GetProp(Wnd: HWnd; Str: PChar): THandle;
  256. function GetRgnBox(Rgn: HRgn; var Rect: TRect): Integer;
  257. function GetROP2(DC: HDC): Integer;
  258. function GetScrollPos(Wnd: HWnd; Bar: Integer): Integer;
  259. procedure GetScrollRange(Wnd: HWnd; Bar: Integer; var MinPos,  MaxPos: Integer);
  260. function GetStockObject(Index: Integer): THandle;
  261. function GetStretchBltMode(DC: HDC): Integer;
  262. function GetSubMenu(Menu: HMenu; Pos: Integer): HMenu;
  263. function GetSysColor(Index: Integer): TColorRef;
  264. function GetSysModalWindow: HWnd;
  265. function GetSystemDirectory(Buffer: PChar; Size: Word): Word;
  266. function GetSystemMenu(Wnd: HWnd; bRevert: Bool): HMenu;
  267. function GetSystemMetrics(Index: Integer): Integer;
  268. function GetSystemPaletteEntries(DC: HDC; StartIndex, NumEntries: Word;var PaletteEntries): Word;
  269. function GetSystemPaletteUse(DC: HDC): Word;
  270. function GetTabbedTextExtent(DC: HDC; Str: PChar; Count: Integer;TabPostions: Integer; var TabStopPostions): LongInt;
  271. function GetTempDrive(DriveLetter: Char): Char;
  272. function GetTempFileName(DriveLetter: Char; PrefixString: PChar;Unique: Word; TempFileName: PChar): Integer;
  273. function GetTextAlign(DC: HDC): Word;
  274. function GetTextCharacterExtra(DC: HDC): Integer;
  275. function GetTextColor(DC: HDC): TColorRef;
  276. function GetTextExtent(DC: HDC; Str: PChar; Count: Integer): LongInt;
  277. function GetTextFace(DC: HDC; Count: Integer; Facename: PChar): Integer;
  278. function GetTextMetrics(DC: HDC; var Metrics: TTextMetric): Bool;
  279. function GetThresholdEvent: PInteger;
  280. function GetThresholdStatus: Integer;
  281. function GetTickCount: LongInt;
  282. function GetTopWindow(Wnd: HWnd): HWnd;
  283. function GetUpdateRect(Wnd: HWnd; var Rect: TRect; Erase: Bool): Bool;
  284. function GetUpdateRgn(Wnd: HWnd; Rgn: HRgn; Erase: Bool): Integer;
  285. function GetVersion: Word;
  286. function GetViewportExt(DC: HDC): LongInt;
  287. function GetViewportOrg(DC: HDC): LongInt;
  288. function GetWindow(Wnd: HWnd; Cmd: Word): HWnd;
  289. function GetWindowDC(Wnd: HWnd): HDC;
  290. function GetWindowExt(DC: HDC): LongInt;
  291. function GetWindowLong(Wnd: HWnd; Index: Integer): LongInt;
  292. function GetWindowOrg(DC: HDC): LongInt;
  293. procedure GetWindowRect(Wnd: HWnd; var Rect: TRect);
  294. function GetWindowsDirectory(Buffer: PChar; Size: Word): Word;
  295. function GetWindowTask(Wnd: HWnd): THandle;
  296. function GetWindowText(Wnd: HWnd; Str: PChar;MaxCount: Integer): Integer;
  297. function GetWindowTextLength(Wnd: HWnd): Integer;
  298. function GetWindowWord(Wnd: HWnd; Index: Integer): Word;
  299. function GetWinFlags: LongInt;
  300. function GlobalAddAtom(Str: PChar): TAtom;
  301. function GlobalAlloc(Flags: Word; Bytes: LongInt): THandle;
  302. function GlobalCompact(MinFree: LongInt): LongInt;
  303. function GlobalDeleteAtom(AnAtom: TAtom): TAtom;
  304. function GlobalDiscard(Mem: THandle): THandle;
  305. function GlobalDosAlloc(Bytes: LongInt): LongInt;
  306. function GlobalDosFree(Selector: Word): Word;
  307. function GlobalFindAtom(Str: PChar): TAtom;
  308. procedure GlobalFix(Mem: THandle);
  309. function GlobalFlags(Mem: THandle): Word;
  310. function GlobalFree(Mem: THandle): THandle;
  311. function GlobalGetAtomName(AnAtom: TAtom; Buffer: PChar; Size: Integer): Word;
  312. function GlobalHandle(Mem: Word): LongInt;
  313. function GlobalLock(Mem: THandle): Pointer;
  314. function GlobalLRUNewest(Mem: THandle): THandle;
  315. function GlobalLRUOldest(Mem: THandle): THandle;
  316. procedure GlobalNotify(NotifyProc: TFarProc);
  317. function GlobalPageLock(Selector: THandle): Word;
  318. function GlobalPageUnlock(Selector: THandle): Word;
  319. function GlobalReAlloc(Mem: THandle; Bytes: LongInt; Flags: Word): THandle;
  320. function GlobalSize(Mem: THandle): LongInt;
  321. function GlobalUnfix(Mem: THandle): Bool;
  322. function GlobalUnlock(Mem: THandle): Bool;
  323. function GlobalUnWire(Mem: THandle): Bool;
  324. function GlobalWire(Mem: THandle): Pointer;
  325. function GrayString(DC: HDC; Brush: HBrush; OutputFunc: TFarProc;  Data: LongInt; Count, X, Y, Width, Height: Integer): Bool;
  326. procedure HideCaret(Wnd: HWnd);
  327. function HiliteMenuItem(Wnd: HWnd; Menu: HMenu; IDHilite,Hilite: Word): Bool;
  328. procedure InflateRect(var Rect: TRect; X, Y: Integer);
  329. function InitAtomTable(Size: Integer): Bool;
  330. function InSendMessage: Bool;
  331. function InsertMenu(Menu: HMenu; Position, Flags, IDNewItem: Word;  NewItem: PChar): Bool;
  332. function IntersectClipRect(DC: HDC; X1, Y1, X2, Y2: Integer): Integer;
  333. function IntersectRect(var DestRect, Src1Rect, Src2Rect: TRect): Integer;
  334. procedure InvalidateRect(Wnd: HWnd; Rect: PRect; Erase: Bool);
  335. procedure InvalidateRgn(Wnd: HWnd; Rgn: HRgn; Erase: Bool);
  336. procedure InvertRect(DC: HDC; var Rect: TRect);
  337. function InvertRgn(DC: HDC; Rgn: HRgn): Bool;
  338. function IsCharAlpha(Chr: Char): Bool;
  339. function IsCharAlphaNumeric(Chr: Char): Bool;
  340. function IsCharLower(Chr: Char): Bool;
  341. function IsCharUpper(Chr: Char): Bool;
  342. function IsChild(WndParent, Wnd: HWnd): Bool;
  343. function IsClipboardFormatAvailable(Format: Word): Bool;
  344. function IsDialogMessage(Dlg: HWnd; var Msg: TMsg): Bool;
  345. function IsDlgButtonChecked(Wnd: HWnd; IDButton: Integer): Word;
  346. function IsIconic(Wnd: HWnd): Bool;
  347. function IsRectEmpty(var Rect: TRect): Bool;
  348. function IsTwoByteCharPrefix(Chr: Char): Bool;
  349. function IsWindow(Wnd: HWnd): Bool;
  350. function IsWindowEnabled(Wnd: HWnd): Bool;
  351. function IsWindowVisible(Wnd: HWnd): Bool;
  352. function IsZoomed(Wnd: HWnd): Bool;
  353. function KillTimer(Wnd: HWnd; IDEvent: Integer): Bool;
  354. procedure LimitEmsPages(Kbytes: LongInt);
  355. procedure LineDDA(X1, Y1, X2, Y2: Integer; LineFunc: TFarProc;  Data: Pointer);
  356. function LineTo(DC: HDC; X, Y: Integer): Bool;
  357. function LoadAccelerators(Instance: THandle; TableName: PChar): THandle;
  358. function LoadBitmap(Instance: THandle; BitmapName: PChar): HBitmap;
  359. function LoadCursor(Instance: THandle; CursorName: PChar): HCursor;
  360. function LoadIcon(Instance: THandle; IconName: PChar): HIcon;
  361. function LoadLibrary(LibFileName: PChar): THandle;
  362. function LoadMenu(Instance: THandle; MenuName: PChar): HMenu;
  363. function LoadMenuIndirect(MenuTemplate: Pointer): HMenu;
  364. function LoadModule(ModuleName: PChar; ParameterBlock: Pointer): THandle;
  365. function LoadResource(Instance: THandle; ResInfo: THandle): THandle;
  366. function LoadString(Instance: THandle; ID: Word; Buffer: PChar;  BufferMax: Integer): Integer;
  367. function LocalAlloc(Flags, Bytes: Word): THandle;
  368. function LocalCompact(MinFree: Word): Word;
  369. function LocalDiscard(Mem: THandle): THandle;
  370. function LocalFlags(Mem: THandle): Word;
  371. function LocalFree(Mem: THandle): THandle;
  372. function LocalHandle(Mem: Word): THandle;
  373. function LocalInit(Segment, Start, EndPos: Word): Bool;
  374. function LocalLock(Mem: THandle): Pointer;
  375. function LocalNotify(NotifyProc: TFarProc): TFarProc;
  376. function LocalReAlloc(Mem: THandle; Bytes, Flags: Word): THandle;
  377. function LocalShrink(Seg: THandle; Size: Word): Word;
  378. function LocalSize(Mem: THandle): Word;
  379. function LocalUnlock(Mem: THandle): Bool;
  380. function LockData(Dummy: Integer): THandle;
  381. function LockResource(ResData: THandle): Pointer;
  382. function LockSegment(Segment: Word): THandle;
  383. function LPtoDP(DC: HDC; var Points; Count: Integer): Bool;
  384. function lstrcat(Str1, Str2: PChar): PChar;
  385. function lstrcmp(Str1, Str2: PChar): Integer;
  386. function lstrcmpi(Str1, Str2: PChar): Integer;
  387. function lstrcpy(Str1, Str2: PChar): PChar;
  388. function lstrlen(Str: PChar): Integer;
  389. function MakeProcInstance(Proc: TFarProc; Instance: THandle): TFarProc;
  390. procedure MapDialogRect(Dlg: HWnd; var Rect: TRect);
  391. function MapVirtualKey(Code, MapType: Word): Word;
  392. procedure MessageBeep(BeepType: Word);
  393. function MessageBox(WndParent: HWnd; Txt, Caption: PChar;  TextType: Word): Integer;
  394. function ModifyMenu(Menu: HMenu; Position, Flags, IDNewItem: Word;  NewItem: PChar): Bool;
  395. function MoveTo(DC: HDC; X, Y: Integer): LongInt;
  396. procedure MoveWindow(Wnd: HWnd; X, Y, Width, Height: Integer; Repaint: Bool);
  397. function MulDiv(Number: Integer; Numerator: Integer;  Denominator: Integer): Integer;
  398. procedure NetBIOSCall;
  399. function OemKeyScan(OemChar: Word): LongInt;
  400. function OemToAnsi(OemStr, AnsiStr: PChar): Bool;
  401. procedure OemToAnsiBuff(OemStr, AnsiStr: PChar; Length: Integer);
  402. function OffsetClipRgn(DC: HDC; X, Y: Integer): Integer;
  403. procedure OffsetRect(var Rect: TRect; X, Y: Integer);
  404. function OffsetRgn(Rgn: HRgn; X, Y: Integer): Integer;
  405. function OffsetViewportOrg(DC: HDC; X, Y: Integer): LongInt;
  406. function OffsetWindowOrg(DC: HDC; X, Y: Integer): LongInt;
  407. function OpenClipboard(Wnd: HWnd): Bool;
  408. function OpenComm(ComName: PChar; InQueue, OutQueue: Word): Integer;
  409. function OpenFile(FileName: PChar; var ReOpenBuff: TOfStruct;  Style: Word): Integer;
  410. function OpenIcon(Wnd: HWnd): Bool;
  411. function OpenSound: Integer;
  412. procedure OutputDebugString(OutputString: PChar);
  413. function PaintRgn(DC: HDC; Rgn: HRgn): Bool;
  414. function PatBlt(DC: HDC; X, Y, Width, Height: Integer; Rop: LongInt): Bool;
  415. function PeekMessage(var Msg: TMsg; Wnd: HWnd; MsgFilterMin,  MsgFilterMax: Word; RemoveMsg: Word): Bool;
  416. function Pie(DC: HDC; X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer): Bool;
  417. function PlayMetaFile(DC: HDC; MF: THandle): Bool;
  418. procedure PlayMetaFileRecord(DC: HDC; var HandleTable: THandleTable;  var MetaRecord: TMetaRecord; Handles: Word);
  419. function Polygon(DC: HDC; var Points; Count: Integer): Bool;
  420. function Polyline(DC: HDC; var Points; Count: Integer): Bool;
  421. function PolyPolygon(DC: HDC; var Points; var PolyCounts;  Count: Integer): Bool;
  422. function PostAppMessage(Task: THandle; Msg, wParam: Word;  lParam: LongInt): Bool;
  423. function PostMessage(Wnd: HWnd; Msg, wParam: Word; lParam: LongInt): Bool;
  424. procedure PostQuitMessage(ExitCode: Integer);
  425. function PtInRect(var Rect: TRect; Point: TPoint): Bool;
  426. function PtInRegion(Rgn: HRgn; X, Y: Integer): Bool;
  427. function PtVisible(DC: HDC; X, Y: Integer): Bool;
  428. function ReadComm(Cid: Integer; Buf: PChar; Size: Integer): Integer;
  429. function RealizePalette(DC: HDC): Word;
  430. function Rectangle(DC: HDC; X1, Y1, X2, Y2: Integer): Bool;
  431. function RectInRegion(Rgn: HRgn; var Rect: TRect): Bool;
  432. function RectVisible(DC: HDC; var Rect: TRect): Bool;
  433. function RegisterClass(var WndClass: TWndClass): Bool;
  434. function RegisterClipboardFormat(FormatName: PChar): Word;
  435. function RegisterWindowMessage(Str: PChar): Word;
  436. procedure ReleaseCapture;
  437. function ReleaseDC(Wnd: HWnd; DC: HDC): Integer;
  438. function RemoveFontResource(Filename: PChar): Bool;
  439. function RemoveMenu(Menu: HMenu; Position, Flags: Word): Bool;
  440. function RemoveProp(Wnd: HWnd; Str: PChar): THandle;
  441. procedure ReplyMessage(Reply: LongInt);
  442. function ResizePalette(Palette: HPalette; NumEntries: Word): Bool;
  443. function RestoreDC(DC: HDC; SavedDC: Integer): Bool;
  444. function RoundRect(DC: HDC; X1, Y1, X2, Y2, X3, Y3: Integer): Bool;
  445. function SaveDC(DC: HDC): Integer;
  446. function ScaleViewportExt(DC: HDC; Xnum, Xdenom, Ynum,  Ydenom: Integer): LongInt;
  447. function ScaleWindowExt(DC: HDC; Xnum, Xdenom, Ynum, Ydenom: Integer): LongInt;
  448. procedure ScreenToClient(Wnd: HWnd; var Point: TPoint);
  449. function ScrollDC(DC: HDC; dx, dy: Integer; var Scroll, Clip: TRect;  UpdateRgn: HRgn; UpdateRect: PRect): Bool;
  450. procedure ScrollWindow(Wnd: HWnd; XAmount, YAmount: Integer; Rect: PRect;  ClipRect: PRect);
  451. function SelectClipRgn(DC: HDC; Rgn: HRgn): Integer;
  452. function SelectObject(DC: HDC; hObject: THandle): THandle;
  453. function SelectPalette(DC: HDC; Palette: HPalette;  ForceBackground: Bool): HPalette;
  454. function SendDlgItemMessage(Dlg: HWnd; IDDlgItem: Integer; Msg, wParam: Word;  lParam: LongInt): LongInt;
  455. function SendMessage(Wnd: HWnd; Msg, wParam: Word; lParam: LongInt): LongInt;
  456. function SetActiveWindow(Wnd: HWnd): HWnd;
  457. function SetBitmapBits(Bitmap: HBitmap; Count: LongInt; Bits: Pointer): LongInt;
  458. function SetBitmapDimension(Bitmap: HBitmap; X, Y: Integer): LongInt;
  459. function SetBkColor(DC: HDC; Color: TColorRef): TColorRef;
  460. function SetBkMode(DC: HDC; BkMode: Integer): Integer;
  461. function SetBrushOrg(DC: HDC; X, Y: Integer): LongInt;
  462. function SetCapture(Wnd: HWnd): HWnd;
  463. procedure SetCaretBlinkTime(MSeconds: Word);
  464. procedure SetCaretPos(X, Y: Integer);
  465. function SetClassLong(Wnd: HWnd; Index: Integer; NewLong: LongInt): LongInt;
  466. function SetClassWord(Wnd: HWnd; Index: Integer; NewWord: Word): Word;
  467. function SetClipboardData(Format: Word; Mem: THandle): THandle;
  468. function SetClipboardViewer(Wnd: HWnd): HWnd;
  469. function SetCommBreak(Cid: Integer): Integer;
  470. function SetCommEventMask(Cid: Integer; EvtMask: Word): PWord;
  471. function SetCommState(var DCB: TDCB): Integer;
  472. function SetCursor(Cursor: HCursor): HCursor;
  473. procedure SetCursorPos(X, Y: Integer);
  474. function SetDIBits(DC: HDC; Bitmap: THandle; StartScan, NumScans: Word;  Bits: Pointer; var BitsInfo: TBitmapInfo; Usage: Word): Integer;
  475. function SetDIBitsToDevice(DC: HDC; DestX, DestY, Width, Height, SrcX, SrcY,  nStartScan, NumScans: Word; Bits: Pointer; var BitsInfo: TBitmapInfo;  Usage: Word): Integer;
  476. procedure SetDlgItemInt(Dlg: HWnd; IDDlgItem: Integer; Value: Word;
  477.   Signed: Bool);
  478. procedure SetDlgItemText(Dlg: HWnd; IDDlgItem: Integer; Str: PChar);
  479. procedure SetDoubleClickTime(Count: Word);
  480. function SetEnvironment(PortName: PChar; Environ: Pointer;  Count: Word): Integer;
  481. function SetErrorMode(Mode: Word): Word;
  482. function SetFocus(Wnd: HWnd): HWnd;
  483. function SetHandleCount(Number: Word): Word;
  484. procedure SetKeyboardState(var KeyState: TKeyboardState);
  485. function SetMapMode(DC: HDC; MapMode: Integer): Integer;
  486. function SetMapperFlags(DC: HDC; Flag: LongInt): LongInt;
  487. function SetMenu(Wnd: HWnd; Menu: HMenu): Bool;
  488. function SetMenuItemBitmaps(Menu: HMenu; Position, Flags: Word;  BitmapUnchecked, BitmapChecked: HBitmap): Bool;
  489. function SetMessageQueue(Msg: Integer): Bool;
  490. function SetMetaFileBits(Mem: THandle): THandle;
  491. function SetPaletteEntries(Palette: HPalette; StartIndex, NumEntries: Word;  var PaletteEntries): Word;
  492. function SetParent(WndChild: HWnd; WndNewParent: HWnd): HWnd;
  493. function SetPixel(DC: HDC; X, Y: Integer; Color: TColorRef): LongInt;
  494. function SetPolyFillMode(DC: HDC; PolyFillMode: Integer): Integer;
  495. function SetProp(Wnd: HWnd; Str: PChar; Data: THandle): Bool;
  496. procedure SetRect(var Rect: TRect; X1, Y1, X2, Y2: Integer);
  497. procedure SetRectEmpty(var Rect: TRect);
  498. procedure SetRectRgn(Rgn: HRgn; X1, Y1, X2, Y2: Integer);
  499. function SetResourceHandler(Instance: THandle; ResType: Pointer;  LoadFunc: TFarProc): TFarProc;
  500. function SetROP2(DC: HDC; DrawMode: Integer): Integer;
  501. function SetScrollPos(Wnd: HWnd; Bar, Pos: Integer; Redraw: Bool): Integer;
  502. procedure SetScrollRange(Wnd: HWnd; Bar, MinPos, MaxPos: Integer;  Redraw: Bool);
  503. function SetSoundNoise(Source, Duration: Integer): Integer;
  504. function SetStretchBltMode(DC: HDC; StretchMode: Integer): Integer;
  505. function SetSwapAreaSize(Size: Word): LongInt;
  506. procedure SetSysColors(Changes: Integer; var SysColor; var ColorValues);
  507. function SetSysModalWindow(Wnd: HWnd): HWnd;
  508. function SetSystemPaletteUse(DC: HDC; Usage: Word): Word;
  509. function SetTextAlign(DC: HDC; Flags: Word): Word;
  510. function SetTextCharacterExtra(DC: HDC; CharExtra: Integer): Integer;
  511. function SetTextColor(DC: HDC; Color: TColorRef): TColorRef;
  512. function SetTextJustification(DC: HDC; BreakExtra,  BreakCount: Integer): Integer;
  513. function SetTimer(Wnd: HWnd; IDEvent: Integer; Elapse: Word;  TimerFunc: TFarProc): Word;
  514. function SetViewportExt(DC: HDC; X, Y: Integer): LongInt;
  515. function SetViewportOrg(DC: HDC; X, Y: Integer): LongInt;
  516. function SetVoiceAccent(Voice, Tempo, Volume, Mode, Pitch: Integer): Integer;
  517. function SetVoiceEnvelope(Voice, Shape, RepeatCount: Integer): Integer;
  518. function SetVoiceNote(Voice, Value, Length, Cdots: Integer): Integer;
  519. function SetVoiceQueueSize(Voice, Bytes: Integer): Integer;
  520. function SetVoiceSound(Voice: Integer; Frequency: LongInt;  Duration: Integer): Integer;
  521. function SetVoiceThreshold(Voice, Notes: Integer): Integer;
  522. function SetWindowExt(DC: HDC; X, Y: Integer): LongInt;
  523. function SetWindowLong(Wnd: HWnd; Index: Integer; NewLong: LongInt): LongInt;
  524. function SetWindowOrg(DC: HDC; X, Y: Integer): LongInt;
  525. procedure SetWindowPos(Wnd: HWnd; WndInsertAfter: HWnd; X, Y, cx, cy: Integer;  Flags: Word);
  526. function SetWindowsHook(FilterType: Integer; FilterFunc: TFarProc): TFarProc;
  527. procedure SetWindowText(Wnd: HWnd; Str: PChar);
  528. function SetWindowWord(Wnd: HWnd; Index: Integer; NewWord: Word): Word;
  529. procedure ShowCaret(Wnd: HWnd);
  530. function ShowCursor(Show: Bool): Integer;
  531. procedure ShowOwnedPopups(Wnd: HWnd; Show: Bool);
  532. procedure ShowScrollBar(Wnd: HWnd; Bar: Word; Show: Bool);
  533. function ShowWindow(Wnd: HWnd; CmdShow: Integer): Bool;
  534. function SizeofResource(Instance, ResInfo: THandle): Word;
  535. function StartSound: Integer;
  536. function StopSound: Integer;
  537. function StretchBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC;  XSrc, YSrc, SrcWidth, SrcHeight: Integer; Rop: LongInt): Bool;
  538. function StretchDIBits(DC: HDC; DestX, DestY, DestWidth, DestHegiht, SrcX,  SrcY, SrcWidth, SrcHeight: Word; Bits: Pointer; var BitsInfo: TBitmapInfo;  Usage: Word; Rop: LongInt): Integer;
  539. function SwapMouseButton(Swap: Bool): Bool;
  540. procedure SwapRecording(Flag: Word);
  541. procedure SwitchStackBack;
  542. procedure SwitchStackTo(StackSegment, StackPointer, StackTop: Word);
  543. function SyncAllVoices: Integer;
  544. function TabbedTextOut(HC: HDC; X, Y: Integer; Str: PChar; Count: Integer;  TabPositions: Integer; var TabStopPositions; TabOrigin: Integer): LongInt;
  545. function TextOut(DC: HDC; X, Y: Integer; Str: PChar; Count: Integer): Bool;
  546. procedure Throw(var CatchBuf: TCatchBuf; ThrowBack: Integer);
  547. function ToAscii(VirtKey, ScanCode: Word; KeyState: PChar; Char: Pointer;  Flags: Word): integer;
  548. function TrackPopupMenu(Menu: HMenu; Flags: Word; x, y, Reserved: Integer;  Wnd: HWnd; Reserved: Pointer): Bool;
  549. function TranslateAccelerator(Wnd: HWnd; AccTable: THandle;  var Msg: TMsg): Integer;
  550. function TranslateMDISysAccel(Wnd: HWnd; var Msg: TMsg): Bool;
  551. function TranslateMessage(var Msg: TMsg): Bool;
  552. function TransmitCommChar(Cid: Integer; Chr: Char): Integer;
  553. function UngetCommChar(Cid: Integer; Chr: Char): Integer;
  554. function UnhookWindowsHook(Hook: Integer; HookFunc: TFarProc): Bool;
  555. function UnionRect(var DestRect, Src1Rect, Src2Rect: TRect): Integer;
  556. function UnlockData(Dummy: Integer): THandle;
  557. function UnlockResource(ResData: THandle): Bool;
  558. function UnlockSegment(Segment: Word): THandle;
  559. function UnrealizeObject(hObject: HBrush): Bool;
  560. function UnregisterClass(ClassName: PChar; Instance: THandle): Bool;
  561. function UpdateColors(DC: HDC): Integer;
  562. procedure UpdateWindow(Wnd: HWnd);
  563. procedure ValidateCodeSegments;
  564. function ValidateFreeSpaces: Pointer;
  565. procedure ValidateRect(Wnd: HWnd; Rect: PRect);
  566. procedure ValidateRgn(Wnd: HWnd; Rgn: HRgn);
  567. function VkKeyScan(Chr: Word): Word;
  568. procedure WaitMessage;
  569. function WaitSoundState(State: Integer): Integer;
  570. function WindowFromPoint(Point: TPoint): HWnd;
  571. function WinExec(CmdLine: PChar; CmdShow: Word): Word;
  572. function WinHelp(Wnd: HWnd; HelpFile: PChar; Command: Word;  Data: LongInt): Bool;
  573. function WriteComm(Cid: Integer; Buf: PChar; Size: Integer): Integer;
  574. function WritePrivateProfileString(ApplicationName, KeyName, Str,  FileName: PChar): Bool;
  575. function WriteProfileString(ApplicationName, KeyName, Str: PChar): Bool;
  576. function wvsprintf(DestStr, Format: PChar; var ArgList): Integer;
  577. function Yield: Bool;
  578. function _lclose(FileHandle: Integer): Integer;
  579. function _lcreat(PathName: PChar; Atribute: Integer): Integer;
  580. function _llseek(FileHandle: Integer; Offset: LongInt;  Origin: Integer): LongInt;
  581. function _lopen(PathName: PChar; ReadWrite: Integer): Integer;
  582. function _lread(FileHandle: Integer; Buffer: PChar; Bytes: Integer): Word;
  583. function _lwrite(FileHandle: Integer; Buffer: PChar; Bytes: Integer): Word;
  584.