1957 lines
59 KiB
Plaintext
1957 lines
59 KiB
Plaintext
********************************************************************************
|
|
*!* ctl32_api.prg
|
|
********************************************************************************
|
|
*!* |http://www.codeplex.com/VFPX/Thread/View.aspx?ThreadId=11535
|
|
*!* GDIPLUSX method of declaring and protecting api declares
|
|
*!* 200+ API declares and counting...
|
|
********************************************************************************
|
|
#Include ctl32.h
|
|
|
|
If Not Sys(16) $ Upper(Set("Procedure")) Then
|
|
Set Procedure To Sys(16) Additive
|
|
Endif
|
|
|
|
Return
|
|
|
|
Function apiAppendMenu
|
|
Lparameters hMenu, wFlags, uIDNewItem, lpNewItem
|
|
Declare Integer AppendMenu In win32api As apiAppendMenu ;
|
|
Integer hMenu, ;
|
|
Integer wFlags, ;
|
|
Integer uIDNewItem, ;
|
|
String lpNewItem
|
|
Return apiAppendMenu(m.hMenu, m.wFlags, m.uIDNewItem, m.lpNewItem)
|
|
Endfunc
|
|
|
|
Function apiAttachThreadInput
|
|
Lparameters idAttach, idAttachTo, fAttach
|
|
Declare Integer AttachThreadInput In win32api As apiAttachThreadInput;
|
|
Integer idAttach, ;
|
|
Integer idAttachTo, ;
|
|
Integer fAttach
|
|
Return apiAttachThreadInput(m.idAttach, m.idAttachTo, m.fAttach)
|
|
Endfunc
|
|
|
|
Function apiBitBlt
|
|
Lparameters hdcDest, nXDest, nYDest, nWidth, nHeight, hdcSrc, nXSrc, nYSrc, dwRop
|
|
Declare Integer BitBlt In win32api As apiBitBlt ;
|
|
Integer hdcDest, ;
|
|
Integer nXDest, ;
|
|
Integer nYDest, ;
|
|
Integer nWidth, ;
|
|
Integer nHeight, ;
|
|
Integer hdcSrc, ;
|
|
Integer nXSrc, ;
|
|
Integer nYSrc, ;
|
|
Integer dwRop
|
|
Return apiBitBlt(m.hdcDest, m.nXDest, m.nYDest, m.nWidth, m.nHeight, m.hdcSrc, m.nXSrc, m.nYSrc, m.dwRop)
|
|
Endfunc
|
|
|
|
Function apiCallWindowProc
|
|
Lparameters lpPrevWndFunc, nhWnd, Msg, wParam, Lparam
|
|
Declare Integer CallWindowProc In win32api As apiCallWindowProc ;
|
|
Integer lpPrevWndFunc, ;
|
|
Integer nhWnd, ;
|
|
Integer msg, ;
|
|
Integer wParam, ;
|
|
Integer Lparam
|
|
Return apiCallWindowProc(m.lpPrevWndFunc, m.nhWnd, m.Msg, m.wParam, m.lParam)
|
|
Endfunc
|
|
|
|
Function apiCheckMenuItem
|
|
Lparameters hMenu, uIDCheckItem, uCheck
|
|
Declare Integer CheckMenuItem In win32api As apiCheckMenuItem ;
|
|
Integer hmenu, ;
|
|
Integer uIDCheckItem, ;
|
|
Integer uCheck
|
|
Return apiCheckMenuItem(m.hMenu, m.uIDCheckItem, m.uCheck)
|
|
Endfunc
|
|
|
|
Function apiCheckMenuRadioItem
|
|
Lparameters hMenu, idFirst, idLast, idCheck, uFlags
|
|
Declare Integer CheckMenuRadioItemA In win32api As apiCheckMenuRadioItem ;
|
|
Integer hmenu, ;
|
|
Integer idFirst, ;
|
|
Integer idLast, ;
|
|
Integer idCheck, ;
|
|
Integer uFlags
|
|
Return apiCheckMenuRadioItem(m.hMenu, m.idFirst, m.idLast, m.idCheck, m.uFlags)
|
|
Endfunc
|
|
|
|
Function apiChildWindowFromPoint
|
|
Lparameters nHwndParent, px, py
|
|
Declare Integer ChildWindowFromPoint In win32api As apiChildWindowFromPoint ;
|
|
Integer nHwndParent,;
|
|
Integer px,;
|
|
Integer py
|
|
Return apiChildWindowFromPoint(m.nHwndParent, m.px, m.py)
|
|
Endfunc
|
|
|
|
Function apiClientToScreen
|
|
Lparameters nhWnd, lpPoint
|
|
Declare Integer ClientToScreen In win32api As apiClientToScreen ;
|
|
Integer nhWnd, ;
|
|
String @lpPoint
|
|
Return apiClientToScreen(m.nhWnd, @m.lpPoint)
|
|
Endfunc
|
|
|
|
Function apiCloseHandle
|
|
Lparameters hObject
|
|
Declare Integer CloseHandle In win32api As apiCloseHandle ;
|
|
Integer hObject
|
|
Return apiCloseHandle(m.hObject)
|
|
Endfunc
|
|
|
|
Function apiClosePrinter
|
|
Lparameters hPrinter
|
|
Declare Integer ClosePrinter In winspool.drv As apiClosePrinter ;
|
|
Integer hPrinter
|
|
Return apiClosePrinter(m.hPrinter)
|
|
Endfunc
|
|
|
|
Function apiCloseThemeData
|
|
Lparameters hTheme
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer CloseThemeData In uxtheme As apiCloseThemeData ;
|
|
Integer hTheme
|
|
Return apiCloseThemeData(m.hTheme)
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiCoCreateGuid
|
|
Lparameters pguid
|
|
Declare Integer CoCreateGuid In Ole32 As apiCoCreateGuid;
|
|
String @pguid
|
|
Return apiCoCreateGuid(@m.pguid)
|
|
Endfunc
|
|
|
|
Function apiColorAdjustLuma
|
|
Lparameters clrRGB, nLum, fScale
|
|
Declare Integer ColorAdjustLuma In shlwapi.Dll As apiColorAdjustLuma ;
|
|
Integer clrRGB, ;
|
|
Integer nLum, ;
|
|
Integer fScale
|
|
Return apiColorAdjustLuma(m.clrRGB, m.nLum, m.fScale)
|
|
Endfunc
|
|
|
|
Function apiColorRGBToHLS
|
|
Lparameters clrRGB, pwHue, pwLuminance, pwSaturation
|
|
Declare ColorRGBToHLS In shlwapi.Dll As apiColorRGBToHLS ;
|
|
Integer clrRGB,;
|
|
Integer @pwHue,;
|
|
Integer @pwLuminance,;
|
|
Integer @pwSaturation
|
|
Return apiColorRGBToHLS(clrRGB, @pwHue, @pwLuminance, @pwSaturation)
|
|
Endfunc
|
|
|
|
Function apiCommDlgExtendedError()
|
|
Declare Integer CommDlgExtendedError In comdlg32.Dll As apiCommDlgExtendedError
|
|
Return apiCommDlgExtendedError()
|
|
Endfunc
|
|
|
|
Function apiCoTaskMemFree
|
|
Lparameters Pv
|
|
Declare CoTaskMemFree In ole32.Dll As apiCoTaskMemFree ;
|
|
Integer Pv
|
|
Return apiCoTaskMemFree(m.pv)
|
|
Endfunc
|
|
|
|
Function apiCreateCompatibleBitmap
|
|
Lparameters hdc, nWidth, nHeight
|
|
Declare Integer CreateCompatibleBitmap In win32api As apiCreateCompatibleBitmap ;
|
|
Integer hdc,;
|
|
Integer nWidth,;
|
|
Integer nHeight
|
|
Return apiCreateCompatibleBitmap(m.hdc, m.nWidth, m.nHeight)
|
|
Endfunc
|
|
|
|
Function apiCreateCompatibleDC
|
|
Lparameters hdc
|
|
Declare Integer CreateCompatibleDC In win32api As apiCreateCompatibleDC ;
|
|
Integer hdc
|
|
Return apiCreateCompatibleDC(m.hdc)
|
|
Endfunc
|
|
|
|
Function apiCreateFile
|
|
Lparameters lpFileName, dwDesiredAccess, dwShareMode, lpSecurityAttributes, dwCreationDisposition, dwFlagsAndAttributes, hTemplateFile
|
|
Declare Integer CreateFile In win32api As apiCreateFile ;
|
|
String lpFileName, ;
|
|
Integer dwDesiredAccess, ;
|
|
Integer dwShareMode, ;
|
|
Integer lpSecurityAttributes, ;
|
|
Integer dwCreationDisposition, ;
|
|
Integer dwFlagsAndAttributes, ;
|
|
Integer hTemplateFile
|
|
Return apiCreateFile(m.lpFileName, m.dwDesiredAccess, m.dwShareMode, m.lpSecurityAttributes, m.dwCreationDisposition, m.dwFlagsAndAttributes, m.hTemplateFile)
|
|
Endfunc
|
|
|
|
Function apiCreateFont
|
|
Lparameters nHeight, nWidth, nEscapement, nOrientation, fnWeight, fdwItalic, fdwUnderline, fdwStrikeOut, fdwCharSet, fdwOutputPrecision, fdwClipPrecision, fdwQuality, fdwPitchAndFamily, lpszFace
|
|
*!* lpszFace
|
|
*!* [in] Pointer to a null-terminated String that specifies the typeface
|
|
*!* name of the font. The length of this String must not exceed 32 characters,
|
|
*!* including the terminating null character.
|
|
Declare Integer CreateFont In win32api As apiCreateFont ;
|
|
Integer nHeight, ;
|
|
Integer nWidth, ;
|
|
Integer nEscapement, ;
|
|
Integer nOrientation, ;
|
|
Integer fnWeight, ;
|
|
Integer fdwItalic, ;
|
|
Integer fdwUnderline, ;
|
|
Integer fdwStrikeOut, ;
|
|
Integer fdwCharSet, ;
|
|
Integer fdwOutputPrecision, ;
|
|
Integer fdwClipPrecision, ;
|
|
Integer fdwQuality, ;
|
|
Integer fdwPitchAndFamily, ;
|
|
String lpszFace
|
|
Return apiCreateFont(m.nHeight, m.nWidth, m.nEscapement, m.nOrientation, m.fnWeight, m.fdwItalic, m.fdwUnderline, m.fdwStrikeOut, m.fdwCharSet, m.fdwOutputPrecision, m.fdwClipPrecision, m.fdwQuality, m.fdwPitchAndFamily, m.lpszFace)
|
|
Endfunc
|
|
|
|
Function apiCreateFontIndirect
|
|
Lparameters lpLogFont
|
|
Declare Integer CreateFontIndirect In win32api As apiCreateFontIndirect ;
|
|
String lpLogFont
|
|
Return apiCreateFontIndirect(m.lpLogFont)
|
|
Endfunc
|
|
|
|
Function apiCreateMenu()
|
|
Declare Integer CreateMenu In win32api As apiCreateMenu
|
|
Return apiCreateMenu()
|
|
Endfunc
|
|
|
|
Function apiCreatePatternBrush
|
|
Lparameters hBitmap
|
|
Declare Integer CreatePatternBrush In gdi32 As apiCreatePatternBrush ;
|
|
Integer hBitmap
|
|
Return apiCreatePatternBrush(m.hBitmap)
|
|
Endfunc
|
|
|
|
Function apiCreatePopupMenu()
|
|
Declare Integer CreatePopupMenu In win32api As apiCreatePopupMenu
|
|
Return apiCreatePopupMenu()
|
|
Endfunc
|
|
|
|
Function apiCreateRectRgn
|
|
Lparameters x1, y1, x2, y2
|
|
Declare Integer CreateRectRgn In win32api As apiCreateRectRgn ;
|
|
Integer x1, ;
|
|
Integer y1, ;
|
|
Integer x2, ;
|
|
Integer y2
|
|
Return apiCreateRectRgn(m.x1, m.y1, m.x2, m.y2)
|
|
Endfunc
|
|
|
|
Function apiCreateSolidBrush
|
|
Lparameters crColor
|
|
Declare Integer CreateSolidBrush In win32api As apiCreateSolidBrush ;
|
|
Integer crColor
|
|
Return apiCreateSolidBrush(m.crColor)
|
|
Endfunc
|
|
|
|
Function apiCreateWindowEx
|
|
Lparameters dwExStyle, lpClassName, lpWindowName, dwStyle, nx, ny, nWidth, nHeight, nHwndParent, hMenu, hInstance, lpParam
|
|
Declare Integer CreateWindowEx In win32api As apiCreateWindowEx ;
|
|
Integer dwExStyle, ;
|
|
String lpClassName, ;
|
|
String lpWindowName, ;
|
|
Integer dwStyle, ;
|
|
Integer nx, ;
|
|
Integer ny, ;
|
|
Integer nWidth, ;
|
|
Integer nHeight, ;
|
|
Integer nHwndParent, ;
|
|
Integer hMenu, ;
|
|
Integer hInstance, ;
|
|
Integer lpParam
|
|
Return apiCreateWindowEx(m.dwExStyle, m.lpClassName, m.lpWindowName, m.dwStyle, m.nx, m.ny, m.nWidth, m.nHeight, m.nHwndParent, m.hMenu, m.hInstance, m.lpParam)
|
|
Endfunc
|
|
|
|
Function apiDeleteObject
|
|
Lparameters hObject
|
|
Declare Integer DeleteObject In win32api As apiDeleteObject;
|
|
Integer hObject
|
|
Return apiDeleteObject(m.hObject)
|
|
Endfunc
|
|
|
|
Function apiDeleteUrlCacheEntry
|
|
Lparameters lpszUrlName
|
|
Declare Integer apiDeleteUrlCacheEntry In wininet.Dll As apiDeleteUrlCacheEntry ;
|
|
String lpszUrlName
|
|
Return apiDeleteUrlCacheEntry(m.lpszUrlName)
|
|
Endfunc
|
|
|
|
Function apiDestroyMenu
|
|
Lparameters hMenu
|
|
Declare Integer DestroyMenu In win32api As apiDestroyMenu;
|
|
Integer hMenu
|
|
Return apiDestroyMenu(m.hMenu)
|
|
Endfunc
|
|
|
|
Function apiDestroyWindow
|
|
Lparameters nhWnd
|
|
Declare Integer DestroyWindow In win32api As apiDestroyWindow ;
|
|
Integer nhWnd
|
|
Return apiDestroyWindow(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiDrawIconEx
|
|
Lparameters hdc, xLeft, yTop, hIcon, cxWidth, cyWidth, istepIfAniCur, hbrFlickerFreeDraw, diFlags
|
|
Declare Integer DrawIconEx In win32api As apiDrawIconEx ;
|
|
Integer hdc, ;
|
|
Integer xLeft, ;
|
|
Integer yTop, ;
|
|
Integer hIcon, ;
|
|
Integer cxWidth, ;
|
|
Integer cyWidth, ;
|
|
Integer istepIfAniCur, ;
|
|
Integer hbrFlickerFreeDraw, ;
|
|
Integer diFlags
|
|
Return apiDrawIconEx(m.hdc, m.xLeft, m.yTop, m.hIcon, m.cxWidth, m.cyWidth, m.istepIfAniCur, m.hbrFlickerFreeDraw, m.diFlags)
|
|
Endfunc
|
|
|
|
Function apiDrawThemeBackground
|
|
Lparameters hTheme, hdc, iPartId, iStateId, pRect, pClipRect
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer DrawThemeBackground In uxtheme As apiDrawThemeBackground ;
|
|
Integer hTheme, ;
|
|
Integer hdc, ;
|
|
Integer iPartId, ;
|
|
Integer iStateId, ;
|
|
String pRect, ;
|
|
String pClipRect
|
|
Return apiDrawThemeBackground(m.hTheme, m.hdc, m.iPartId, m.iStateId, m.pRect, m.pClipRect)
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiEnableMenuItem
|
|
Lparameters hMenu, uIDEnableItem, uEnable
|
|
Declare Integer EnableMenuItem In win32api As apiEnableMenuItem;
|
|
Integer hMenu, ;
|
|
Integer uIDEnableItem, ;
|
|
Integer uEnable
|
|
Return apiEnableMenuItem(m.hMenu, m.uIDEnableItem, m.uEnable)
|
|
Endfunc
|
|
|
|
Function apiEnableWindow
|
|
Lparameters nhWnd, bEnable
|
|
Declare Integer EnableWindow In win32api As apiEnableWindow ;
|
|
Integer nhWnd, ;
|
|
Integer bEnable
|
|
Return apiEnableWindow(m.nhWnd, m.bEnable)
|
|
Endfunc
|
|
|
|
Function apiEndDocPrinter
|
|
Lparameters hPrinter
|
|
Declare Integer EndDocPrinter In winspool.drv As apiEndDocPrinter;
|
|
Integer hPrinter
|
|
Return apiEndDocPrinter(m.hPrinter)
|
|
Endfunc
|
|
|
|
Function apiFileTimeToLocalFileTime
|
|
Lparameters lpFileTime, lpLocalFileTime
|
|
Declare Integer FileTimeToLocalFileTime In win32api As apiFileTimeToLocalFileTime ;
|
|
Integer lpFileTime, ;
|
|
Integer lpLocalFileTime
|
|
Return apiFileTimeToLocalFileTime(m.lpFileTime, m.lpLocalFileTime)
|
|
Endfunc
|
|
|
|
Function apiFileTimeToSystemTime
|
|
Lparameters lpFileTime, lpSystemTime
|
|
Declare Integer FileTimeToSystemTime In win32api As apiFileTimeToSystemTime ;
|
|
Integer lpFileTime, ;
|
|
Integer lpSystemTime
|
|
Return apiFileTimeToSystemTime(m.lpFileTime, m.lpSystemTime)
|
|
Endfunc
|
|
|
|
Function apiFillRect
|
|
Lparameters hdc, lprc, hbr
|
|
Declare Integer FillRect In win32api As apiFillRect ;
|
|
Integer hDC, ;
|
|
Integer lprc, ;
|
|
Integer hbr
|
|
Return apiFillRect(m.hdc, m.lprc, m.hbr)
|
|
Endfunc
|
|
|
|
Function apiFindClose
|
|
Lparameters hFindFile
|
|
Declare Integer FindClose In win32api As apiFindClose ;
|
|
Integer hFindFile
|
|
Return apiFindClose(m.hFindFile)
|
|
Endfunc
|
|
|
|
Function apiFindFirstFile
|
|
Lparameters lpFileName, lpFindFileData
|
|
Declare Integer FindFirstFile In win32api As apiFindFirstFile ;
|
|
String lpFileName, ;
|
|
Integer lpFindFileData
|
|
Return apiFindFirstFile(m.lpFileName, m.lpFindFileData)
|
|
Endfunc
|
|
|
|
Function apiFindNextFile
|
|
Lparameters hFindFile, lpFindFileData
|
|
Declare Integer FindNextFile In win32api As apiFindNextFile ;
|
|
Integer hFindFile, ;
|
|
Integer lpFindFileData
|
|
Return apiFindNextFile(m.hFindFile, m.lpFindFileData)
|
|
Endfunc
|
|
|
|
Function apiFindWindow
|
|
Lparameters lpClassName, lpWindowName
|
|
Declare Integer FindWindow In win32api As apiFindWindow;
|
|
String lpClassName, ;
|
|
String lpWindowName
|
|
Return apiFindWindow(m.lpClassName, m.lpWindowName)
|
|
Endfunc
|
|
|
|
Function apiFindWindowEx
|
|
Lparameters hWnd1, hWnd2, lpsz1, lpsz2
|
|
Declare Integer FindWindowEx In win32api As apiFindWindowEx ;
|
|
Integer hWnd1, ;
|
|
Integer hWnd2, ;
|
|
String lpsz1, ;
|
|
String lpsz2
|
|
Return apiFindWindowEx(m.hWnd1, m.hWnd2, m.lpsz1, m.lpsz2)
|
|
Endfunc
|
|
|
|
Function apiFormatMessage
|
|
Lparameters dwFlags, lpSource, dwMessageId, dwLanguageId, lpBuffer, nSize, Arguments
|
|
Declare Integer FormatMessage In win32api As apiFormatMessage ;
|
|
Integer dwFlags, ;
|
|
Integer lpSource, ;
|
|
Integer dwMessageId, ;
|
|
Integer dwLanguageId, ;
|
|
String @lpBuffer, ;
|
|
Integer nSize, ;
|
|
Integer Arguments
|
|
Return apiFormatMessage(m.dwFlags, m.lpSource, m.dwMessageId, m.dwLanguageId, @m.lpBuffer, m.nSize, m.Arguments)
|
|
Endfunc
|
|
|
|
Function apiFreeLibrary
|
|
Lparameters hLibModule
|
|
Declare Integer FreeLibrary In win32api As apiFreeLibrary ;
|
|
Integer hLibModule
|
|
Return apiFreeLibrary(m.hLibModule)
|
|
Endfunc
|
|
|
|
Function apiFtpCommand
|
|
Lparameters hConnect, fExpectResponse, dwFlags, lpszCommand, dwContext, phFtpCommand
|
|
Declare Integer FtpCommand In wininet As apiFtpCommand ;
|
|
Integer hConnect, ;
|
|
Integer fExpectResponse, ;
|
|
Integer dwFlags, ;
|
|
String lpszCommand, ;
|
|
Integer dwContext, ;
|
|
Integer @phFtpCommand
|
|
Return apiFtpCommand(m.hConnect, m.fExpectResponse, m.dwFlags, m.lpszCommand, m.dwContext, @m.phFtpCommand)
|
|
Endfunc
|
|
|
|
Function apiFtpCreateDirectory
|
|
Lparameters hConnect, lpszDirectory
|
|
Declare Integer FtpCreateDirectory In wininet As apiFtpCreateDirectory ;
|
|
Integer hConnect, ;
|
|
String lpszDirectory
|
|
Return apiFtpCreateDirectory(m.hConnect, m.lpszDirectory)
|
|
Endfunc
|
|
|
|
Function apiFtpDeleteFile
|
|
Lparameters hConnect, lpszFileName
|
|
Declare Integer FtpDeleteFile In wininet As apiFtpDeleteFile ;
|
|
Integer hConnect, ;
|
|
String lpszFileName
|
|
Return apiFtpDeleteFile(m.hConnect, m.lpszFileName)
|
|
Endfunc
|
|
|
|
Function apiFtpFindFirstFile
|
|
Lparameters hConnect, lpszSearchFile, lpFindFileData, dwFlags, dwContext
|
|
Declare Integer FtpFindFirstFile In wininet As apiFtpFindFirstFile ;
|
|
Integer hConnect, ;
|
|
String lpszSearchFile, ;
|
|
Integer lpFindFileData, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiFtpFindFirstFile(m.hConnect, m.lpszSearchFile, m.lpFindFileData, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiFtpGetCurrentDirectory
|
|
Lparameters hConnect, lpszCurrentDirectory, lpdwCurrentDirectory
|
|
Declare Integer FtpGetCurrentDirectory In wininet As apiFtpGetCurrentDirectory ;
|
|
Integer hConnect, ;
|
|
String @lpszCurrentDirectory, ;
|
|
Integer @lpdwCurrentDirectory
|
|
Return apiFtpGetCurrentDirectory(m.hConnect, @m.lpszCurrentDirectory, @m.lpdwCurrentDirectory)
|
|
Endfunc
|
|
|
|
Function apiFtpGetFile
|
|
Lparameters hConnect, lpszRemoteFile, lpszNewFile, fFailIfExists, dwFlagsAndAttributes, dwFlags, dwContext
|
|
Declare Integer FtpGetFile In wininet As apiFtpGetFile ;
|
|
Integer hConnect, ;
|
|
String lpszRemoteFile, ;
|
|
String lpszNewFile, ;
|
|
Integer fFailIfExists, ;
|
|
Integer dwFlagsAndAttributes, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiFtpGetFile(m.hConnect, m.lpszRemoteFile, m.lpszNewFile, m.fFailIfExists, m.dwFlagsAndAttributes, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiFtpGetFileSize
|
|
Lparameters hFile, lpdwFileSizeHigh
|
|
Declare Integer FtpGetFileSize In wininet As apiFtpGetFileSize ;
|
|
Integer hFile, ;
|
|
Integer @lpdwFileSizeHigh
|
|
Return apiFtpGetFileSize(m.hFile, @m.lpdwFileSizeHigh)
|
|
Endfunc
|
|
|
|
Function apiFtpOpenFile
|
|
Lparameters hConnect, lpszFileName, dwAccess, dwFlags, dwContext
|
|
Declare Integer FtpOpenFile In wininet As apiFtpOpenFile ;
|
|
Integer hConnect, ;
|
|
String lpszFileName, ;
|
|
Integer dwAccess, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiFtpOpenFile(m.hConnect, m.lpszFileName, m.dwAccess, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiFtpPutFile
|
|
Lparameters hConnect, lpszLocalFile, lpszNewRemoteFile, dwFlags, dwContext
|
|
Declare Integer FtpPutFile In wininet As apiFtpPutFile ;
|
|
Integer hConnect, ;
|
|
String lpszLocalFile, ;
|
|
String lpszNewRemoteFile, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiFtpPutFile(m.hConnect, m.lpszLocalFile, m.lpszNewRemoteFile, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiFtpRemoveDirectory
|
|
Lparameters hConnect, lpszDirectory
|
|
Declare Integer FtpRemoveDirectory In wininet As apiFtpRemoveDirectory ;
|
|
Integer hConnect, ;
|
|
String lpszDirectory
|
|
Return apiFtpRemoveDirectory(m.hConnect, m.lpszDirectory)
|
|
Endfunc
|
|
|
|
Function apiFtpRenameFile
|
|
Lparameters hConnect, lpszExisting, lpszNew
|
|
Declare Integer FtpRenameFile In wininet As apiFtpRenameFile ;
|
|
Integer hConnect, ;
|
|
String lpszExisting, ;
|
|
String lpszNew
|
|
Return apiFtpRenameFile(m.hConnect, m.lpszExisting, m.lpszNew)
|
|
Endfunc
|
|
|
|
Function apiFtpSetCurrentDirectory
|
|
Lparameters hConnect, lpszDirectory
|
|
Declare Integer FtpSetCurrentDirectory In wininet As apiFtpSetCurrentDirectory ;
|
|
Integer hConnect, ;
|
|
String lpszDirectory
|
|
Return apiFtpSetCurrentDirectory(m.hConnect, m.lpszDirectory)
|
|
Endfunc
|
|
|
|
Function apiGetActiveWindow()
|
|
Declare Integer GetActiveWindow In win32api As apiGetActiveWindow
|
|
Return apiGetActiveWindow()
|
|
Endfunc
|
|
|
|
Function apiGetCaretPos
|
|
Lparameters lpPoint
|
|
Declare Integer GetCaretPos In win32api As apiGetCaretPos;
|
|
String @lpPoint
|
|
Return apiGetCaretPos(@m.lpPoint)
|
|
Endfunc
|
|
|
|
Function apiGetClassLong
|
|
Lparameters nhWnd, nIndex
|
|
Declare Integer GetClassLong In win32api As apiGetClassLong;
|
|
Integer nhWnd, ;
|
|
Integer nIndex
|
|
Return apiGetClassLong(m.nhWnd, m.nIndex)
|
|
Endfunc
|
|
|
|
Function apiGetClientRect
|
|
Lparameters nhWnd, lcRect
|
|
Declare Integer GetClientRect In win32api As apiGetClientRect ;
|
|
Integer nhWnd,;
|
|
String @lcRect
|
|
Return apiGetClientRect(m.nhWnd, @m.lcRect)
|
|
Endfunc
|
|
|
|
Function apiGetCursorPos
|
|
Lparameters lpPoint
|
|
Declare Integer GetCursorPos In win32api As apiGetCursorPos;
|
|
String @lpPoint
|
|
Return apiGetCursorPos(@m.lpPoint)
|
|
Endfunc
|
|
|
|
Function apiGetDateFormat
|
|
Lparameters Locale, dwFlags, lpDate, lpFormat, lpDateStr, cchDate
|
|
Declare Integer GetDateFormat In win32api As apiGetDateFormat ;
|
|
Integer Locale, ;
|
|
Integer dwFlags, ;
|
|
String lpDate, ;
|
|
String lpFormat, ;
|
|
String @lpDateStr, ;
|
|
Integer cchDate
|
|
Return apiGetDateFormat(m.Locale, m.dwFlags, m.lpDate, m.lpFormat, @m.lpDateStr, m.cchDate)
|
|
Endfunc
|
|
|
|
Function apiGetDC
|
|
Lparameters nhWnd
|
|
Declare Integer GetDC In win32api As apiGetDC ;
|
|
Integer nhWnd
|
|
Return apiGetDC(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiGetDesktopWindow()
|
|
Declare Integer GetDesktopWindow In win32api As apiGetDesktopWindow
|
|
Return apiGetDesktopWindow()
|
|
Endfunc
|
|
|
|
Function apiGetDeviceCaps
|
|
Lparameters hdc, nIndex
|
|
Declare Integer GetDeviceCaps In win32api As apiGetDeviceCaps ;
|
|
Integer hdc, ;
|
|
Integer nIndex
|
|
Return apiGetDeviceCaps(m.hdc, m.nIndex)
|
|
Endfunc
|
|
|
|
Function apiGetDoubleClickTime()
|
|
Declare Integer GetDoubleClickTime In win32api As apiGetDoubleClickTime
|
|
Return apiGetDoubleClickTime()
|
|
Endfunc
|
|
|
|
Function apiGetFileSizeEx
|
|
Lparameters hFile, lpFileSize
|
|
Declare Integer GetFileSizeEx In win32api As apiGetFileSizeEx ;
|
|
Integer hFile, ;
|
|
String @lpFileSize
|
|
Return apiGetFileSizeEx(m.hFile, @m.lpFileSize)
|
|
Endfunc
|
|
|
|
Function apiGetFocus()
|
|
Declare Integer GetFocus In win32api As apiGetFocus
|
|
Return apiGetFocus()
|
|
Endfunc
|
|
|
|
Function apiGetForegroundWindow()
|
|
Declare Integer GetForegroundWindow In win32api As apiGetForegroundWindow
|
|
Return apiGetForegroundWindow()
|
|
Endfunc
|
|
|
|
Function apiGetIpAddrTable
|
|
Lparameters pIpAddrTable, pdwSize, nbOrder
|
|
Declare Integer GetIpAddrTable In iphlpapi As apiGetIpAddrTable ;
|
|
String @pIpAddrTable, ;
|
|
Integer @pdwSize, ;
|
|
Integer nbOrder
|
|
Return apiGetIpAddrTable(@m.pIpAddrTable, @m.pdwSize, m.nbOrder)
|
|
Endfunc
|
|
|
|
Function apiGetKeyState
|
|
Lparameters nVirtKey
|
|
Declare Integer GetKeyState In win32api As apiGetKeyState ;
|
|
Integer nVirtKey
|
|
Return apiGetKeyState(m.nVirtKey)
|
|
Endfunc
|
|
|
|
Function apiGetLastError()
|
|
Declare Integer GetLastError In win32api As apiGetLastError
|
|
Return apiGetLastError()
|
|
Endfunc
|
|
|
|
Function apiGetLocaleInfo
|
|
Lparameters Locale, LCType, lpLCData, cchData
|
|
Declare Integer GetLocaleInfo In win32api As apiGetLocaleInfo;
|
|
Integer Locale, ;
|
|
Integer LCType, ;
|
|
String @lpLCData, ;
|
|
Integer cchData
|
|
Return apiGetLocaleInfo(m.Locale, m.LCType, @m.lpLCData, m.cchData)
|
|
Endfunc
|
|
|
|
Function apiGetMenu
|
|
Lparameters nhWnd
|
|
Declare Integer GetMenu In win32api As apiGetMenu ;
|
|
Integer nhWnd
|
|
Return apiGetMenu(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiGetMenuBarInfo
|
|
Lparameters nhWnd, idObject, idItem, pmbi
|
|
Declare Integer GetMenuBarInfo In win32api As apiGetMenuBarInfo ;
|
|
Integer nhWnd, ;
|
|
Integer idObject, ;
|
|
Integer idItem, ;
|
|
String @pmbi
|
|
Return apiGetMenuBarInfo(m.nhWnd, m.idObject, m.idItem, m.pmbi)
|
|
Endfunc
|
|
|
|
Function apiGetMenuCheckMarkDimensions()
|
|
*!* The GetMenuCheckMarkDimensions function is included only for compatibility
|
|
*!* with 16-bit versions of Microsoft Windows. Applications should use the
|
|
*!* GetSystemMetrics function with the CXMENUCHECK and CYMENUCHECK values to
|
|
*!* retrieve the bitmap dimensions.
|
|
Return apiGetSystemMetrics(SM_CXMENUCHECK) + apiGetSystemMetrics(SM_CYMENUCHECK) * 0x10000
|
|
Endfunc
|
|
|
|
Function apiGetMenuContextHelpId
|
|
Lparameters hMenu
|
|
Declare Integer GetMenuContextHelpId In win32api As apiGetMenuContextHelpId ;
|
|
Integer hMenu
|
|
Return apiGetMenuContextHelpId(m.hMenu)
|
|
Endfunc
|
|
|
|
Function apiGetMenuDefaultItem
|
|
Lparameters hMenu, fByPos, gmdiFlags
|
|
Declare Integer GetMenuDefaultItem In win32api As apiGetMenuDefaultItem ;
|
|
Integer hMenu, ;
|
|
Integer fByPos, ;
|
|
Integer gmdiFlags
|
|
Return apiGetMenuDefaultItem(m.hMenu, m.fByPos, m.gmdiFlags)
|
|
Endfunc
|
|
|
|
Function apiGetMenuInfo
|
|
Lparameters hMenu, lpcmi
|
|
Declare Integer GetMenuInfo In win32api As apiGetMenuInfo ;
|
|
Integer hmenu, ;
|
|
String @lpcmi
|
|
Return apiGetMenuInfo(m.hMenu, m.lpcmi)
|
|
Endfunc
|
|
|
|
Function apiGetMenuItemCount
|
|
Lparameters hMenu
|
|
Declare Integer GetMenuItemCount In win32api As apiGetMenuItemCount ;
|
|
Integer hMenu
|
|
Return apiGetMenuItemCount(m.hMenu)
|
|
Endfunc
|
|
|
|
Function apiGetMenuItemID
|
|
Lparameters hMenu, nPos
|
|
Declare Integer GetMenuItemID In win32api As apiGetMenuItemID ;
|
|
Integer hMenu, ;
|
|
Integer nPos
|
|
Return apiGetMenuItemID(m.hMenu, m.nPos)
|
|
Endfunc
|
|
|
|
Function apiGetMenuItemInfo
|
|
Lparameters hMenu, uItem, fByPosition, lpmii
|
|
Declare Integer GetMenuItemInfo In win32api As apiGetMenuItemInfo ;
|
|
Integer hMenu, ;
|
|
Integer uItem, ;
|
|
Integer fByPosition, ;
|
|
String @lpmii
|
|
Return apiGetMenuItemInfo(m.hMenu, m.uItem, m.fByPosition, @m.lpmii)
|
|
Endfunc
|
|
|
|
Function apiGetMenuItemRect
|
|
Lparameters nhWnd, hMenu, uItem, lprcItem
|
|
Declare Integer GetMenuItemRect In win32api As apiGetMenuItemRect ;
|
|
Integer nhWnd, ;
|
|
Integer hMenu, ;
|
|
Integer uItem, ;
|
|
String @lprcItem
|
|
Return apiGetMenuItemRect(m.nhWnd, m.hMenu, m.uItem, @m.lprcItem)
|
|
Endfunc
|
|
|
|
Function apiGetMenuState
|
|
Lparameters hMenu, uID, uwFlags
|
|
Declare Integer GetMenuState In win32api As apiGetMenuState ;
|
|
Integer hMenu, ;
|
|
Integer uID, ;
|
|
Integer uFlags
|
|
Return apiGetMenuState(m.hMenu, m.uID, m.uwFlags)
|
|
Endfunc
|
|
|
|
Function apiGetMenuString
|
|
Lparameters hMenu, uIDItem , lpString , nMaxCount , uFlag
|
|
Declare Integer GetMenuString In win32api As apiGetMenuString ;
|
|
Integer hMenu, ;
|
|
Integer uIDItem, ;
|
|
String @lpString, ;
|
|
Integer nMaxCount, ;
|
|
Integer uFlag
|
|
Return apiGetMenuString(m.hMenu, m.uIDItem , @m.lpString , m.nMaxCount , m.uFlag)
|
|
Endfunc
|
|
|
|
Function apiGetModuleHandle
|
|
Lparameters lpModule
|
|
Declare Integer GetModuleHandle In win32api As apiGetModuleHandle ;
|
|
String lpModule
|
|
Return apiGetModuleHandle(m.lpModule)
|
|
Endfunc
|
|
|
|
Function apiGetMonitorInfo
|
|
Lparameters hMonitor, lpmi
|
|
Declare Integer GetMonitorInfo In win32api As apiGetMonitorInfo ;
|
|
Integer hMonitor, ;
|
|
Integer lpmi
|
|
Return apiGetMonitorInfo(m.hMonitor, m.lpmi)
|
|
Endfunc
|
|
|
|
Function apiGetObject
|
|
Lparameters hObject, nCount, lpObject
|
|
*#beautify keyword_nochange
|
|
Declare Integer GetObject In win32api as apiGetObject ;
|
|
Integer hObject, ;
|
|
Integer nCount, ;
|
|
String @lpObject
|
|
*#beautify
|
|
Return apiGetObject(m.hObject, m.nCount, @m.lpObject)
|
|
Endfunc
|
|
|
|
Function apiGetOpenFileName
|
|
Lparameters m.lpofn
|
|
Declare Integer GetOpenFileName In comdlg32.Dll As apiGetOpenFileName ;
|
|
Integer lpofn
|
|
Return apiGetOpenFileName(m.lpofn)
|
|
Endfunc
|
|
|
|
Function apiGetParent
|
|
Lparameters nhWnd
|
|
Declare Integer GetParent In win32api As apiGetParent;
|
|
Integer nhWnd
|
|
Return apiGetParent(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiGetPixel
|
|
Lparameters hdc, pointx, pointy
|
|
Declare Integer GetPixel In win32api As apiGetPixel ;
|
|
Integer hdc,;
|
|
Integer pointx,;
|
|
Integer pointy
|
|
Return apiGetPixel(m.hdc, m.pointx, m.pointy)
|
|
Endfunc
|
|
|
|
Function apiGetPrivateProfileString
|
|
Lparameters lpAppName, lpKeyName, lpDefault, lpReturnedString, nSize, lpFileName
|
|
Declare Integer GetPrivateProfileString In win32api As apiGetPrivateProfileString ;
|
|
String lpAppName,;
|
|
String lpKeyName,;
|
|
String lpDefault,;
|
|
String @lpReturnedString,;
|
|
Integer nSize,;
|
|
String lpFileName
|
|
Return apiGetPrivateProfileString(m.lpAppName, m.lpKeyName, m.lpDefault, @m.lpReturnedString, m.nSize, m.lpFileName)
|
|
Endfunc
|
|
|
|
Function apiGetProcAddress
|
|
Lparameters hModule, lpProcName
|
|
Declare Integer GetProcAddress In win32api As apiGetProcAddress;
|
|
Integer hModule, ;
|
|
String lpProcName
|
|
Return apiGetProcAddress(m.hModule, m.lpProcName)
|
|
Endfunc
|
|
|
|
Function apiGetProcessHeap()
|
|
Declare Integer GetProcessHeap In win32api As apiGetProcessHeap
|
|
Return apiGetProcessHeap()
|
|
Endfunc
|
|
|
|
Function apiGetProp
|
|
Lparameters nhWnd, lpString
|
|
Declare Integer GetProp In win32api As apiGetProp ;
|
|
Integer nhWnd, ;
|
|
String lpString
|
|
Return apiGetProp(m.nhWnd, m.lpString)
|
|
Endfunc
|
|
|
|
Function apiGetSaveFileName
|
|
Lparameters m.lpofn
|
|
Declare Integer GetSaveFileName In comdlg32.Dll As apiGetSaveFileName ;
|
|
Integer lpofn
|
|
Return apiGetSaveFileName(m.lpofn)
|
|
Endfunc
|
|
|
|
Function apiGetScrollPos
|
|
Lparameters nWnd, nBar
|
|
Declare Integer GetScrollPos In win32api As apiGetScrollPos ;
|
|
Integer nhWnd, ;
|
|
Integer nBar
|
|
Return apiGetScrollPos(m.nWnd, m.nBar)
|
|
Endfunc
|
|
|
|
Function apiGetScrollRange
|
|
Lparameters nhWnd, nBar, lpMinPos, lpMaxPos
|
|
Declare Integer GetScrollRange In win32api As apiGetScrollRange ;
|
|
Integer nhWnd, ;
|
|
Integer nBar, ;
|
|
Integer @lpMinPos, ;
|
|
Integer @lpMaxPos
|
|
Return apiGetScrollRange(m.nhWnd, m.nBar, @m.lpMinPos, @m.lpMaxPos)
|
|
Endfunc
|
|
|
|
Function apiGetStockObject
|
|
Lparameters fnObject
|
|
Declare Integer GetStockObject In win32api As apiGetStockObject ;
|
|
Integer fnObject
|
|
Return apiGetStockObject(m.fnObject)
|
|
Endfunc
|
|
|
|
Function apiGetSubMenu
|
|
Lparameters hMenu, nPos
|
|
Declare Integer GetSubMenu In win32api As apiGetSubMenu ;
|
|
Integer hMenu, ;
|
|
Integer nPos
|
|
Return apiGetSubMenu(m.hMenu, m.nPos)
|
|
Endfunc
|
|
|
|
Function apiGetSysColor
|
|
Lparameters nIndex
|
|
Declare Integer GetSysColor In win32api As apiGetSysColor ;
|
|
Integer nIndex
|
|
Return apiGetSysColor(m.nIndex)
|
|
Endfunc
|
|
|
|
Function apiGetSystemMetrics
|
|
Lparameters nIndex
|
|
Declare Integer GetSystemMetrics In win32api As apiGetSystemMetrics ;
|
|
Integer nIndex
|
|
Return apiGetSystemMetrics(m.nIndex)
|
|
Endfunc
|
|
|
|
Function apiGetTextExtentPoint32
|
|
Lparameters hdc, lpsz, cbString, lpSize
|
|
Declare Integer GetTextExtentPoint32 In win32api As apiGetTextExtentPoint32 ;
|
|
Integer hdc, ;
|
|
String lpsz, ;
|
|
Integer cbString, ;
|
|
String @lpSize
|
|
Return apiGetTextExtentPoint32(m.hdc, m.lpsz, m.cbString, @m.lpSize)
|
|
Endfunc
|
|
|
|
Function apiGetThemeBitmap
|
|
Lparameters hTheme, iPartId, iStateId , iPropId, dwFlags, phBitmap
|
|
If ctlGetOsVersion() >= NTDDI_VISTA
|
|
Declare Integer GetThemeBitmap In uxtheme As apiGetThemeBitmap ;
|
|
Integer hTheme, ;
|
|
Integer iPartId, ;
|
|
Integer iStateId, ;
|
|
Integer dwFlags, ;
|
|
Integer @phBitmap
|
|
Return apiGetThemeBitmap(m.hTheme, m.iPartId, m.iStateId , m.iPropId, m.dwFlags, m.phBitmap)
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiGetThemeColor
|
|
Lparameters hTheme, iPartId , iStateId , iPropId, pColor
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer GetThemeColor In uxtheme As apiGetThemeColor ;
|
|
Integer hTheme, ;
|
|
Integer iPartId, ;
|
|
Integer iStateId, ;
|
|
Integer iPropId, ;
|
|
Integer @pColor
|
|
Return apiGetThemeColor(m.hTheme, m.iPartId , m.iStateId , m.iPropId , @m.pColor )
|
|
Else
|
|
Return ERROR_INVALID_FUNCTION
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiGetThemePartSize
|
|
Lparameters hTheme, hdc, iPartId, iStateId, prc, eSize, psz
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer GetThemePartSize In uxtheme As apiGetThemePartSize ;
|
|
Integer hTheme, ;
|
|
Integer hdc, ;
|
|
Integer iPartId, ;
|
|
Integer iStateId, ;
|
|
String prc, ;
|
|
Integer eSize, ;
|
|
String @psz
|
|
Return apiGetThemePartSize(m.hTheme, m.hdc, m.iPartId, m.iStateId, m.prc, m.eSize, @m.psz)
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiGetTickCount()
|
|
Declare Integer GetTickCount In win32api As apiGetTickCount
|
|
Return apiGetTickCount()
|
|
Endfunc
|
|
|
|
Function apiGetUserName
|
|
Lparameters lpBuffer, nSize
|
|
Declare Integer GetUserName In advapi32 As apiGetUserName;
|
|
String @lpBuffer,;
|
|
Integer @nSize
|
|
Return apiGetUserName(@m.lpBuffer, @m.nSize)
|
|
Endfunc
|
|
|
|
Function apiGetWindow
|
|
Lparameters nhWnd, wCmd
|
|
Declare Integer GetWindow In win32api As apiGetWindow;
|
|
Integer nhWnd, ;
|
|
Integer wCmd
|
|
Return apiGetWindow(m.nhWnd, m.wCmd)
|
|
Endfunc
|
|
|
|
Function apiGetWindowLong
|
|
Lparameters nhWnd, nIndex
|
|
Declare Integer GetWindowLong In win32api As apiGetWindowLong;
|
|
Integer nhWnd, ;
|
|
Integer nIndex
|
|
Return apiGetWindowLong(m.nhWnd, m.nIndex)
|
|
Endfunc
|
|
|
|
Function apiGetWindowPlacement
|
|
Lparameters nhWnd, lpwndpl
|
|
Declare Integer GetWindowPlacement In win32api As apiGetWindowPlacement ;
|
|
Integer nhWnd, ;
|
|
Integer lpwndpl
|
|
Return apiGetWindowPlacement(m.nhWnd, m.lpwndpl)
|
|
Endfunc
|
|
|
|
Function apiGetWindowRect
|
|
Lparameters nhWnd, lpRect
|
|
Declare Integer GetWindowRect In win32api As apiGetWindowRect ;
|
|
Integer nhWnd, ;
|
|
Integer lpRect
|
|
Return apiGetWindowRect(m.nhWnd, m.lpRect)
|
|
Endfunc
|
|
|
|
Function apiGetWindowThreadProcessId
|
|
Lparameters nhWnd, lpdwProcessId
|
|
Declare Integer GetWindowThreadProcessId In win32api As apiGetWindowThreadProcessId;
|
|
Integer nhWnd, ;
|
|
Integer lpdwProcessId
|
|
Return apiGetWindowThreadProcessId(m.nhWnd, m.lpdwProcessId)
|
|
Endfunc
|
|
|
|
Function apiHeapAlloc
|
|
Lparameters hHeap, dwFlags, dwBytes
|
|
Declare Integer HeapAlloc In win32api As apiHeapAlloc ;
|
|
Integer hHeap, ;
|
|
Integer dwFlags, ;
|
|
Integer dwBytes
|
|
Return apiHeapAlloc(m.hHeap, m.dwFlags, m.dwBytes)
|
|
Endfunc
|
|
|
|
Function apiHeapFree
|
|
Lparameters hHeap, dwFlags, lpMem
|
|
Declare Integer HeapFree In win32api As apiHeapFree;
|
|
Integer hHeap, ;
|
|
Integer dwFlags, ;
|
|
Integer lpMem
|
|
Return apiHeapFree(m.hHeap, m.dwFlags, m.lpMem)
|
|
Endfunc
|
|
|
|
Function apiHeapSize
|
|
Lparameters hHeap, dwFlags, lpMem
|
|
Declare Integer HeapSize In win32api As apiHeapSize;
|
|
Integer hHeap, ;
|
|
Integer dwFlags, ;
|
|
Integer lpMem
|
|
Return apiHeapSize(m.hHeap, m.dwFlags, m.lpMem)
|
|
Endfunc
|
|
|
|
Function apiInitCommonControlsEx
|
|
Lparameters lpInitCtrls
|
|
Declare Integer InitCommonControlsEx In comctl32 As apiInitCommonControlsEx ;
|
|
String lpInitCtrls
|
|
Return apiInitCommonControlsEx(m.lpInitCtrls)
|
|
Endfunc
|
|
|
|
Function apiInsertMenuItem
|
|
Lparameters hMenu, uItem, fByPosition, lpmii
|
|
Declare Integer InsertMenuItem In win32api As apiInsertMenuItem ;
|
|
Integer hMenu, ;
|
|
Integer uItem, ;
|
|
Integer fByPosition, ;
|
|
String @lpmii
|
|
Return apiInsertMenuItem(m.hMenu, m.uItem, m.fByPosition, @lpmii)
|
|
Endfunc
|
|
|
|
Function apiInternetAttemptConnect
|
|
Lparameters dwReserved
|
|
Declare Integer InternetAttemptConnect In wininet As apiInternetAttemptConnect ;
|
|
Integer dwReserved
|
|
Return apiInternetAttemptConnect(m.dwReserved)
|
|
Endfunc
|
|
|
|
Function apiInternetAutodial
|
|
Lparameters dwFlags, hwndParent
|
|
Declare Integer InternetAutodial In wininet As apiInternetAutodial ;
|
|
Integer dwFlags, ;
|
|
Integer hwndParent
|
|
Return apiInternetAutodial(m.dwFlags, m.hwndParent)
|
|
Endfunc
|
|
|
|
Function apiInternetCloseHandle
|
|
Lparameters hInternet
|
|
Declare Integer InternetCloseHandle In wininet As apiInternetCloseHandle ;
|
|
Integer hInternet
|
|
Return apiInternetCloseHandle(m.hInternet)
|
|
Endfunc
|
|
|
|
Function apiInternetConnect
|
|
Lparameters hInternet, lpszServerName, nServerPort, lpszUserName, lpszPassword, dwService, dwFlags, dwContext
|
|
Declare Integer InternetConnect In wininet As apiInternetConnect ;
|
|
Integer hInternet, ;
|
|
String lpszServerName, ;
|
|
Integer nServerPort, ;
|
|
String lpszUserName, ;
|
|
String lpszPassword, ;
|
|
Integer dwService, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiInternetConnect(m.hInternet, m.lpszServerName, m.nServerPort, m.lpszUserName, m.lpszPassword, m.dwService, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiInternetCrackUrl
|
|
Lparameters lpszUrl, dwUrlLength, dwFlags, lpUrlComponents
|
|
Declare Integer InternetCrackUrl In wininet As apiInternetCrackUrl ;
|
|
String lpszUrl, ;
|
|
Integer dwUrlLength, ;
|
|
Integer dwFlags, ;
|
|
String @lpUrlComponents
|
|
Return apiInternetCrackUrl(m.lpszUrl, m.dwUrlLength, m.dwFlags, @m.lpUrlComponents)
|
|
Endfunc
|
|
|
|
Function apiInternetErrorDlg
|
|
Lparameters nhWnd, hRequest, dwError, dwFlags, lppvData
|
|
Declare Integer InternetErrorDlg In wininet As apiInternetErrorDlg ;
|
|
Integer nhWnd, ;
|
|
Integer hRequest, ;
|
|
Integer dwError, ;
|
|
Integer dwFlags, ;
|
|
Integer lppvData
|
|
Return apiInternetErrorDlg(m.nhWnd, m.hRequest, m.dwError, m.dwFlags, m.lppvData)
|
|
Endfunc
|
|
|
|
Function apiInternetFindNextFile
|
|
Lparameters hFind, lpFindFileData
|
|
Declare Integer InternetFindNextFile In wininet As apiInternetFindNextFile ;
|
|
Integer hFind, ;
|
|
Integer lpFindFileData
|
|
Return apiInternetFindNextFile(m.hFind, m.lpFindFileData)
|
|
Endfunc
|
|
|
|
Function apiInternetGetLastResponseInfo
|
|
Lparameters lpdwError, lpszBuffer, lpdwBufferLength
|
|
Declare Integer InternetGetLastResponseInfo In wininet As apiInternetGetLastResponseInfo ;
|
|
Integer @lpdwError, ;
|
|
String @lpszBuffer, ;
|
|
Integer @lpdwBufferLength
|
|
Return apiInternetGetLastResponseInfo(@m.lpdwError, @m.lpszBuffer, @m.lpdwBufferLength)
|
|
Endfunc
|
|
|
|
Function apiInternetOpen
|
|
Lparameters lpszAgent, dwAccessType, lpszProxy, lpszProxyBypass, dwFlags
|
|
Declare Integer InternetOpen In wininet As apiInternetOpen ;
|
|
String lpszAgent, ;
|
|
Integer dwAccessType, ;
|
|
String lpszProxy, ;
|
|
String lpszProxyBypass, ;
|
|
Integer dwFlags
|
|
Return apiInternetOpen(m.lpszAgent, m.dwAccessType, m.lpszProxy, m.lpszProxyBypass, m.dwFlags)
|
|
Endfunc
|
|
|
|
Function apiInternetQueryDataAvailable
|
|
Lparameters hFile, lpdwNumberOfBytesAvailable, dwFlags, dwContext
|
|
Declare Integer InternetQueryDataAvailable In wininet As apiInternetQueryDataAvailable ;
|
|
Integer hFile, ;
|
|
Integer @lpdwNumberOfBytesAvailable, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiInternetQueryDataAvailable(m.hFile, @m.lpdwNumberOfBytesAvailable, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiInternetQueryOption
|
|
Lparameters hInternet, dwOption, lpBuffer, lpdwBufferLength
|
|
Declare Integer InternetQueryOption In wininet As apiInternetQueryOption ;
|
|
Integer hInternet, ;
|
|
Integer dwOption, ;
|
|
String @lpBuffer, ;
|
|
Integer @lpdwBufferLength
|
|
Return apiInternetQueryOption(m.hInternet, m.dwOption, @m.lpBuffer, @m.lpdwBufferLength)
|
|
Endfunc
|
|
|
|
Function apiInternetReadFile
|
|
Lparameters hFile, lpBuffer, dwNumberOfBytesToRead, lpdwNumberOfBytesRead
|
|
Declare Integer InternetReadFile In wininet As apiInternetReadFile ;
|
|
Integer hFile, ;
|
|
String @lpBuffer, ;
|
|
Integer dwNumberOfBytesToRead, ;
|
|
Integer @lpdwNumberOfBytesRead
|
|
Return apiInternetReadFile(m.hFile, @m.lpBuffer, m.dwNumberOfBytesToRead, @m.lpdwNumberOfBytesRead)
|
|
Endfunc
|
|
|
|
Function apiInternetReadFileEx
|
|
Lparameters hFile, lpBuffersOut, dwFlags, dwContext
|
|
Declare Integer InternetReadFileEx In wininet As apiInternetReadFileEx ;
|
|
Integer hFile, ;
|
|
String @lpBuffersOut, ;
|
|
Integer dwFlags, ;
|
|
Integer dwContext
|
|
Return apiInternetReadFileEx(m.hFile, m.lpBuffersOut, m.dwFlags, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiInternetSetFilePointer
|
|
Lparameters hFile, lDistanceToMove, pReserved, dwMoveMethod, dwContext
|
|
Declare Integer InternetSetFilePointer In wininet As apiInternetSetFilePointer ;
|
|
Integer hFile, ;
|
|
Integer lDistanceToMove, ;
|
|
String pReserved, ;
|
|
Integer dwMoveMethod, ;
|
|
Integer dwContext
|
|
Return apiInternetSetFilePointer(m.hFile, m.lDistanceToMove, m.pReserved, m.dwMoveMethod, m.dwContext)
|
|
Endfunc
|
|
|
|
Function apiInternetSetOption
|
|
Lparameters hInternet, dwOption, lpBuffer, dwBufferLength
|
|
Declare Integer InternetSetOption In wininet As apiInternetSetOption ;
|
|
Integer hInternet, ;
|
|
Integer dwOption, ;
|
|
String lpBuffer, ;
|
|
Integer dwBufferLength
|
|
Return apiInternetSetOption(m.hInternet, m.dwOption, m.lpBuffer, m.dwBufferLength)
|
|
Endfunc
|
|
|
|
Function apiInternetWriteFile
|
|
Lparameters hFile, lpBuffer, dwNumberOfBytesToWrite, lpdwNumberOfBytesWritten
|
|
Declare Integer InternetWriteFile In wininet As apiInternetWriteFile ;
|
|
Integer hFile, ;
|
|
String lpBuffer, ;
|
|
Integer dwNumberOfBytesToWrite, ;
|
|
Integer @lpdwNumberOfBytesWritten
|
|
Return apiInternetWriteFile(m.hFile, m.lpBuffer, m.dwNumberOfBytesToWrite, @m.lpdwNumberOfBytesWritten)
|
|
Endfunc
|
|
|
|
Function apiIsIconic
|
|
Lparameters nhWnd
|
|
Declare Integer IsIconic In win32api As apiIsIconic;
|
|
Integer nhWnd
|
|
Return apiIsIconic(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiIsThemeActive()
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer IsThemeActive In uxtheme As apiIsThemeActive
|
|
Return apiIsThemeActive()
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiIsWindow
|
|
Lparameters nhWnd
|
|
Declare Integer IsWindow In win32api As apiIsWindow ;
|
|
Integer nhWnd
|
|
Return apiIsWindow(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiKeybd_Event
|
|
Lparameters bVk, bScan, dwFlags, dwExtraInfo
|
|
Declare Integer keybd_event In win32api As apiKeybd_Event ;
|
|
Integer bVk, ;
|
|
Integer bScan, ;
|
|
Integer dwFlags, ;
|
|
Integer dwExtraInfo
|
|
Return apiKeybd_Event(m.bVk, m.bScan, m.dwFlags, m.dwExtraInfo)
|
|
Endfunc
|
|
|
|
Function apiKillTimer
|
|
Lparameters nhWnd, nIDEvent
|
|
Declare Integer KillTimer In win32api As apiKillTimer ;
|
|
Integer nhWnd, ;
|
|
Integer nIDEvent
|
|
Return apiKillTimer(m.nhWnd, m.nIDEvent)
|
|
Endfunc
|
|
|
|
Function apiLoadLibrary
|
|
Lparameters lpLibFileName
|
|
Declare Integer LoadLibrary In win32api As apiLoadLibrary;
|
|
String lpLibFileName
|
|
Return apiLoadLibrary(m.lpLibFileName)
|
|
Endfunc
|
|
|
|
Function apiLoadMenu
|
|
Lparameters hInstance, lpMenuName
|
|
Declare Integer LoadMenu In win32api As apiLoadMenu ;
|
|
Integer hInstance, ;
|
|
Integer lpMenuName
|
|
Return apiLoadMenu(m.hInstance, m.lpMenuName)
|
|
Endfunc
|
|
|
|
Function apiLoadString
|
|
Lparameters hInstance, uID, lpBuffer, nBufferMax
|
|
Declare Integer LoadString In win32api As apiLoadString ;
|
|
Integer hInstance, ;
|
|
Integer uID, ;
|
|
String lpBuffer, ;
|
|
Integer nBufferMax
|
|
Return apiLoadString(m.hInstance, m.uID, @m.lpBuffer, m.nBufferMax)
|
|
Endfunc
|
|
|
|
Function apiMapVirtualKey
|
|
Lparameters uCode, uMapType
|
|
Declare Integer MapVirtualKey In win32api As apiMapVirtualKey ;
|
|
Integer uCode, ;
|
|
Integer uMapType
|
|
Return apiMapVirtualKey(m.uCode, m.uMapType)
|
|
Endfunc
|
|
|
|
Function apiMessageBeep
|
|
Lparameters uType
|
|
Declare Integer MessageBeep In win32api As apiMessageBeep ;
|
|
Integer uType
|
|
Return apiMessageBeep(m.uType)
|
|
Endfunc
|
|
|
|
Function apiMonitorFromRect
|
|
Lparameters lprc, dwFlags
|
|
Declare Integer MonitorFromRect In win32api As apiMonitorFromRect ;
|
|
Integer lprc, ;
|
|
Integer dwFlags
|
|
Return apiMonitorFromRect(m.lprc, m.dwFlags)
|
|
Endfunc
|
|
|
|
Function apiMulDiv
|
|
Lparameters nNumber, nNumerator, nDenominator
|
|
Declare Integer MulDiv In win32api As apiMulDiv ;
|
|
Integer nNumber, ;
|
|
Integer nNumerator, ;
|
|
Integer nDenominator
|
|
Return apiMulDiv(m.nNumber, m.nNumerator, m.nDenominator)
|
|
Endfunc
|
|
|
|
Function apiOpenFile
|
|
Lparameters lpFileName, lpReOpenBuff, wStyle
|
|
*!* Only use this function with 16-bit versions of Windows. For newer
|
|
*!* applications, use the CreateFile function.
|
|
Declare Integer OpenFile In win32api As apiOpenFile ;
|
|
String lpFileName, ;
|
|
String @lpReOpenBuff, ;
|
|
Integer wStyle
|
|
Return apiOpenFile(m.lpFileName, @m.lpReOpenBuff, m.wStyle)
|
|
Endfunc
|
|
|
|
Function apiOpenPrinter
|
|
Lparameters pPrinterName, phPrinter, pDefault
|
|
Declare Integer OpenPrinter In winspool.drv As apiOpenPrinter ;
|
|
String pPrinterName, ;
|
|
Integer @phPrinter, ;
|
|
Integer pDefault
|
|
Return apiOpenPrinter(m.pPrinterName, @m.phPrinter, m.pDefault)
|
|
Endfunc
|
|
|
|
Function apiOpenThemeData
|
|
Lparameters nhWnd, pszClassList
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer OpenThemeData In uxtheme As apiOpenThemeData ;
|
|
Integer nhWnd, ;
|
|
String pszClassList
|
|
Return apiOpenThemeData(m.nhWnd, m.pszClassList)
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiPrintDlg
|
|
Lparameters lppd
|
|
Declare Integer PrintDlg In comdlg32 As apiPrintDlg;
|
|
String @lppd
|
|
Return apiPrintDlg(@m.lppd)
|
|
Endfunc
|
|
|
|
Function apiPrintDlgEx
|
|
Lparameters lppd
|
|
Declare Integer PrintDlgEx In comdlg32 As apiPrintDlgEx;
|
|
String @lppd
|
|
Return apiPrintDlgEx(@m.lppd)
|
|
Endfunc
|
|
|
|
Function apiReadFile
|
|
Lparameters hFile, lpBuffer, nNumberOfBytesToRead, lpNumberOfBytesRead, lpOverlapped
|
|
Declare Integer ReadFile In win32api As apiReadFile ;
|
|
Integer hFile, ;
|
|
String @lpBuffer, ;
|
|
Integer nNumberOfBytesToRead, ;
|
|
Integer @lpNumberOfBytesRead, ;
|
|
Integer lpOverlapped
|
|
Return apiReadFile(m.hFile, @m.lpBuffer, m.nNumberOfBytesToRead, @m.lpNumberOfBytesRead, m.lpOverlapped)
|
|
Endfunc
|
|
|
|
Function apiRealGetWindowClass
|
|
Lparameters nhWnd, pszType, cchType
|
|
Declare Integer RealGetWindowClass In win32api As apiRealGetWindowClass ;
|
|
Integer nhWnd, ;
|
|
String @pszType, ;
|
|
Integer cchType
|
|
Return apiRealGetWindowClass(m.nhWnd, @m.pszType, m.cchType)
|
|
Endfunc
|
|
|
|
Function apiRedrawWindow
|
|
Lparameters nhWnd, lprcUpdate, hrgnUpdate, uFlags
|
|
Declare Integer RedrawWindow In win32api As apiRedrawWindow ;
|
|
Integer nhWnd, ;
|
|
String lprcUpdate, ;
|
|
Integer hrgnUpdate, ;
|
|
Integer uflags
|
|
Return apiRedrawWindow(m.nhWnd, m.lprcUpdate, m.hrgnUpdate, m.uFlags)
|
|
Endfunc
|
|
|
|
Function apiRegCloseKey
|
|
Lparameters hKeyHandle
|
|
Declare Integer RegCloseKey In Advapi32 As apiRegCloseKey;
|
|
Integer hKeyHandle
|
|
Return apiRegCloseKey(m.hKeyHandle)
|
|
Endfunc
|
|
|
|
Function apiRegCreateKeyEx
|
|
Lparameters hKey, lpSubKey, Reserved, lpClass, dwOptions, samDesired, lpSecurityAttributes, phkResult, lpdwDisposition
|
|
Declare Integer RegCreateKeyEx In Advapi32 As apiRegCreateKeyEx ;
|
|
Integer hKey, ;
|
|
String lpSubKey, ;
|
|
Integer Reserved, ;
|
|
String lpClass, ;
|
|
Integer dwOptions, ;
|
|
Integer samDesired, ;
|
|
Integer lpSecurityAttributes, ;
|
|
Integer @phkResult, ;
|
|
Integer @lpdwDisposition
|
|
Return apiRegCreateKeyEx(m.hKey, m.lpSubKey, m.Reserved, m.lpClass, m.dwOptions, m.samDesired, m.lpSecurityAttributes, @m.phkResult, @m.lpdwDisposition)
|
|
Endfunc
|
|
|
|
Function apiRegDeleteKey
|
|
Lparameters hKey, lpSubKey
|
|
Declare Integer RegDeleteKey In Advapi32 As apiRegDeleteKey ;
|
|
Integer hKey, ;
|
|
String lpSubKey
|
|
Return apiRegDeleteKey(m.hKey, m.lpSubKey)
|
|
Endfunc
|
|
|
|
Function apiRegDeleteValue
|
|
Lparameters hKey, lpValueName
|
|
Declare Integer RegDeleteValue In advapi32 As apiRegDeleteValue ;
|
|
Integer hKey, ;
|
|
String lpValueName
|
|
Return apiRegDeleteValue(m.hKey, m.lpValueName)
|
|
Endfunc
|
|
|
|
Function apiRegOpenKeyEx
|
|
Lparameters hKey, lpSubKey, ulOptions, samDesired, phkResult
|
|
Declare Integer RegOpenKeyEx In advapi32 As apiRegOpenKeyEx;
|
|
Integer hKey, ;
|
|
String lpSubKey, ;
|
|
Integer ulOptions, ;
|
|
Integer samDesired, ;
|
|
Integer @phkResult
|
|
Return apiRegOpenKeyEx(m.hKey, m.lpSubKey, m.ulOptions, m.samDesired, @m.phkResult)
|
|
Endfunc
|
|
|
|
Function apiRegQueryValueEx
|
|
Lparameters hKeyHandle, lpValueName, lpReserved, lpType, lpData, lpcbData
|
|
Declare Integer RegQueryValueEx In advapi32 As apiRegQueryValueEx ;
|
|
Integer hKeyHandle, ;
|
|
String lpValueName, ;
|
|
Integer lpReserved, ;
|
|
Integer @lpType, ;
|
|
String @lpData, ;
|
|
Integer @lpcbData
|
|
Return apiRegQueryValueEx(m.hKeyHandle, m.lpValueName, m.lpReserved, @m.lpType, @m.lpData, @m.lpcbData)
|
|
Endfunc
|
|
|
|
Function apiRegSetValueEx
|
|
Lparameters hKeyHandle, lpValueName, Reserved, dwType, lpData, cbData
|
|
Declare Integer RegSetValueEx In advapi32 As apiRegSetValueEx ;
|
|
Integer hKeyHandle, ;
|
|
String lpValueName, ;
|
|
Integer Reserved, ;
|
|
Integer dwType, ;
|
|
String @lpData, ;
|
|
Integer cbData
|
|
Return apiRegSetValueEx(m.hKeyHandle, m.lpValueName, m.Reserved, m.dwType, @m.lpData, m.cbData)
|
|
Endfunc
|
|
|
|
Function apiReleaseDC
|
|
Lparameters nhWnd, hdc
|
|
Declare Integer ReleaseDC In win32api As apiReleaseDC ;
|
|
Integer nhWnd, ;
|
|
Integer hdc
|
|
Return apiReleaseDC(m.nhWnd, m.hdc)
|
|
Endfunc
|
|
|
|
Function apiScreenToClient
|
|
Lparameters nhWnd, lpPoint
|
|
Declare Integer ScreenToClient In win32api As apiScreenToClient ;
|
|
Integer nhWnd, ;
|
|
String @lpPoint
|
|
Return apiScreenToClient(m.nhWnd, @m.lpPoint)
|
|
Endfunc
|
|
|
|
Function apiSelectObject
|
|
Lparameters hdc, hObject
|
|
Declare Integer SelectObject In win32api As apiSelectObject ;
|
|
Integer hdc, ;
|
|
Integer hObject
|
|
Return apiSelectObject(m.hdc, m.hObject)
|
|
Endfunc
|
|
|
|
Function apiSendMessage
|
|
Lparameters nhWnd, Msg, wParam, Lparam
|
|
*!* 2008-04-18 Changed to wrap SendMessage with a string lParam
|
|
*!* and SendMessage with an integer lParam
|
|
If Vartype(m.lParam) = T_CHARACTER Then
|
|
Return apiSendMessageString(m.nhWnd, m.Msg, m.wParam, @m.lParam)
|
|
Else
|
|
Return apiSendMessageInteger(m.nhWnd, m.Msg, m.wParam, m.lParam)
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiSendMessageInteger
|
|
Lparameters nhWnd, Msg, wParam, Lparam
|
|
Declare Integer SendMessage In win32api As apiSendMessageInteger ;
|
|
Integer nhWnd, ;
|
|
Integer Msg, ;
|
|
Integer wParam, ;
|
|
Integer Lparam
|
|
Return apiSendMessageInteger(m.nhWnd, m.Msg, m.wParam, m.lParam)
|
|
Endfunc
|
|
|
|
Function apiSendMessageString
|
|
Lparameters nhWnd, Msg, wParam, Lparam
|
|
Declare Integer SendMessage In win32api As apiSendMessageString ;
|
|
Integer nhWnd, ;
|
|
Integer Msg, ;
|
|
Integer wParam, ;
|
|
String @Lparam
|
|
Return apiSendMessageString(m.nhWnd, m.Msg, m.wParam, @m.lParam)
|
|
Endfunc
|
|
|
|
Function apiSetClassLong
|
|
Lparameters nhWnd, nIndex, dwNewLong
|
|
Declare Integer SetClassLong In win32api As apiSetClassLong ;
|
|
Integer nhWnd, ;
|
|
Integer nIndex, ;
|
|
Integer dwNewLong
|
|
Return apiSetClassLong(m.nhWnd, m.nIndex, m.dwNewLong)
|
|
Endfunc
|
|
|
|
Function apiSetFilePointerEx
|
|
Lparameters hFile, iDistanceToMoveLow, iDistanceToMoveHigh, lpNewFilePointer, dwMoveMethod
|
|
Declare Integer SetFilePointerEx In win32api As apiSetFilePointerEx ;
|
|
Integer hFile, ;
|
|
Integer iDistanceToMoveLow, ;
|
|
Integer iDistanceToMoveHigh, ;
|
|
String @lpNewFilePointer, ;
|
|
Integer dwMoveMethod
|
|
Return apiSetFilePointerEx(m.hFile, m.iDistanceToMoveLow, m.iDistanceToMoveHigh, @m.lpNewFilePointer, m.dwMoveMethod)
|
|
Endfunc
|
|
|
|
Function apiSetFocus
|
|
Lparameters nhWnd
|
|
Declare Integer SetFocus In win32api As apiSetFocus ;
|
|
Integer nhWnd
|
|
Return apiSetFocus(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiSetForegroundWindow
|
|
Lparameters nhWnd
|
|
Declare Integer SetForegroundWindow In win32api As apiSetForegroundWindow ;
|
|
Integer nhWnd
|
|
Return apiSetForegroundWindow(m.nhWnd)
|
|
Endfunc
|
|
|
|
Function apiSetMenu
|
|
Lparameters nhWnd, hMenu
|
|
Declare Integer SetMenu In win32api As apiSetMenu;
|
|
Integer nhWnd, ;
|
|
Integer hMenu
|
|
Return apiSetMenu(m.nhWnd, m.hMenu)
|
|
Endfunc
|
|
|
|
Function apiSetMenuDefaultItem
|
|
Lparameters hMenu, uItem, fByPos
|
|
Declare Integer SetMenuDefaultItem In win32api As apiSetMenuDefaultItem;
|
|
Integer hMenu, ;
|
|
Integer uItem, ;
|
|
Integer fByPos
|
|
Return apiSetMenuDefaultItem(m.hMenu, m.uItem, m.fByPos)
|
|
Endfunc
|
|
|
|
Function apiSetMenuInfo
|
|
Lparameters hMenu, lpcmi
|
|
Declare Integer SetMenuInfo In win32api As apiSetMenuInfo;
|
|
Integer hmenu, ;
|
|
String @lpcmi
|
|
Return apiSetMenuInfo(m.hMenu, @m.lpcmi)
|
|
Endfunc
|
|
|
|
Function apiSetMenuItemBitmaps
|
|
Lparameters hMenu, uPosition, uFlags, hBitmapUnchecked, hBitmapChecked
|
|
Declare Integer SetMenuItemBitmaps In win32api As apiSetMenuItemBitmaps ;
|
|
Integer hMenu, ;
|
|
Integer uPosition, ;
|
|
Integer uFlags, ;
|
|
Integer hBitmapUnchecked, ;
|
|
Integer hBitmapChecked
|
|
Return apiSetMenuItemBitmaps(m.hMenu, m.uPosition, m.uFlags, m.hBitmapUnchecked, m.hBitmapChecked)
|
|
Endfunc
|
|
|
|
Function apiSetMenuItemInfo
|
|
Lparameters hMenu, uItem, fByPosition, lpmii
|
|
Declare Integer SetMenuItemInfo In win32api As apiSetMenuItemInfo;
|
|
Integer hMenu, ;
|
|
Integer uItem, ;
|
|
Integer fByPosition, ;
|
|
String @lpmii
|
|
Return apiSetMenuItemInfo(m.hMenu, m.uItem, m.fByPosition, @m.lpmii)
|
|
Endfunc
|
|
|
|
Function apiSetParent
|
|
Lparameters nHwndChild, nHwndNewParent
|
|
Declare Integer SetParent In win32api As apiSetParent ;
|
|
Integer nHwndChild, ;
|
|
Integer nHwndNewParent
|
|
Return apiSetParent(m.nHwndChild, m.nHwndNewParent)
|
|
Endfunc
|
|
|
|
Function apiSetProp
|
|
Lparameters nhWnd, lpString, hData
|
|
Declare Integer SetProp In win32api As apiSetProp ;
|
|
Integer nhWnd, ;
|
|
String lpString, ;
|
|
Integer hData
|
|
Return apiSetProp(m.nhWnd, m.lpString, m.hData)
|
|
Endfunc
|
|
|
|
Function apiSetScrollInfo
|
|
Lparameters nhWnd, fnBar, lpsi, fRedraw
|
|
Declare Integer SetScrollInfo In win32api As apiSetScrollInfo ;
|
|
Integer nhWnd, ;
|
|
Integer fnBar, ;
|
|
Integer lpsi, ;
|
|
Integer fRedraw
|
|
Return apiSetScrollInfo(m.nhWnd, m.fnBar, m.lpsi, m.fRedraw)
|
|
Endfunc
|
|
|
|
Function apiSetTimer
|
|
Lparameters nhWnd, nIDEvent, uElapse, lpTimerFunc
|
|
Declare Integer SetTimer In win32api As apiSetTimer ;
|
|
Integer nhWnd, ;
|
|
Integer nIDEvent, ;
|
|
Integer uElapse, ;
|
|
Integer lpTimerFunc
|
|
Return apiSetTimer(m.nhWnd, m.nIDEvent, m.uElapse, m.lpTimerFunc)
|
|
Endfunc
|
|
|
|
Function apiSetWindowLong
|
|
Lparameters nhWnd, nIndex, dwNewLong
|
|
Declare Integer SetWindowLong In win32api As apiSetWindowLong ;
|
|
Integer nhWnd, ;
|
|
Integer nIndex, ;
|
|
Integer dwNewLong
|
|
Return apiSetWindowLong(m.nhWnd, m.nIndex, m.dwNewLong)
|
|
Endfunc
|
|
|
|
Function apiSetWindowPlacement
|
|
Lparameters nhWnd, lpwndpl
|
|
Declare Integer SetWindowPlacement In win32api As apiSetWindowPlacement;
|
|
Integer nhWnd, ;
|
|
Integer lpwndpl
|
|
Return apiSetWindowPlacement(m.nhWnd, m.lpwndpl)
|
|
Endfunc
|
|
|
|
Function apiSetWindowPos
|
|
Lparameters nhWnd, nHwndInsertAfter, nx, ny, cx, cy, wFlags
|
|
Declare Integer SetWindowPos In win32api As apiSetWindowPos ;
|
|
Integer nhWnd, ;
|
|
Integer nHwndInsertAfter, ;
|
|
Integer nx, ;
|
|
Integer ny, ;
|
|
Integer cx, ;
|
|
Integer cy, ;
|
|
Integer wFlags
|
|
Return apiSetWindowPos(m.nhWnd, m.nHwndInsertAfter, m.nx, m.ny, m.cx, m.cy, m.wFlags)
|
|
Endfunc
|
|
|
|
Function apiSetWindowRgn
|
|
Lparameters nhWnd, hRgn, bRedraw
|
|
Declare Integer SetWindowRgn In win32api As apiSetWindowRgn ;
|
|
Integer nhWnd, ;
|
|
Integer hRgn, ;
|
|
Integer bRedraw
|
|
Return apiSetWindowRgn(m.nhWnd, m.hRgn, m.bRedraw)
|
|
Endfunc
|
|
|
|
Function apiSetWindowText
|
|
Lparameters nhWnd, lpString
|
|
Declare Integer SetWindowText In win32api As apiSetWindowText ;
|
|
Integer nHwnd, ;
|
|
String lpString
|
|
Return apiSetWindowText(m.nhWnd, m.lpString)
|
|
Endfunc
|
|
|
|
Function apiSetWindowTheme
|
|
Lparameters nhWnd, pszSubAppName, pszSubIdList
|
|
If ctlGetOsVersion() >= NTDDI_WINXP
|
|
Declare Integer SetWindowTheme In uxtheme As apiSetWindowTheme ;
|
|
Integer nhWnd, ;
|
|
String pszSubAppName, ;
|
|
String pszSubIdList
|
|
Return apiSetWindowTheme(m.nhWnd, m.pszSubAppName, m.pszSubIdList)
|
|
Else
|
|
Return 0
|
|
Endif
|
|
Endfunc
|
|
|
|
Function apiSHBrowseForFolder
|
|
Lparameters lpbi
|
|
Declare Integer SHBrowseForFolder In shell32.Dll As apiSHBrowseForFolder ;
|
|
Integer lpbi
|
|
Return apiSHBrowseForFolder(m.lpbi)
|
|
Endfunc
|
|
|
|
Function apiSHDeleteKey
|
|
Lparameters hKey, pszSubKey
|
|
Declare Integer SHDeleteKey In shlwapi As apiSHDeleteKey ;
|
|
Integer hkey, ;
|
|
String pszSubKey
|
|
Return apiSHDeleteKey(m.hKey, m.pszSubKey)
|
|
Endfunc
|
|
|
|
Function apiShellExecute
|
|
Lparameters nhWnd, lpOperation, lpFile, lpParameters, lpDirectory, nShowCmd
|
|
Declare Integer ShellExecute In win32api As apiShellExecute ;
|
|
Integer nhWnd, ;
|
|
String lpOperation, ;
|
|
String lpFile, ;
|
|
String lpParameters, ;
|
|
String lpDirectory, ;
|
|
Integer nShowCmd
|
|
Return apiShellExecute(m.nhWnd, m.lpOperation, m.lpFile, m.lpParameters, m.lpDirectory, m.nShowCmd)
|
|
Endfunc
|
|
|
|
Function apiSHGetFolderLocation
|
|
Lparameters hwndOwner, nFolder, hToken, dwReserved, ppidl
|
|
Declare Integer SHGetFolderLocation In shell32.Dll As apiSHGetFolderLocation ;
|
|
Integer hwndOwner, ;
|
|
Integer nFolder, ;
|
|
Integer hToken, ;
|
|
Integer dwReserved, ;
|
|
Integer @ppidl
|
|
Return apiSHGetFolderLocation(m.hwndOwner, m.nFolder, m.hToken, m.dwReserved, @m.ppidl)
|
|
Endfunc
|
|
|
|
Function apiSHGetFolderPath
|
|
Lparameters nHwndOwner, nFolder, hToken, dwFlags, pszPath
|
|
Declare Integer SHGetFolderPath In shfolder As apiSHGetFolderPath ;
|
|
Integer nHwndOwner, ;
|
|
Integer nFolder, ;
|
|
Integer hToken, ;
|
|
Integer dwFlags, ;
|
|
String @pszPath
|
|
Return apiSHGetFolderPath(m.nHwndOwner, m.nFolder, m.hToken, m.dwFlags, @m.pszPath)
|
|
Endfunc
|
|
|
|
Function apiSHGetKnownFolderPath
|
|
*!* WINDOWS VISTA ONLY
|
|
Lparameters rfid, dwFlags, hToken, ppszPath
|
|
Declare Integer SHGetKnownFolderPath In shell32.Dll As apiSHGetKnownFolderPath ;
|
|
String rfid, ;
|
|
Integer dwFlags, ;
|
|
Integer hToken, ;
|
|
Integer @ppszPath
|
|
Return apiSHGetKnownFolderPath(m.rfid, m.dwFlags, m.hToken, @m.ppszPath)
|
|
Endfunc
|
|
|
|
Function apiSHGetNameFromIDList
|
|
Lparameters pidl, sigdnName, ppszName
|
|
Declare Integer SHGetNameFromIDList In shell32.Dll As apiSHGetNameFromIDList ;
|
|
Integer pidl, ;
|
|
Integer sigdnName, ;
|
|
Integer @ppszName
|
|
Return apiSHGetNameFromIDList(m.pidl, m.sigdnName, @m.ppszName)
|
|
Endfunc
|
|
|
|
Function apiSHGetPathFromIDList
|
|
Lparameters pidl, pszPath
|
|
Declare Integer SHGetPathFromIDList In Shell32.Dll As apiSHGetPathFromIDList ;
|
|
Integer pidl, ;
|
|
String @pszPath
|
|
Return apiSHGetPathFromIDList(m.pidl, @m.pszPath)
|
|
Endfunc
|
|
|
|
Function apiShowScrollBar
|
|
Lparameters nhWnd, wBar, bShow
|
|
Declare Integer ShowScrollBar In win32api As apiShowScrollBar ;
|
|
Integer nhWnd, ;
|
|
Integer wBar, ;
|
|
Integer bShow
|
|
Return apiShowScrollBar(m.nhWnd, m.wBar, m.bShow)
|
|
Endfunc
|
|
|
|
Function apiShowWindow
|
|
Lparameters nhWnd, nCmdShow
|
|
*#beautify keyword_nochange
|
|
Declare Integer ShowWindow In win32api As apiShowWindow ;
|
|
Integer nhWnd, ;
|
|
Integer nCmdShow
|
|
*#beautify
|
|
Return apiShowWindow(m.nhWnd, m.nCmdShow)
|
|
Endfunc
|
|
|
|
Function apiStartDocPrinter
|
|
Lparameters hPrinter, nLevel, pDocInfo
|
|
Declare Integer StartDocPrinter In winspool.drv As apiStartDocPrinter ;
|
|
Integer hPrinter, ;
|
|
Integer nLevel, ;
|
|
String pDocInfo
|
|
Return apiStartDocPrinter(m.hPrinter, m.nLevel, m.pDocInfo)
|
|
Endfunc
|
|
|
|
Function apiStrFormatByteSize
|
|
Lparameters dw, szBuf, uiBufSize
|
|
Declare Integer StrFormatByteSize In shlwapi As apiStrFormatByteSize;
|
|
Integer dw, ;
|
|
String @szBuf, ;
|
|
Integer uiBufSize
|
|
Return apiStrFormatByteSize(m.dw, @m.szBuf, m.uiBufSize)
|
|
Endfunc
|
|
|
|
Function apiStrFormatByteSize64
|
|
Lparameters dw, szBuf, uiBufSize
|
|
Declare Integer StrFormatByteSize64 In shlwapi As apiStrFormatByteSize64;
|
|
Integer dw, ;
|
|
String @szBuf, ;
|
|
Integer uiBufSize
|
|
Return apiStrFormatByteSize64(m.dw, @m.szBuf, m.uiBufSize)
|
|
Endfunc
|
|
|
|
Function apiStringFromGUID2
|
|
Lparameters rguid, lpsz, cchMax
|
|
Declare Integer StringFromGUID2 In ole32 As apiStringFromGUID2;
|
|
String rguid, ;
|
|
String @lpsz, ;
|
|
Integer cchMax
|
|
Return apiStringFromGUID2(m.rguid, @m.lpsz, m.cchMax)
|
|
Endfunc
|
|
|
|
Function apiSwitchToThisWindow
|
|
Lparameters nhWnd, fAltTab
|
|
Declare SwitchToThisWindow In win32api As apiSwitchToThisWindow ;
|
|
Integer nhWnd, ;
|
|
Integer fAltTab
|
|
Return apiSwitchToThisWindow(m.nhWnd, m.fAltTab)
|
|
Endfunc
|
|
|
|
Function apiSystemParametersInfo
|
|
Lparameters uiAction, uiParam, pvParam, fWinIni
|
|
Declare Integer SystemParametersInfo In win32api As apiSystemParametersInfo ;
|
|
Integer uiAction, ;
|
|
Integer uiParam, ;
|
|
String @pvParam, ;
|
|
Integer fWinIni
|
|
Return apiSystemParametersInfo(m.uiAction, m.uiParam, @m.pvParam, m.fWinIni)
|
|
Endfunc
|
|
|
|
Function apiTrackPopupMenuEx
|
|
Lparameters hMenu, fuFlags, nx, ny, nhWnd, lptpm
|
|
Declare Integer TrackPopupMenuEx In win32api As apiTrackPopupMenuEx;
|
|
Integer hMenu, ;
|
|
Integer fuFlags, ;
|
|
Integer nX, ;
|
|
Integer nY, ;
|
|
Integer nhWnd, ;
|
|
String @lptpm
|
|
Return apiTrackPopupMenuEx(m.hMenu, m.fuFlags, m.nx, m.ny, m.nhWnd, @m.lptpm)
|
|
Endfunc
|
|
|
|
Function apiURLDownloadToFile
|
|
Lparameters pCaller, szURL, szFileName, dwReserved, lpfnCB
|
|
Declare Integer URLDownloadToFile In urlmon As apiURLDownloadToFile;
|
|
Integer pCaller, ;
|
|
String szURL, ;
|
|
String szFileName, ;
|
|
Integer dwReserved, ;
|
|
Integer lpfnCB
|
|
Return apiURLDownloadToFile(m.pCaller, m.szURL, m.szFileName, m.dwReserved, m.lpfnCB)
|
|
Endfunc
|
|
|
|
Function apiUuidCreate
|
|
Lparameters Uuid
|
|
Declare Integer UuidCreate In rpcrt4 As apiUuidCreate ;
|
|
String @Uuid
|
|
Return apiUuidCreate(@m.Uuid)
|
|
Endfunc
|
|
|
|
Function apiUuidCreateNil
|
|
Lparameters Nil_Uuid
|
|
Declare Integer UuidCreateNil In rpcrt4 As apiUuidCreateNil ;
|
|
String @Nil_Uuid
|
|
Return apiUuidCreate(@m.Nil_Uuid)
|
|
Endfunc
|
|
|
|
Function apiUuidCreateSequential
|
|
Lparameters Uuid
|
|
Declare Integer UuidCreateSequential In rpcrt4 As apiUuidCreateSequential ;
|
|
String @Uuid
|
|
Return apiUuidCreateSequential(@m.Uuid)
|
|
Endfunc
|
|
|
|
Function apiUuidFromString
|
|
Lparameters StringUuid, Uuid
|
|
Declare Integer UuidFromString In rpcrt4 As apiUuidFromString ;
|
|
String StringUuid, ;
|
|
String @Uuid
|
|
Return apiUuidFromString(m.StringUuid, @m.Uuid)
|
|
Endfunc
|
|
|
|
Function apiUuidToString
|
|
Lparameters Uuid, StringUuid
|
|
Declare Integer UuidToString In rpcrt4 As apiUuidToString ;
|
|
String Uuid, ;
|
|
Integer @StringUuid
|
|
Return apiUuidToString(m.Uuid, @m.StringUuid)
|
|
Endfunc
|
|
|
|
Function apiWindowFromPoint
|
|
Lparameters pointx, pointy
|
|
Declare Integer WindowFromPoint In win32api As apiWindowFromPoint ;
|
|
Integer PointX, ;
|
|
Integer PointY
|
|
Return apiWindowFromPoint(m.pointx, m.pointy)
|
|
Endfunc
|
|
|
|
Function apiWriteFile
|
|
Lparameters hFile, lpBuffer, nNumberOfBytesToWrite, lpNumberOfBytesWritten, lpOverlapped
|
|
Declare Integer WriteFile In win32api As apiWriteFile ;
|
|
Integer hFile, ;
|
|
String lpBuffer, ;
|
|
Integer nNumberOfBytesToWrite, ;
|
|
Integer @lpNumberOfBytesWritten, ;
|
|
Integer lpOverlapped
|
|
Return apiWriteFile(m.hFile, m.lpBuffer, m.nNumberOfBytesToWrite, @m.lpNumberOfBytesWritten, m.lpOverlapped)
|
|
Endfunc
|
|
|
|
Function apiWritePrinter
|
|
Lparameters hPrinter, pBuf, cbBuf, pcWritten
|
|
Declare Integer WritePrinter In winspool.drv As apiWritePrinter;
|
|
Integer hPrinter, ;
|
|
String pBuf, ;
|
|
Integer cbBuf, ;
|
|
Integer @pcWritten
|
|
Return apiWritePrinter(m.hPrinter, m.pBuf, m.cbBuf, @m.pcWritten)
|
|
Endfunc
|
|
|
|
Function apiWritePrivateProfileString
|
|
Lparameters lpAppName, lpKeyName, lpString, lpFileName
|
|
Declare Integer WritePrivateProfileString In win32api As apiWritePrivateProfileString ;
|
|
String lpAppName, ;
|
|
String lpKeyName, ;
|
|
String lpString, ;
|
|
String lpFileName
|
|
Return apiWritePrivateProfileString(m.lpAppName, m.lpKeyName, m.lpString, m.lpFileName)
|
|
Endfunc
|
|
|