Category : BASIC Source Code
Archive   : APIHELPR.ZIP
Filename : API_CALL.DAT

Function AbortDoc Lib "GDI" (ByVal hDC%) As Integer Function AccessResource Lib "Kernel" (ByVal hInstance%, ByVal hResInfo%) As Integer Function AddAtom Lib "Kernel" (ByVal lpString$) As Integer Function AddFontResource Lib "GDI" (ByVal lpFilename As Any) As Integer Sub AdjustWindowRect Lib "User" (lpRect As RECT, ByVal dwStyle&, ByVal bMenu%) Sub AdjustWindowRectEx Lib "User" (lpRect As RECT, ByVal dsStyle&, ByVal bMenu%, ByVal dwEsStyle&) Function AllocDStoCSAlias Lib "Kernel" (ByVal wSelector%) As Integer Function AllocResource Lib "Kernel" (ByVal hInstance%, ByVal hResInfo%, ByVal dwSize&) As Integer Function AllocSelector Lib "Kernel" (ByVal wSelector%) As Integer Sub AnimatePalette Lib "GDI" (ByVal hPalette%, ByVal wStartIndex%, ByVal wNumEntries%, lpPaletteColors As PALETTEENTRY) Function AnsiLower Lib "User" (ByVal lpString$) As Long Function AnsiLowerBuff Lib "User" (ByVal lpString$, ByVal aWORD%) As Integer Function AnsiNext Lib "User" (ByVal lpString$) As Long Function AnsiPrev Lib "User" (ByVal lpString$, ByVal lpString$) As Long Function AnsiToOem Lib "Keyboard" (ByVal lpAnsiStr$, ByVal lpOemStr$) As Integer Sub AnsiToOemBuff Lib "Keyboard" (ByVal lpAnsiStr$, ByVal lpOemStr$, ByVal nLength%) Function AnsiUpper Lib "User" (ByVal lpString$) As String Function AnsiUpperBuff Lib "User" (ByVal lpString$, ByVal aWORD%) As Integer Function AnyPopup Lib "User" () As Integer Function AppendMenu Lib "User" (ByVal hMenu%, ByVal wFlags%, ByVal wIDNewItem%, ByVal lpNewItem As Any) As Integer Function Arc Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%, ByVal X3%, ByVal Y3%, ByVal X4%, ByVal Y4%) As Integer Function ArrangeIconicWindows Lib "User" (ByVal hWnd%) As Integer Function BeginDeferWindowPos Lib "User" (ByVal nNumWindows%) As Integer Function BeginPaint Lib "User" (ByVal hWnd%, lpPaint As PAINTSTRUCT) As Integer Function BitBlt Lib "GDI" (ByVal hDestDC%, ByVal X%, ByVal Y%, ByVal nWidth%, ByVal nHeight%, ByVal hSrcDC%, ByVal XSrc%, ByVal YSrc%, ByVal dwRop&) As Integer Sub BringWindowToTop Lib "User" (ByVal hWnd%) Function BuildCommDCB Lib "User" (ByVal lpDef$, lpDCB As DCB) As Integer Function CallMsgFilter Lib "User" (lpMsg As MSG, ByVal nCode%) As Integer Function CallNextHookEx Lib "User" (ByVal hHook%, ByVal ncode%, ByVal wParam%, lParam As Any) As Long Function Catch Lib "Kernel" (lpCatchBuf As Any) As Integer Function ChangeClipboardChain Lib "User" (ByVal hWnd%, ByVal hWndNext%) As Integer Function ChangeMenu Lib "User" (ByVal hMenu%, ByVal wID%, ByVal lpszNew$, ByVal wIDNew%, ByVal wChange%) As Integer Function ChangeSelector Lib "Kernel" (ByVal wDestSelector%, ByVal wSourceSelector%) As Integer Sub CheckDlgButton Lib "User" (ByVal hDlg%, ByVal nIDButton%, ByVal wCheck%) Function CheckMenuItem Lib "User" (ByVal hMenu%, ByVal wIDCheckItem%, ByVal wCheck%) As Integer Sub CheckRadioButton Lib "User" (ByVal hDlg%, ByVal nIDFirstButton%, ByVal nIDLastButton%, ByVal nIDCheckButton%) Function ChildWindowFromPoint Lib "User" (ByVal hWnd%, ByVal ptScreen As Any) As Integer Function ChooseColor Lib "Commdlg.dll" (lpCC As CHOOSECOLOR) As Integer Function ChooseFont Lib "Commdlg.dll" (lpCF As CHOOSEFONT) As Integer Function Chord Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%, ByVal X3%, ByVal Y3%, ByVal X4%, ByVal Y4%) As Integer Function ClearCommBreak Lib "User" (ByVal nCid%) As Integer Sub ClientToScreen Lib "User" (ByVal hWnd%, lpPoint As POINTAPI) Sub ClipCursor Lib "User" (lpRect As Any) Function CloseClipboard Lib "User" () As Integer Function CloseComm Lib "User" (ByVal nCid%) As Integer Function CloseDriver Lib "User" (ByVal hdrvr%, lParam1 As Any, lParam2 As Any) As Long Function CloseMetaFile Lib "GDI" (ByVal hMF%) As Integer Sub CloseSound Lib "Sound" () Sub CloseWindow Lib "User" (ByVal hWnd%) Function CombineRgn Lib "GDI" (ByVal hDestRgn%, ByVal hSrcRgn1%, ByVal hSrcRgn2%, ByVal nCombineMode%) As Integer Function CommDlgExtendedError Lib "Commdlg.dll" () As Long Function CopyCursor Lib "User" (ByVal hinst%, ByVal hcur%) As Integer Function CopyIcon Lib "User" (ByVal hinst%, ByVal hicon%) As Integer Function CopyLZFile Lib "LZexpand.dll" (ByVal hfSource%, ByVal hfDest%) As Long Function CopyMetaFile Lib "GDI" (ByVal hMF%, ByVal lpFilename$) As Integer Function CopyRect Lib "User" (lpDestRect As RECT, lpSourceRect As RECT) As Integer Function CountClipboardFormats Lib "User" () As Integer Function CountVoiceNotes Lib "Sound" (ByVal nVoice%) As Integer Function CreateBitmap Lib "GDI" (ByVal nWidth%, ByVal nHeight%, ByVal nPlanes%, ByVal nBitCount%, ByVal lpBits As Any) As Integer Function CreateBitmapIndirect Lib "GDI" (lpBitmap As BITMAP) As Integer Function CreateBrushIndirect Lib "GDI" (lpLogBrush As LOGBRUSH) As Integer Sub CreateCaret Lib "User" (ByVal hWnd%, ByVal hBitmap%, ByVal nWidth%, ByVal nHeight%) Function CreateCompatibleBitmap Lib "GDI" (ByVal hDC%, ByVal nWidth%, ByVal nHeight%) As Integer Function CreateCompatibleDC Lib "GDI" (ByVal hDC%) As Integer Function CreateCursor Lib "User" (ByVal hInstance%, ByVal nXhotspot%, ByVal nYhotspot%, ByVal nWidth%, ByVal nHeight%, ByVal lpANDbitPlane As Any, ByVal lpXORbitPlane As Any) As Integer Function CreateDC Lib "GDI" (ByVal lpDriverName$, ByVal lpDeviceName$, ByVal lpOutput$, ByVal lpInitData$) As Integer Function CreateDIBitmap Lib "GDI" (ByVal hDC%, lpInfoHeader As BITMAPINFOHEADER, ByVal dwUsage&, ByVal lpInitBits$, lpInitInfo As BITMAPINFO, ByVal wUsage%) As Integer Function CreateDIBPatternBrush Lib "GDI" (ByVal hPackedDIB%, ByVal wUsage%) As Integer Function CreateDiscardableBitmap Lib "GDI" (ByVal hDC%, ByVal nWidth%, ByVal nHeight%) As Integer Function CreateEllipticRgn Lib "GDI" (ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) As Integer Function CreateEllipticRgnIndirect Lib "GDI" (lpRect As RECT) As Integer Function CreateFont Lib "GDI" (ByVal H%, ByVal W%, ByVal E%, ByVal O%, ByVal W%, ByVal I%, ByVal U%, ByVal%, ByVal C%, ByVal OP%, ByVal CP%, ByVal Q%, ByVal PAF%, ByVal$) As Integer Function CreateFontIndirect Lib "GDI" (lpLogFont As LOGFONT) As Integer Function CreateHatchBrush Lib "GDI" (ByVal nIndex%, ByVal crColor&) As Integer Function CreateIC Lib "GDI" (ByVal lpDriverName$, ByVal lpDeviceName$, ByVal lpOutput$, ByVal lpInitData$) As Integer Function CreateIcon Lib "User" (ByVal hInstance%, ByVal nWidth%, ByVal nHeight%, ByVal nPlanes%, ByVal nBitsPixel%, ByVal lpANDbits As Any, ByVal lpXORbits As Any) As Integer Function CreateMenu Lib "User" () As Integer Function CreateMetaFile Lib "GDI" (lpString As Any) As Integer Function CreatePalette Lib "GDI" (lpLogPalette As LOGPALETTE) As Integer Function CreatePatternBrush Lib "GDI" (ByVal hBitmap%) As Integer Function CreatePen Lib "GDI" (ByVal nPenStyle%, ByVal nWidth%, ByVal crColor&) As Integer Function CreatePenIndirect Lib "GDI" (lpLogPen As LOGPEN) As Integer Function CreatePolygonRgn Lib "GDI" (lpPoints As POINTAPI, ByVal nCount%, ByVal nPolyFillMode%) As Integer Function CreatePolyPolygonRgn Lib "GDI" (lpPoints As POINTAPI, lpPolyCounts%, ByVal nCount%, ByVal nPolyFillMode%) As Integer Function CreatePopupMenu Lib "User" () As Integer Function CreateRectRgn Lib "GDI" (ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) As Integer Function CreateRectRgnIndirect Lib "GDI" (lpRect As RECT) As Integer Function CreateRoundRectRgn Lib "GDI" (ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%, ByVal X3%, ByVal Y3%) As Integer Function CreateScalableFontResource Lib "GDI" (ByVal fHidden%, ByVal lpszResourceFile$, ByVal lpszFontFile$, ByVal lpszCurrentPath$) As Integer Function CreateSolidBrush Lib "GDI" (ByVal crColor&) As Integer Function CreateWindow Lib "User" (ByVal lpClassName$, ByVal lpWindowName$, ByVal dwStyle&, ByVal X%, ByVal Y%, ByVal nWidth%, ByVal nHeight%, ByVal hWndParent%, ByVal hMenu%, ByVal hInstance%, ByVal lpParam$) As Integer Function CreateWindowEx Lib "User" (ByVal dwExStyle&, ByVal lpClassName$, ByVal lpWindowName$, ByVal dwStyle&, ByVal X%, ByVal Y%, ByVal nWidth%, ByVal nHeight%, ByVal hWndParent%, ByVal hMenu%, ByVal hInstance%, ByVal lpParam$) As IntegerSub DebugBreak Lib "Kernel" () Sub DebugOutput Lib "Kernel" (flags%, ByVal lpszFmt$) Function DefDlgProc Lib "User" (ByVal hDlg%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Long Function DefDriverProc Lib "User" (ByVal dwDriverIdentifier&, ByVal hdrvr%, ByVal umsg%, lParam1 As Any, lParam2 As Any) As Long Function DeferWindowPos Lib "User" (ByVal hWinPosInfo%, ByVal hWnd%, ByVal hWndInsertAfter%, ByVal x, ByVal y, ByVal cx, ByVal cy, ByVal wFlags%) As Integer Function DefFrameProc Lib "User" (ByVal hWnd%, ByVal hWndMDIClient%, ByVal wMsg%, ByVal wParam%, ByVal lParam&) As Long Function DefMDIChildProc Lib "User" (ByVal hWnd%, ByVal wMsg%, ByVal wParam%, ByVal lParam&) As Long Function DefWindowProc Lib "User" (ByVal hWnd%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Long Function DeleteAtom Lib "Kernel" (ByVal nAtom%) As Integer Function DeleteDC Lib "GDI" (ByVal hDC%) As Integer Function DeleteMenu Lib "User" (ByVal hMenu%, ByVal nPosition%, ByVal wFlags%) As Integer Function DeleteMetaFile Lib "GDI" (ByVal hMF%) As Integer Function DeleteObject Lib "GDI" (ByVal hObject%) As Integer Sub DestroyCaret Lib "User" () Function DestroyCursor Lib "User" (ByVal hCursor%) As Integer Function DestroyIcon Lib "User" (ByVal hIcon%) As Integer Function DestroyMenu Lib "User" (ByVal hMenu%) As Integer Function DestroyWindow Lib "User" (ByVal hWnd%) As Integer Function DispatchMessage Lib "User" (lpMsg As MSG) As Long Function DlgDirList Lib "User" (ByVal hDlg%, ByVal lpPathSpec$, ByVal nIDListBox%, ByVal nIDStaticPath%, ByVal wFiletype%) As Integer Function DlgDirListComboBox Lib "User" (ByVal hDlg%, ByVal lpPathSpec$, ByVal nIDComboBox%, ByVal nIDStaticPath%, ByVal wFileType%) As Integer Function DlgDirSelect Lib "User" (ByVal hDlg%, ByVal lpString$, ByVal nIDListBox%) As Integer Function DlgDirSelectComboBox Lib "User" (ByVal hDlg%, ByVal lpString$, ByVal nIDComboBox%) As Integer Function DlgDirSelectComboBoxEx Lib "User" (ByVal hwndDlg%, ByVal lpszPath$, ByVal cbPath%, ByVal idComboBox%) As Integer Function DlgDirSelectEx Lib "User" (ByVal hwndDlg%, ByVal lpszPath$, ByVal cbPath%, ByVal idListBox%) As Integer Function DPtoLP Lib "GDI" (ByVal hDC%, lpPoints As POINTAPI, ByVal nCount%) As Integer Sub DragAcceptFiles Lib "Shell.dll" (ByVal hWnd%, ByVal fAccept%) Sub DragFinish Lib "Shell.dll" (ByVal hDrop%) Function DragQueryFile Lib "Shell.dll" (ByVal hDrop%, ByVal iFile%, ByVal lpszFile$, ByVal cb%) As Integer Function DragQueryPoint Lib "Shell.dll" (ByVal hDrop%, lpPoints As POINTAPI) As Integer Sub DrawFocusRect Lib "User" (ByVal hDC%, lpRect As RECT) Function DrawIcon Lib "User" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal hIcon%) As Integer Sub DrawMenuBar Lib "User" (ByVal hWnd%) Function DrawText Lib "User" (ByVal hDC%, ByVal lpStr$, ByVal nCount%, lpRect As RECT, ByVal wFormat%) As Integer Function Ellipse Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) As Integer Function EmptyClipboard Lib "User" () As Integer Function EnableCommNotification Lib "User" (ByVal idComDev%, ByVal hwnd%, ByVal cbWriteNotify%, ByVal OutQueue%) As Integer Function EnableHardwareInput Lib "User" (ByVal bEnableInput%) As Integer Function EnableMenuItem Lib "User" (ByVal hMenu%, ByVal wIDEnableItem%, ByVal wEnable%) As Integer Function EnableScrollBar Lib "User" (ByVal hWnd%, ByVal fnSBFlags%, ByVal fuArrowFlags%) As Integer Function EnableWindow Lib "User" (ByVal hWnd%, ByVal aBOOL%) As Integer Sub EndDeferWindowPos Lib "User" (ByVal hWinPosInfo%) Sub EndDialog Lib "User" (ByVal hDlg%, ByVal nResult%) Function EndDocAPI Lib "GDI" Alias "EndDoc" (ByVal hdc%) As Integer Function EndPage Lib "GDI" (ByVal hdc%) As Integer Sub EndPaint Lib "User" (ByVal hWnd%, lpPaint As PAINTSTRUCT) Function EnumClipboardFormats Lib "User" (ByVal wFormat%) As Integer Function EqualRect Lib "User" (lpRect1 As RECT, lpRect2 As RECT) As Integer Function EqualRgn Lib "GDI" (ByVal hSrcRgn1%, ByVal hSrcRgn2%) As Integer Function Escape Lib "GDI" (ByVal hDC%, ByVal nEscape%, ByVal nCount%, ByVal lplnData As Any, ByVal lpOutData As Any) As Integer Function EscapeCommFunction Lib "User" (ByVal nCid%, ByVal nFunc%) As Integer Function ExcludeClipRect Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) As Integer Function ExcludeUpdateRgn Lib "User" (ByVal hDC%, ByVal hWnd%) As Integer Function ExitWindows Lib "User" (ByVal dwReserved&, ByVal wReturnCode%) As Integer Function ExitWindowsExec Lib "User" (ByVal lpszExe$, ByVal lpszParams$) As Integer Function ExtFloodFill Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal crColor&, ByVal wFillType%) As Integer Function ExtractIcon Lib "Shell.dll" (ByVal hInstance%, ByVal lpszExeName$, ByVal iIcon%) As Integer Function ExtTextOut Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal wOptions%, lpRect As Any, ByVal lpString$, ByVal nCount%, lpDx As Any) As Integer Sub FatalAppExit Lib "Kernel" (ByVal fuAction%, ByVal lpszMessageText$) Sub FatalExit Lib "Kernel" (ByVal Code%) Function FillRect Lib "User" (ByVal hDC%, lpRect As RECT, ByVal hBrush%) As Integer Function FillRgn Lib "User" (ByVal hDC%, ByVal hRgn%, ByVal hBrush%) As Integer Function FindAtom Lib "Kernel" (ByVal lpString$) As Integer Function FindExecutable Lib "Shell.dll" (ByVal lpszFile$, ByVal lpszDir$, ByVal lpszResult$) As Integer Function FindResource Lib "Kernel" (ByVal hInstance%, ByVal lpName$, ByVal lpType As Any) As Integer Function FindText Lib "Commdlg.dll" (lpFR AS FINDREPLACE) As Integer Function FindWindow Lib "User" (ByVal lpClassName As Any, ByVal lpWindowName As Any) As Integer Function FlashWindow Lib "User" (ByVal hWnd%, ByVal bInvert%) As Integer Function FloodFill Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal crColor&) As Integer Function FlushComm Lib "User" (ByVal nCid%, ByVal nQueue%) As Integer Function FrameRect Lib "User" (ByVal hDC%, lpRect As RECT, ByVal hBrush%) As Integer Function FrameRgn Lib "User" (ByVal hDC%, ByVal hRgn%, ByVal hBrush%, ByVal nWidth%, ByVal nHeight%) As Integer Sub FreeLibrary Lib "Kernel" (ByVal hLibModule%) Function FreeModule Lib "Kernel" (ByVal hModule%) As Integer Function FreeResource Lib "Kernel" (ByVal hResData%) As Integer Function FreeSelector Lib "Kernel" (ByVal wSelector%) As Integer Function GetActiveWindow Lib "User" () As Integer Function GetAspectRatioFilter Lib "GDI" (ByVal hDC%) As Long Function GetAspectRatioFilterEx Lib "GDI" (ByVal hdc%, lpAspectRatio As SIZE) As Integer Function GetAsyncKeyState Lib "User" (ByVal vKey%) As Integer Function GetAtomHandle Lib "Kernel" (ByVal wAtom%) As Integer Function GetAtomName Lib "Kernel" (ByVal nAtom%, ByVal lpBuffer$, ByVal nSize%) As Integer Function GetBitmapBits Lib "GDI" (ByVal hBitmap%, ByVal dwCount&, ByVal lpBits As Any) As Long Function GetBitmapDimension Lib "GDI" (ByVal hBitmap%) As Long Function GetBitmapDimensionEx Lib "GDI" (ByVal hBitmap%, lpDimension As SIZE) As Integer Function GetBkColor Lib "GDI" (ByVal hDC%) As Long Function GetBkMode Lib "GDI" (ByVal hDC%) As Integer Function GetBoundsRect Lib "GDI" (ByVal hdc%, lprcBounds As RECT, ByVal flags%) As Integer Function GetBrushOrg Lib "GDI" (ByVal hDC%) As Long Function GetBrushOrgEx Lib "GDI" (ByVal hdc%, lpPoint As POINTAPI) As Integer Function GetCapture Lib "User" () As Integer Function GetCaretBlinkTime Lib "User" () As Integer Sub GetCaretPos Lib "User" (lpPoint As POINTAPI) Function GetCharABCWidths Lib "GDI" (ByVal hdc%, ByVal uFirstChar%, ByVal uLastChar%, lpabc As ABC) As Integer Function GetCharWidth Lib "GDI" (ByVal hDC%, ByVal wFirstChar%, ByVal wLastChar%, lpBuffer%) As Integer Function GetClassLong Lib "User" (ByVal hWnd%, ByVal nIndex%) As Long Function GetClassName Lib "User" (ByVal hWnd%, ByVal lpClassName$, ByVal nMaxCount%) As Integer Function GetClassWord Lib "User" (ByVal hWnd%, ByVal nIndex%) As Integer Sub GetClientRect Lib "User" (ByVal hWnd%, lpRect As RECT) Function GetClipboardData Lib "User" (ByVal wFormat%) As Integer Function GetClipboardFormatName Lib "User" (ByVal wFormat%, ByVal lpString$, ByVal nMaxCount%) As Integer Function GetClipboardOwner Lib "User" () As Integer Function GetClipboardViewer Lib "User" () As Integer Function GetClipBox Lib "GDI" (ByVal hDC%, lpRect As RECT) As Integer Sub GetClipCursor Lib "User" (lprc As RECT) Function GetCommError Lib "User" (ByVal idComDev%, lpStat As COMSTAT) As Integer Function GetCommEventMask Lib "User" (ByVal nCid%, ByVal nEvtMask%) As Integer Function GetCommState Lib "User" (ByVal nCid%, lpDCB as DCB) As Integer Function GetCurrentPDB Lib "Kernel" () As Integer Function GetCurrentPosition Lib "GDI" (ByVal hDC%) As Long Function GetCurrentPositionEx Lib "GDI" (ByVal hdc%, lpPoint As POINTAPI) As Integer Function GetCurrentTask Lib "Kernel" () As Integer Function GetCurrentTime Lib "User" () As Long Function GetCursor Lib "User" () As Integer Sub GetCursorPos Lib "User" (lpPoint As POINTAPI) Function GetDC Lib "User" (ByVal hWnd%) As Integer Function GetDCEx Lib "User" (ByVal hwnd%, ByVal hrgnclip%, ByVal fdwOptions&) As Integer Function GetDCOrg Lib "GDI" (ByVal hDC%) As Long Function GetDesktopHwnd Lib "User" () As Integer Function GetDesktopWindow Lib "User" () As Integer Function GetDeviceCaps Lib "GDI" (ByVal hDC%, ByVal nIndex%) As Integer Function GetDialogBaseUnits Lib "User" () As Long Function GetDIBits Lib "GDI" (ByVal aHDC%, ByVal hBitmap%, ByVal nStartScan%, ByVal nNumScans%, ByVal lpBits$, lpBI As BITMAPINFO, ByVal wUsage%) As Integer Function GetDlgCtrlID Lib "User" (ByVal hWnd%) As Integer Function GetDlgItem Lib "User" (ByVal hDlg%, ByVal nIDDlgItem%) As Integer Function GetDlgItemInt Lib "User" (ByVal hDlg%, ByVal nIDDlgItem%, lpTranslated%, ByVal bSigned%) As Integer Function GetDlgItemText Lib "User" (ByVal hDlg%, ByVal nIDDlgItem%, ByVal lpString$, ByVal nMaxCount%) As Integer Function GetDOSEnvironment Lib "Kernel" () As Long Function GetDoubleClickTime Lib "User" () As Integer Function GetDriverInfo Lib "User" (ByVal hdrvr%, lpdis As DRIVERINFOSTRUCT) As Integer Function GetDriverModuleHandle Lib "User" (ByVal hdrvr%) As Integer Function GetDriveType Lib "Kernel" (ByVal nDrive%) As Integer Function GetEnvironment Lib "GDI" (ByVal lpPortName$, lpEnviron As Any, ByVal nMaxCount%) As Integer Function GetExpandedName Lib "LZexpand.dll" (ByVal lpszSource$, ByVal lpszBuffer$) As Integer Function GetFileTitle Lib "Commdlg.dll" (ByVal lpszFile$, ByVal lpszTitle$, ByVal cbBuf%) As Integer Function GetFileVersionInfo Lib "Ver.dll" (ByVal Filename$, ByVal dwhandle&, ByVal cbBuff&, ByVal lpvData$) As Integer Function GetFileVersionInfoSize Lib "Ver.dll" (ByVal Filename$, dwhandle&) As Long Function GetFocus Lib "User" () As Integer Function GetFontData Lib "GDI" (ByVal hdc%, ByVal dwTable&, ByVal dwOffset&, ByVal lpvBuffer$, ByVal cbData&) As Long Function GetFreeSpace Lib "Kernel" (ByVal wFlags%) As Long Function GetFreeSystemResources Lib "User" (ByVal fuSysResource%) As Integer Function GetGlyphOutline Lib "GDI" (ByVal hdc%, ByVal uChar%, ByVal fuFormat%, lpgm As GLYPHMETRICS, ByVal cbBuffer&, ByVal lpBuffer$, lpmat2 As MAT2) As Long Function GetInputState Lib "User" () As Integer Function GetInstanceData Lib "Kernel" (ByVal hInstance%, ByVal pData%, ByVal nCount%) As Integer Function GetKBCodePage Lib "Keyboard" () As Integer Function GetKerningPairs Lib "GDI" (ByVal hdc%, ByVal cPairs%, lpkrnpair As KERNINGPAIR) As Integer Sub GetKeyboardState Lib "User" (LpKeyState As Any) Function GetKeyboardType Lib "Keyboard" (ByVal nTypeFlag%) As Integer Function GetKeyNameText Lib "Keyboard" (ByVal lParam&, ByVal lpBuffer$, ByVal nSize%) As Integer Function GetKeyState Lib "User" (ByVal nVirtKey%) As Integer Function GetLastActivePopup Lib "User" (ByVal hwndOwnder%) As Integer Function GetMapMode Lib "GDI" (ByVal hDC%) As Integer Function GetMenu Lib "User" (ByVal hWnd%) As Integer Function GetMenuCheckMarkDimensions Lib "User" () As Long Function GetMenuItemCount Lib "User" (ByVal hMenu%) As Integer Function GetMenuItemID Lib "User" (ByVal hMenu%, ByVal nPos%) As Integer Function GetMenuState Lib "User" (ByVal hMenu%, ByVal wId%, ByVal wFlags%) As Integer Function GetMenuString Lib "User" (ByVal hMenu%, ByVal wIDItem%, ByVal lpString$, ByVal nMaxCount%, ByVal wFlag%) As Integer Function GetMessage Lib "User" (lpMsg As MSG, ByVal hWnd%, ByVal wMsgFilterMin%, ByVal wMsgFilterMax%) As Integer Function GetMessageExtraInfo Lib "User" () As Long Function GetMessagePos Lib "User" () As Long Function GetMessageTime Lib "User" () As Long Function GetMetaFile Lib "GDI" (ByVal lpFilename$) As Integer Function GetMetaFileBits Lib "GDI" (ByVal hMF%) As Integer Function GetModuleFileName Lib "Kernel" (ByVal hModule%, ByVal lpFilename$, ByVal nSize%) As Integer Function GetModuleHandle Lib "Kernel" (ByVal lpModuleName$) As Integer Function GetModuleUsage Lib "Kernel" (ByVal hModule%) As Integer Function GetNearestColor Lib "GDI" (ByVal hDC%, ByVal crColor&) As Long Function GetNearestPaletteIndex Lib "GDI" (ByVal hPalette%, ByVal crColor&) As Integer Function GetNextDlgGroupItem Lib "User" (ByVal hDlg%, ByVal hCtl%, ByVal bPrevious%) As Integer Function GetNextDlgTabItem Lib "User" (ByVal hDlg%, ByVal hCtl%, ByVal bPrevious%) As Integer Function GetNextDriver Lib "User" (ByVal hdrvr%, ByVal fdwFlag&) As Integer Function GetNextWindow Lib "User" (ByVal hWnd%, ByVal wFlag%) As Integer Function GetNumTasks Lib "Kernel" () As Integer Function GetObject Lib "GDI" (ByVal hObject%, ByVal nCount%, ByVal lpObject&) As Integer Function GetOpenClipboardWindow Lib "User" () As Integer Function GetOpenFileName Lib "Commdlg.dll" (lpOFName As OPENFILENAME) As Integer Function GetOutlineTextMetrics Lib "GDI" (ByVal hdc%, ByVal cbData%, lpotm As OUTLINETEXTMETRIC) As Integer Function GetPaletteEntries Lib "GDI" (ByVal hPalette%, ByVal wStartIndex%, ByVal wNumEntries%, lpPaletteEntries As PALETTEENTRY) As Integer Function GetParent Lib "User" (ByVal hWnd%) As Integer Function GetPixel Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function GetPolyFillMode Lib "GDI" (ByVal hDC%) As Integer Function GetPriorityClipboardFormat Lib "User" (lpPriorityList%, ByVal nCount%) As Integer Function GetPrivateProfileInt Lib "Kernel" (ByVal lpApplicationName$, ByVal lpKeyName$, ByVal nDefault%, ByVal lpFileName$) As Integer Function GetPrivateProfileString Lib "Kernel" (ByVal lpApplicationName$, ByVal lpKeyName$, ByVal lpDefault$, ByVal lpReturnedString$, ByVal nSize%, ByVal lpFileName$) As Integer Function GetProfileInt Lib "Kernel" (ByVal lpAppName$, ByVal lpKeyName$, ByVal nDefault%) As Integer Function GetProfileString Lib "Kernel" (ByVal lpAppName$, ByVal lpKeyName$, ByVal lpDefault$, ByVal lpReturnedString$, ByVal nSize%) As Integer Function GetProp Lib "User" (ByVal hWnd%, ByVal lpString As Any) As Integer Function GetQueueStatus Lib "User" (ByVal fuFlags%) As Long Function GetRasterizerCaps Lib "GDI" (lpraststat As RASTERIZER_STATUS, ByVal cb%) As Integer Function GetRgnBox Lib "GDI" (ByVal hRgn%, lpRect As RECT) As Integer Function GetROP2 Lib "GDI" (ByVal hDC%) As Integer Function GetSaveFileName Lib "Commdlg.dll" (lpOFName As OPENFILENAME) As Integer Function GetScrollPos Lib "User" (ByVal hWnd%, ByVal nBar%) As Integer Sub GetScrollRange Lib "User" (ByVal hWnd%, ByVal nBar%, lpMinPos%, lpMaxPos%) Function GetSelectorBase Lib "Kernel" (ByVal uSelector%) As Long Function GetSelectorLimit Lib "Kernel" (ByVal uSelector) As Long Function GetStockObject Lib "GDI" (ByVal nIndex%) As Integer Function GetStretchBltMode Lib "GDI" (ByVal hDC%) As Integer Function GetSubMenu Lib "User" (ByVal hMenu%, ByVal nPos%) As Integer Function GetSysColor Lib "User" (ByVal nIndex%) As Long Function GetSysModalWindow Lib "User" () As Integer Function GetSystemDebugState Lib "User" () As Long Function GetSystemDirectory Lib "Kernel" (ByVal lpBuffer$, ByVal nSize%) As Integer Function GetSystemMenu Lib "User" (ByVal hWnd%, ByVal bRevert%) As Integer Function GetSystemMetrics Lib "User" (ByVal nIndex%) As Integer Function GetSystemPaletteEntries Lib "GDI" (ByVal hDC%, ByVal wStartIndex%, ByVal wNumEntries%, lpPaletteEntries As PALETTEENTRY) As Integer Function GetSystemPaletteUse Lib "GDI" (ByVal hDC%) As Integer Function GetTabbedTextExtent Lib "GDI" (ByVal hDC%, ByVal lpString$, ByVal nCount%, ByVal nTabPositions%, lpnTabStopPositions%) As Long Function GetTempDrive Lib "Kernel" (ByVal cDriveLetter%) As Integer Function GetTempFileName Lib "Kernel" (ByVal cDriveLetter%, ByVal lpPrefixString$, ByVal wUnique%, ByVal lpTempFileName$) As Integer Function GetTextAlign Lib "GDI" (ByVal hDC%) As Integer Function GetTextCharacterExtra Lib "GDI" (ByVal hDC%) As Integer Function GetTextColor Lib "GDI" (ByVal hDC%) As Long Function GetTextExtent Lib "GDI" (ByVal hDC%, ByVal lpString$, ByVal nCount%) As Long Function GetTextExtentPoint Lib "GDI" (ByVal hdc%, ByVal lpszString$, ByVal cbString%, lpSize As SIZE) As Integer Function GetTextFace Lib "GDI" (ByVal hDC%, ByVal nCount%, ByVal lpFacename$) As Integer Function GetTextMetrics Lib "GDI" (ByVal hDC%, lpMetrics As TEXTMETRIC) As Integer Function GetThresholdEvent Lib "Sound" () As Integer Function GetThresholdStatus Lib "Sound" () As Integer Function GetTickCount Lib "User" () As Long Function GetTopWindow Lib "User" (ByVal hWnd%) As Integer Function GetUpdateRect Lib "User" (ByVal hWnd%, lpRect As RECT, ByVal bErase%) As Integer Function GetUpdateRgn Lib "User" (ByVal hWnd%, ByVal hRgn%, ByVal fErase%) As Integer Function GetVersion Lib "Kernel" () As Long Function GetViewportExt Lib "GDI" (ByVal hDC%) As Long Function GetViewportExtEx Lib "GDI" (ByVal hdc%, lpSize As SIZE) As Integer Function GetViewportOrg Lib "GDI" (ByVal hDC%) As Long Function GetViewportOrgEx Lib "GDI" (ByVal hdc%, lpPoint As POINTAPI) As Integer Function GetWinDebugInfo Lib "Kernel" (lpwdi As WINDEBUGINFO, ByVal flags%) As Integer Function GetWindow Lib "User" (ByVal hWnd%, ByVal wCmd%) As Integer Function GetWindowDC Lib "User" (ByVal hWnd%) As Integer Function GetWindowExt Lib "GDI" (ByVal hDC%) As Long Function GetWindowExtEx Lib "GDI" (ByVal hdc%, lpSize As SIZE) As Integer Function GetWindowLong Lib "User" (ByVal hWnd%, ByVal nIndex%) As Long Function GetWindowOrg Lib "GDI" (ByVal hDC%) As Long Function GetWindowOrgEx Lib "GDI" (ByVal hdc%, lpPoint As POINTAPI) As Integer Function GetWindowPlacement Lib "User" (ByVal hwnd%, lpwndpl As WINDOWPLACEMENT) As Integer Sub GetWindowRect Lib "User" (ByVal hWnd%, lpRect As RECT) Function GetWindowsDirectory Lib "Kernel" (ByVal lpBuffer$, ByVal nSize%) As Integer Function GetWindowTask Lib "User" (ByVal hWnd%) As Integer Function GetWindowText Lib "User" (ByVal hWnd%, ByVal lpString$, ByVal aint%) As Integer Function GetWindowTextLength Lib "User" (ByVal hWnd%) As Integer Function GetWindowWord Lib "User" (ByVal hWnd%, ByVal nIndex%) As Integer Function GetWinFlags Lib "Kernel" () As Long Function GlobalAddAtom Lib "Kernel" (ByVal lpString$) As Integer Function GlobalAlloc Lib "Kernel" (ByVal wFlags%, ByVal dwBytes&) As Integer Function GlobalCompact Lib "Kernel" (ByVal dwMinFree&) As Long Function GlobalDeleteAtom Lib "Kernel" (ByVal nAtom%) As Integer Function GlobalFindAtom Lib "Kernel" (ByVal lpString$) As Integer Sub GlobalFix Lib "Kernel" (ByVal hMem%) Function GlobalFlags Lib "Kernel" (ByVal hMem%) As Integer Function GlobalFree Lib "Kernel" (ByVal hMem%) As Integer Function GlobalGetAtomName Lib "Kernel" (ByVal nAtom%, ByVal lpbuffer$, ByVal nSize%) As Integer Function GlobalHandle Lib "Kernel" (ByVal wMem%) As Long Function GlobalLock Lib "Kernel" (ByVal hMem%) As Long Function GlobalLRUNewest Lib "Kernel" (ByVal hMem%) As Integer Function GlobalLRUOldest Lib "Kernel" (ByVal hMem%) As Integer Function GlobalPageLock Lib "Kernel" (ByVal wSelector%) As Integer Function GlobalPageUnlock Lib "Kernel" (ByVal wSelector%) As Integer Function GlobalReAlloc Lib "Kernel" (ByVal hMem%, ByVal dwBytes&, ByVal wFlags%) As Integer Function GlobalSize Lib "Kernel" (ByVal hMem%) As Long Function GlobalUnfix Lib "Kernel" (ByVal hMem%) As Integer Function GlobalUnlock Lib "Kernel" (ByVal hMem%) As Integer Function GlobalUnWire Lib "Kernel" (ByVal hMem%) As Integer Function GlobalWire Lib "Kernel" (ByVal hMem%) As Long Sub HideCaret Lib "User" (ByVal hWnd%) Function HiliteMenuItem Lib "User" (ByVal hWnd%, ByVal hMenu%, ByVal wIDHiliteItem%, ByVal wHilite%) As Integer Sub Hmemcpy Lib "Kernel" (ByVal hpvDest%, ByVal hpvSource%, ByVal cbCopy&) Function Hread Lib "Kernel" Alias "_hread" (ByVal hFile%, ByVal hpvBuffer%, ByVal cbBuffer&) As Long Function Hwrite Lib "Kernel" Alias "_hwrite" (ByVal hFile%, ByVal hpvBuffer%, ByVal cbBuffer&) As Long Sub InflateRect Lib "User" (lpRect As RECT, ByVal X%, ByVal Y%) Function InitAtomTable Lib "Kernel" (ByVal nSize%) As Integer Function InSendMessage Lib "User" () As Integer Function InsertMenu Lib "User" (ByVal hMenu%, ByVal nPosition%, ByVal wFlags%, ByVal wIDNewItem%, ByVal lpNewItem As Any) As Integer Function IntersectClipRect Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) As Integer Function IntersectRect Lib "User" (lpDestRect As RECT, lpSrc1Rect As RECT, lpSrc2Rect As RECT) As Integer Sub InvalidateRect Lib "User" (ByVal hWnd%, lpRect As RECT, ByVal bErase%) Sub InvalidateRgn Lib "User" (ByVal hWnd%, ByVal hRgn%, ByVal bErase%) Sub InvertRect Lib "User" (ByVal hDC%, lpRect As RECT) Function InvertRgn Lib "User" (ByVal hDC%, ByVal hRgn%) As Integer Function IsBadReadPtr Lib "Kernel" (ByVal lp$, ByVal cb%) As Integer Function IsBadStringPtr Lib "Kernel" (ByVal lpsz$, ByVal cchMax%) As Integer Function IsBadWritePtr Lib "Kernel" (ByVal lp$, ByVal cb%) As Integer Function IsCharAlpha Lib "User" (ByVal cChar%) As Integer Function IsCharAlphaNumeric Lib "User" (ByVal cChar%) As Integer Function IsCharLower Lib "User" (ByVal cChar%) As Integer Function IsCharUpper Lib "User" (ByVal cChar%) As Integer Function IsChild Lib "User" (ByVal hWndParent%, ByVal hWnd%) As Integer Function IsClipboardFormatAvailable Lib "User" (ByVal wFormat%) As Integer Function IsDBCSLeadByte Lib "Kernel" (ByVal bTestChar%) As Integer Function IsDialogMessage Lib "User" (ByVal hDlg%, lpMsg As MSG) As Integer Function IsDlgButtonChecked Lib "User" (ByVal hDlg%, ByVal nIDButton%) As Integer Function IsIconic Lib "User" (ByVal hWnd%) As Integer Function IsMenu Lib "User" (ByVal hmenu%) As Integer Function IsRectEmpty Lib "User" (lpRect As RECT) As Integer Function IsTask Lib "Kernel" (ByVal htask%) As Integer Function IsWindow Lib "User" (ByVal hWnd%) As Integer Function IsWindowEnabled Lib "User" (ByVal hWnd%) As Integer Function IsWindowVisible Lib "User" (ByVal hWnd%) As Integer Function IsZoomed Lib "User" (ByVal hWnd%) As Integer Function KillTimer Lib "User" (ByVal hWnd%, ByVal nIDEvent%) As Integer Function Lclose Lib "Kernel" Alias "_lclose" (ByVal hFile%) As Integer Function Lcreat Lib "Kernel" Alias "_lcreat" (ByVal lpPathName$, ByVal iAttribute%) As Integer Sub LimitEmsPages Lib "Kernel" (ByVal dwKbytes&) Function LineTo Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Integer Function Llseek Lib "Kernel" Alias "_llseek" (ByVal hFile%, ByVal lOffset&, ByVal iOrigin%) As Long Function LoadAccelerators Lib "User" (ByVal hInstance%, ByVal lpTableName$) As Integer Function LoadBitmap Lib "User" (ByVal hInstance%, ByVal lpBitmapName As Any) As Integer Function LoadCursor Lib "User" (ByVal hInstance%, ByVal lpCursorName As Any) As Integer Function LoadIcon Lib "User" (ByVal hInstance%, ByVal lpIconName As Any) As Integer Function LoadLibrary Lib "Kernel" (ByVal lpLibFileName$) As Integer Function LoadMenu Lib "User" (ByVal hInstance%, ByVal lpString$) As Integer Function LoadMenuIndirect Lib "User" (lpMenuTemplate As Any) As Integer Function LoadModule Lib "Kernel" (ByVal lpModuleName$, lpParameterBlock As PARAMETERBLOCK) As Integer Function LoadResource Lib "Kernel" (ByVal hInstance%, ByVal hResInfo%) As Integer Function LoadString Lib "User" (ByVal hInstance%, ByVal wID%, ByVal lpBuffer As Any, ByVal nBufferMax%) As Integer Function LocalAlloc Lib "Kernel" (ByVal wFlags%, ByVal wBytes%) As Integer Function LocalCompact Lib "Kernel" (ByVal wMinFree%) As Integer Function LocalFlags Lib "Kernel" (ByVal hMem%) As Integer Function LocalFree Lib "Kernel" (ByVal hMem%) As Integer Function LocalHandle Lib "Kernel" (ByVal wMem%) As Integer Function LocalInit Lib "Kernel" (ByVal wSegment%, ByVal pStart%, ByVal pEnd%) As Integer Function LocalLock Lib "Kernel" (ByVal hMem%) '(returns a near pointer) As Integer Function LocalReAlloc Lib "Kernel" (ByVal hMem%, ByVal wBytes%, ByVal wFlags%) As Integer Function LocalShrink Lib "Kernel" (ByVal hSeg%, ByVal wSize%) As Integer Function LocalSize Lib "Kernel" (ByVal hMem%) As Integer Function LocalUnlock Lib "Kernel" (ByVal hMem%) As Integer Function LockInput Lib "User" (ByVal hReserved%, ByVal hwndInput%, ByVal fLock%) As Integer Function LockResource Lib "Kernel" (ByVal hResData%) As Long Function LockSegment Lib "Kernel" (ByVal wSegment%) As Integer Function LockWindowUpdate Lib "User" (ByVal hwndLock%) As Integer Sub LogError Lib "Kernel" (ByVal uErr%, lpvInfo As Any) Function Lopen Lib "Kernel" Alias "_lopen" (ByVal lpPathName$, ByVal iReadWrite%) As Integer Function LPtoDP Lib "GDI" (ByVal hDC%, lpPoints As POINTAPI, ByVal nCount%) As Integer Function Lread Lib "Kernel" Alias "_lread" (ByVal hFile%, ByVal lpBuffer$, ByVal wBytes%) As Integer Function Lstrcat Lib "Kernel" (ByVal lpString1 As Any, ByVal lpString2 As Any) As Long Function Lstrcmp Lib "User" (ByVal lpString1 As Any, ByVal lpString2 As Any) As Integer Function Lstrcmpi Lib "User" (ByVal lpString1 As Any, ByVal lpString2 As Any) As Integer Function Lstrcpy Lib "Kernel" (ByVal lpString1 As Any, ByVal lpString2 As Any) As Long Function Lstrcpyn Lib "Kernel" (ByVal lpszString1$, ByVal lpszString2$, ByVal cChars%) As String Function Lstrlen Lib "Kernel" (ByVal lpString As Any) As Integer Function Lwrite Lib "Kernel" Alias "_lwrite" (ByVal hFile%, ByVal lpBuffer$, ByVal wBytes%) As Integer Sub LZClose Lib "LZexpand.dll" (ByVal hfFile%) Function LZCopy Lib "LZexpand.dll" (ByVal hfSource%, ByVal hfDest%) As Long Sub LZDone Lib "LZexpand.dll" () Function LZInit Lib "LZexpand.dll" (ByVal hfSrc%) As Integer Function LZOpenFile Lib "LZexpand.dll" (ByVal lpszFile$, lpOf As OFSTRUCT, ByVal style%) As Integer Function LZRead Lib "LZexpand.dll" (ByVal hfFile%, ByVal lpvBuf$, ByVal cb%) As Integer Function LZSeek Lib "LZexpand.dll" (ByVal hfFile%, ByVal lOffset&, ByVal nOrigin%) As Long Function LZStart Lib "LZexpand.dll" () As Integer Sub MapDialogRect Lib "User" (ByVal hDlg%, lpRect As RECT) Function MapVirtualKey Lib "Keyboard" (ByVal wCode%, ByVal wMapType%) As Integer Sub MapWindowPoints Lib "User" (ByVal hwndFrom%, ByVal hwndTo%, lppt As POINTAPI, ByVal cPoints%) Sub MessageBeep Lib "User" (ByVal wType%) Function MessageBox Lib "User" (ByVal hWnd%, ByVal lpText$, ByVal lpCaption$, ByVal wType%) As Integer Function ModifyMenu Lib "User" (ByVal hMenu%, ByVal nPosition%, ByVal wFlags%, ByVal wIDNewItem%, ByVal lpString As Any) As Integer Function MoveTo Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function MoveToEx Lib "GDI" (ByVal hdc%, ByVal x%, ByVal y%, lpPoint As POINTAPI) As Integer Function MoveWindow Lib "User" (ByVal hWnd%, ByVal X%, ByVal Y%, ByVal nWidth%, ByVal nHeight%, ByVal bRepaint%) As Integer Function MulDiv Lib "GDI" (ByVal nNumber%, ByVal nNumerator%, ByVal nDenominator%) As Integer Function OemKeyScan Lib "Keyboard" (ByVal wOemChar%) As Long Function OemToAnsi Lib "Keyboard" (ByVal lpOemStr$, ByVal lpAnsiStr$) As Integer Sub OemToAnsiBuff Lib "Keyboard" (ByVal lpOemStr$, ByVal lpAnsiStr$, ByVal nLength%) Function OffsetClipRgn Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Integer Sub OffsetRect Lib "User" (lpRect As RECT, ByVal X%, ByVal Y%) Function OffsetRgn Lib "GDI" (ByVal hRgn%, ByVal X%, ByVal Y%) As Integer Function OffsetViewportOrg Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function OffsetViewportOrgEx Lib "GDI" (ByVal hdc%, ByVal nX%, ByVal nY%, lpPoint As POINTAPI) As Integer Function OffsetWindowOrg Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function OffsetWindowOrgEx Lib "GDI" (ByVal hdc%, ByVal nX%, ByVal nY%, lpPoint As POINTAPI) As Integer Function OpenClipboard Lib "User" (ByVal hWnd%) As Integer Function OpenComm Lib "User" (ByVal lpComName$, ByVal wInQueue%, ByVal wOutQueue%) As Integer Function OpenDriver Lib "User" (ByVal lpDriverName$, ByVal lpSectionName$, lParam As Any) As Integer Function OpenFile Lib "Kernel" (ByVal lpFileName$, lpReOpenBuff As OFSTRUCT, ByVal wStyle%) As Integer Function OpenIcon Lib "User" (ByVal hWnd%) As Integer Function OpenSound Lib "Sound" () As Integer Sub OutputDebugString Lib "Kernel" (ByVal lpOutputString$) Function PaintRgn Lib "User" (ByVal hDC%, ByVal hRgn%) As Integer Function PatBlt Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal nWidth%, ByVal nHeight%, ByVal dwRop&) As Integer Function PeekMessage Lib "User" (lpMsg As MSG, ByVal hWnd%, ByVal wMsgFilterMin%, ByVal wMsgFilterMax%, ByVal wRemoveMsg%) As Integer Function Pie Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%, ByVal X3%, ByVal Y3%, ByVal X4%, ByVal Y4%) As Integer Function PlayMetaFile Lib "GDI" (ByVal hDC%, ByVal hMF%) As Integer Sub PlayMetaFileRecord Lib "GDI" (ByVal hDC%, lpHandletable%, lpMetaRecord As METARECORD, ByVal nHandles%) Function Polygon Lib "GDI" (ByVal hDC%, lpPoints As POINTAPI, ByVal nCount%) As Integer Function Polyline Lib "GDI" (ByVal hDC%, lpPoints As POINTAPI, ByVal nCount%) As Integer Function PolyPolygon Lib "GDI" (ByVal hDC%, lpPoints As POINTAPI, lpPolyCounts%, ByVal nCount%) As Integer Function PostAppMessage Lib "User" (ByVal hTask%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Integer Function PostMessage Lib "User" (ByVal hWnd%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Integer Sub PostQuitMessage Lib "User" (ByVal nExitCode%) Function PrintDlg Lib "Commdlg.dll" (lpPD As PRINTDLG) As Integer Sub ProfClear Lib "User" () Sub ProfFinish Lib "User" () Sub ProfFlush Lib "User" () Function ProfInsChk Lib "User" () As Integer Sub ProfSampRate Lib "User" (ByVal nRate286%, ByVal nRate386%) Sub ProfSetup Lib "User" (ByVal nBufferSize%, ByVal nSamples%) Sub ProfStart Lib "User" () Sub ProfStop Lib "User" () Function PtInRect Lib "User" (lpRect As RECT, ByVal ptRect As Any) As Integer Function PtInRegion Lib "User" (ByVal hRgn%, ByVal X%, ByVal Y%) As Integer Function PtVisible Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Integer Function QuerySendMessage Lib "User" (ByVal hreserved1%, ByVal hreserved2%, ByVal hreserved3%, ByVal lpMessage$) As Integer Function ReadComm Lib "User" (ByVal nCid%, ByVal lpBuf$, ByVal nSize%) As Integer Function RealizePalette Lib "User" (ByVal hDC%) As Integer Function Rectangle Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) As Integer Function RectInRegion Lib "User" (ByVal hRgn%, lpRect As RECT) As Integer Function RectVisible Lib "User" (ByVal hDC%, lpRect As RECT) As Integer Function RedrawWindow Lib "User" (ByVal hwnd%, lprcUpdate As RECT, ByVal hrgnUpdate%, ByVal fuRedraw%) As Integer Function RegisterClass Lib "User" (lpWindowClasss As WNDCLASS) As Integer Function RegisterClipboardFormat Lib "User" (ByVal lpString$) As Integer Function RegisterWindowMessage Lib "User" (ByVal lpString$) As Integer Sub ReleaseCapture Lib "User" () Function ReleaseDC Lib "User" (ByVal hWnd%, ByVal hDC%) As Integer Function RemoveFontResource Lib "GDI" (ByVal lpFilename As Any) As Integer Function RemoveMenu Lib "User" (ByVal hMenu%, ByVal nPosition%, ByVal wFlags%) As Integer Function RemoveProp Lib "User" (ByVal hWnd%, ByVal lpString$) As Integer Function ReplaceText Lib "Commdlg.dll" (lpFR As FINDREPLACE) As Integer Sub ReplyMessage Lib "User" (ByVal lReply&) Function ResizePalette Lib "GDI" (ByVal hPalette%, ByVal nNumEntries%) As Integer Function RestoreDC Lib "GDI" (ByVal hDC%, ByVal nSavedDC%) As Integer Function RoundRect Lib "GDI" (ByVal hDC%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%, ByVal X3%, ByVal Y3%) As Integer Function SaveDC Lib "GDI" (ByVal hDC%) As Integer Function ScaleViewportExt Lib "GDI" (ByVal hDC%, ByVal Xnum%, ByVal Xdenom%, ByVal Ynum%, ByVal Ydenom%) As Long Function ScaleViewportExtEx Lib "GDI" (ByVal hdc%, ByVal nXnum%, ByVal nXdenom%, ByVal nYnum%, ByVal nYdenom%, lpSize As SIZE) As Integer Function ScaleWindowExt Lib "GDI" (ByVal hDC%, ByVal Xnum%, ByVal Xdenom%, ByVal Ynum%, ByVal Ydenom%) As Long Function ScaleWindowExtEx Lib "GDI" (ByVal hdc%, ByVal nXnum%, ByVal nXdenom%, ByVal nYnum%, ByVal nYdenom%, lpSize As SIZE) As Integer Sub ScreenToClient Lib "User" (ByVal hWnd%, lpPoint As POINTAPI) Function ScrollDC Lib "User" (ByVal hDC%, ByVal dx%, ByVal dy%, lprcScroll As RECT, lprcClip As RECT, ByVal hRgnUpdate%, lprcUpdate As RECT) As Integer Sub ScrollWindow Lib "User" (ByVal hWnd%, ByVal XAmount%, ByVal YAmount%, lpRect As RECT, lpClipRect As RECT) Function ScrollWindowEx Lib "User" (ByVal hwnd%, ByVal dx%, ByVal dy%, lprcScroll As RECT, lprcClip As RECT, ByVal hrgnUpdate%, lprcUpdate As RECT, ByVal fuScroll%) As Integer Function SelectClipRgn Lib "GDI" (ByVal hDC%, ByVal hRgn%) As Integer Function SelectObject Lib "GDI" (ByVal hDC%, ByVal hObject%) As Integer Function SelectPalette Lib "User" (ByVal hDC%, ByVal hPalette%, ByVal bForceBackground%) As Integer Function SendDlgItemMessage Lib "User" (ByVal hDlg%, ByVal nIDDlgItem%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Long Function SendDriverMessage Lib "User" (ByVal hdrvr%, ByVal msg%, lParam1 As Any, lParam2 As Any) As Long Function SendMessage Lib "User" (ByVal hWnd%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Integer Function SendMessageLong Lib "User" Alias "SendMessage" (ByVal hWnd%, ByVal wMsg%, ByVal wParam%, lParam As Any) As Long Function SetActiveWindow Lib "User" (ByVal hWnd%) As Integer Function SetBitmapBits Lib "GDI" (ByVal hBitmap%, ByVal dwCount&, ByVal lpBits As Any) As Long Function SetBitmapDimension Lib "GDI" (ByVal hBitmap%, ByVal X%, ByVal Y%) As Long Function SetBitmapDimensionEx Lib "GDI" (ByVal hbm%, ByVal nX%, ByVal nY%, lpSize As SIZE) As Integer Function SetBkColor Lib "GDI" (ByVal hDC%, ByVal crColor&) As Long Function SetBkMode Lib "GDI" (ByVal hDC%, ByVal nBkMode%) As Integer Function SetBoundsRect Lib "GDI" (ByVal hdc%, lprcBounds As RECT, ByVal flags%) As Integer Function SetBrushOrg Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function SetCapture Lib "User" (ByVal hWnd%) As Integer Sub SetCaretBlinkTime Lib "User" (ByVal wMSeconds%) Sub SetCaretPos Lib "User" (ByVal X%, ByVal Y%) Function SetClassLong Lib "User" (ByVal hWnd%, ByVal nIndex%, ByVal dwNewLong&) As Long Function SetClassWord Lib "User" (ByVal hWnd%, ByVal nIndex%, ByVal wNewWord%) As Integer Function SetClipboardData Lib "User" (ByVal wFormat%, ByVal hMem%) As Integer Function SetClipboardViewer Lib "User" (ByVal hWnd%) As Integer Function SetCommBreak Lib "User" (ByVal nCid%) As Integer Function SetCommEventMask Lib "User" (ByVal nCid%, nEvtMask%) As Long Function SetCommState Lib "User" (lpDCB As DCB) As Integer Function SetCursor Lib "User" (ByVal hCursor%) As Integer Sub SetCursorPos Lib "User" (ByVal X%, ByVal Y%) Function SetDIBits Lib "GDI" (ByVal aHDC%, ByVal hBitmap%, ByVal nStartScan%, ByVal nNumScans%, ByVal lpBits$, lpBI As BITMAPINFO, ByVal wUsage%) As Integer Function SetDIBitsToDevice Lib "GDI" (ByVal hDC#, ByVal X#, ByVal Y#, ByVal dX#, ByVal dY#, ByVal SrcX#, ByVal SrcY#, ByVal Scan#, ByVal NumScans#, ByVal Bits$, BitsInfo As BITMAPINFO, ByVal wUsage#) As Integer Sub SetDlgItemInt Lib "User" (ByVal hDlg%, ByVal nIDDlgItem%, ByVal wValue%, ByVal bSigned%) Sub SetDlgItemText Lib "User" (ByVal hDlg%, ByVal nIDDlgItem%, ByVal lpString$) Sub SetDoubleClickTime Lib "User" (ByVal wCount%) Function SetEnvironment Lib "GDI" (ByVal lpPortName$, ByVal lpEnviron$, ByVal nCount%) As Integer Function SetErrorMode Lib "Kernel" (ByVal wMode%) As Integer Function SetFocusAPI Lib "User" Alias "SetFocus" (ByVal hWnd%) As Integer Function SetHandleCount Lib "Kernel" (ByVal wNumber%) As Integer Sub SetKeyboardState Lib "User" (lpKeyState As Any) Function SetMapMode Lib "GDI" (ByVal hDC%, ByVal nMapMode%) As Integer Function SetMapperFlags Lib "GDI" (ByVal hDC%, ByVal dwFlag&) As Long Function SetMenu Lib "User" (ByVal hWnd%, ByVal hMenu%) As Integer Function SetMenuItemBitmaps Lib "User" (ByVal hMenu%, ByVal nPosition%, ByVal wFlags%, ByVal hBitmapUnchecked%, ByVal hBitmapChecked%) As Integer Function SetMessageQueue Lib "User" (ByVal cMsg%) As Integer Function SetMetaFileBits Lib "GDI" (ByVal hMem%) As Integer Function SetMetaFileBitsBetter Lib "GDI" (ByVal hmt%) As Integer Function SetPaletteEntries Lib "GDI" (ByVal hPalette%, ByVal wStartIndex%, ByVal wNumEntries%, lpPaletteEntries As PALETTEENTRY) As Integer Function SetParent Lib "User" (ByVal hWndChild%, ByVal hWndNewParent%) As Integer Function SetPixel Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal crColor&) As Long Function SetPolyFillMode Lib "GDI" (ByVal hDC%, ByVal nPolyFillMode%) As Integer Function SetProp Lib "User" (ByVal hWnd%, ByVal lpString$, ByVal hData%) As Integer Sub SetRect Lib "User" (lpRect As RECT, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) Sub SetRectEmpty Lib "User" (lpRect As RECT) Sub SetRectRgn Lib "GDI" (ByVal hRgn%, ByVal X1%, ByVal Y1%, ByVal X2%, ByVal Y2%) Function SetROP2 Lib "GDI" (ByVal hDC%, ByVal nDrawMode%) As Integer Function SetScrollPos Lib "User" (ByVal hWnd%, ByVal nBar%, ByVal nPos%, ByVal bRedraw%) As Integer Sub SetScrollRange Lib "User" (ByVal hWnd%, ByVal nBar%, ByVal nMinPos%, ByVal nMaxPos%, ByVal bRedraw%) Function SetSoundNoise Lib "Sound" (ByVal nSource%, ByVal nDuration%) As Integer Function SetStretchBltMode Lib "GDI" (ByVal hDC%, ByVal nStretchMode%) As Integer Function SetSwapAreaSize Lib "Kernel" (ByVal rsSize%) As Long Sub SetSysColors Lib "User" (ByVal nChanges%, lpSysColor%, lpColorValues&) Function SetSysModalWindow Lib "User" (ByVal hWnd%) As Integer Function SetSystemPaletteUse Lib "GDI" (ByVal hDC%, ByVal wUsage%) As Integer Function SetTextAlign Lib "GDI" (ByVal hDC%, ByVal wFlags%) As Integer Function SetTextCharacterExtra Lib "GDI" (ByVal hDC%, ByVal nCharExtra%) As Integer Function SetTextColor Lib "GDI" (ByVal hDC%, ByVal crColor&) As Long Function SetTextJustification Lib "GDI" (ByVal hDC%, ByVal nBreakExtra%, ByVal nBreakCount%) As Integer Function SetViewportExt Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function SetViewportExtEx Lib "GDI" (ByVal hdc%, ByVal nX%, ByVal nY%, lpSize As SIZE) As Integer Function SetViewportOrg Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function SetViewportOrgEx Lib "GDI" (ByVal hdc%, ByVal nX%, ByVal nY%, lpPoint As POINTAPI) As Integer Function SetVoiceAccent Lib "Sound" (ByVal nVoice%, ByVal nTempo%, ByVal nVolume%, ByVal nMode%, ByVal nPitch%) As Integer Function SetVoiceEnvelope Lib "Sound" (ByVal nVoice%, ByVal nShape%, ByVal nRepeat%) As Integer Function SetVoiceNote Lib "Sound" (ByVal nVoice%, ByVal nValue%, ByVal nLength%, ByVal nCdots%) As Integer Function SetVoiceQueueSize Lib "Sound" (ByVal nVoice%, ByVal nBytes%) As Integer Function SetVoiceSound Lib "Sound" (ByVal nVoice%, ByVal lFrequency&, ByVal nDuration%) As Integer Function SetVoiceThreshold Lib "Sound" (ByVal nVoice%, ByVal nNotes%) As Integer Function SetWinDebugInfo Lib "Kernel" (lpwdi As WINDEBUGINFO) As Integer Function SetWindowExt Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function SetWindowExtEx Lib "GDI" (ByVal hdc%, ByVal nX%, ByVal nY%, lpSize As SIZE) As Integer Function SetWindowLong Lib "User" (ByVal hWnd%, ByVal nIndex%, ByVal dwNewLong&) As Long Function SetWindowOrg Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%) As Long Function SetWindowOrgEx Lib "GDI" (ByVal hdc%, ByVal nX%, ByVal nY%, lpPoint As POINTAPI) As Integer Function SetWindowPlacement Lib "User" (ByVal hwnd%, lpwndpl As WINDOWPLACEMENT) As Integer Function SetWindowPos Lib "User" (ByVal hWnd%, ByVal hWndInsertAfter%, ByVal X%, ByVal Y%, ByVal cX%, ByVal cY%, ByVal wFlags%) As Integer Sub SetWindowText Lib "User" (ByVal hWnd%, ByVal lpString$) Function SetWindowWord Lib "User" (ByVal hWnd%, ByVal nIndex%, ByVal wNewWord%) As Integer Function ShellExecute Lib "Shell.dll" (ByVal hWnd%, ByVal lpszOp$, ByVal lpszFile$, ByVal lpszParams$, ByVal lpszDir$, ByVal fsShowCnd%) As Integer Sub ShowCaret Lib "User" (ByVal hWnd%) Function ShowCursor Lib "User" (ByVal bShow%) As Integer Sub ShowOwnedPopups Lib "User" (ByVal hWnd%, ByVal fShow%) Sub ShowScrollBar Lib "User" (ByVal hWnd%, ByVal wBar%, ByVal bShow%) Function ShowWindow Lib "User" (ByVal hWnd%, ByVal nCmdShow%) As Integer Function SizeofResource Lib "Kernel" (ByVal hInstance%, ByVal hResInfo%) As Long Function SndPlaySound Lib "MMSystem.dll" (ByVal lpszSoundName$, ByVal wFlags%) As Integer Function SpoolFile Lib "GDI" (ByVal lpszPrinter$, ByVal lpszPort$, ByVal lpszJob$, ByVal lpszFile$) As Integer Function StartDoc Lib "GDI" (ByVal hdc%, lpdi As DOCINFO) As Integer Function StartPage Lib "GDI" (ByVal hdc%) As Integer Function StartSound Lib "Sound" () As Integer Function StopSound Lib "Sound" () As Integer Function StretchBlt Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal nWidth%, ByVal nHeight%, ByVal hSrcDC%, ByVal XSrc%, ByVal YSrc%, ByVal nSrcWidth%, ByVal nSrcHeight%, ByVal dwRop&) As Integer Function StretchDIBits Lib "GDI" (ByVal hDC#, ByVal X#, ByVal Y#, ByVal dX#, ByVal dY#, ByVal SrcX#, ByVal SrcY#, ByVal wSrcWidth#, ByVal wSrcHeight#, ByVal lpBits$, lpBitsInfo As BITMAPINFO, ByVal wUsage#, ByVal dwRop&) As Double Function SubtractRect Lib "User" (lprcDest As RECT, lprcSource1 As RECT, lprcSource2 As RECT) As Integer Function SwapMouseButton Lib "User" (ByVal bSwap%) As Integer Sub SwapRecording Lib "Kernel" (ByVal wFlag%) Sub SwitchStackBack Lib "Kernel" () Sub SwitchStackTo Lib "Kernel" (ByVal wStackSegment%, ByVal wStackPointer%, ByVal wStackTop%) Function SyncAllVoices Lib "Sound" () As Integer Function SystemParametersInfo Lib "User" (ByVal uAction%, ByVal uParam%, lpvParam As Any, ByVal fuWinIni%) As Integer Function TabbedTextOut Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal lpString$, ByVal nCount%, ByVal nTabPositions%, lpnTabStopPositions%, ByVal nTabOrigin%) As Long Function TextOut Lib "GDI" (ByVal hDC%, ByVal X%, ByVal Y%, ByVal lpString$, ByVal nCount%) As Integer Sub Throw Lib "Kernel" (lpCatchBuf As Any, ByVal nThrowBack%) Function ToAscii Lib "Keyboard" (ByVal wVirtKey%, ByVal wScanCode%, lpKeyState As Any, lpChar As Any, Byval wFlags%) As Integer Function TrackPopupMenu Lib "User" (ByVal hMenu%, ByVal wFlags%, ByVal x%, ByVal y%, ByVal nReserved%, ByVal hWnd%, lpReserved As Any) As Integer Function TranslateAccelerator Lib "User" (ByVal hWnd%, ByVal hAccTable%, lpMsg As MSG) As Integer Function TranslateMDISysAccel Lib "User" (ByVal hWndClient%, lpMsg As MSG) As Integer Function TranslateMessage Lib "User" (lpMsg As MSG) As Integer Function TransmitCommChar Lib "User" (ByVal nCid%, ByVal cChar%) As Integer Function UngetCommChar Lib "User" (ByVal nCid%, ByVal cChar%) As Integer Function UnhookWindowsHookEx Lib "User" (ByVal hHook%) As Integer Function UnionRect Lib "User" (lpDestRect As RECT, lpSrc1Rect As RECT, lpSrc2Rect As RECT) As Integer Function UnlockResource Lib "Kernel" Alias "GlobalUnlock" (ByVal hMem%) As Integer Function UnlockSegment Lib "Kernel" (ByVal wSegment%) As Integer Function UnrealizeObject Lib "GDI" (ByVal hObject%) As Integer Function UnregisterClass Lib "User" (ByVal lpClassName$, ByVal hInstance%) As Integer Function UpdateColors Lib "GDI" (ByVal hDC%) As Integer Sub UpdateWindow Lib "User" (ByVal hWnd%) Sub ValidateCodeSegments Lib "Kernel" () Function ValidateFreeSpaces Lib "Kernel" () As Long Sub ValidateRect Lib "User" (ByVal hWnd%, lpRect As RECT) Sub ValidateRgn Lib "User" (ByVal hWnd%, ByVal hRgn%) Function VkKeyScan Lib "Keyboard" (ByVal cChar%) As Integer Sub WaitMessage Lib "User" () Function WaitSoundState Lib "Sound" (ByVal nState%) As Integer Function WindowFromPoint Lib "User" (ByVal ptScreen As Any) As Integer Function WinExec Lib "Kernel" (ByVal lpCmdLine$, ByVal nCmdShow%) As Integer Function WinHelp Lib "User" (ByVal hWnd%, ByVal lpHelpFile$, ByVal wCommand%, dwData As Any) As Integer Function WriteComm Lib "User" (ByVal nCid%, ByVal lpBuf$, ByVal nSize%) As Integer Function WritePrivateProfileString Lib "Kernel" (ByVal lpApplicationName$, ByVal lpKeyName$, ByVal lpString$, ByVal lplFileName$) As Integer Function WriteProfileString Lib "Kernel" (ByVal lpApplicationName$, ByVal lpKeyName$, ByVal lpString$) As Integer Function Wvsprintf Lib "User" (ByVal lpOutput$, ByVal lpFormat$, lpArglist%) As Integer Sub Yield Lib "Kernel" ()