Changeset 160


Ignore:
Timestamp:
Mar 13, 2007, 1:13:06 AM (17 years ago)
Author:
イグトランス (egtra)
Message:

API宣言の追加（主にフォーラムに投稿されたものより）

Location:
Include
Files:
1 added
10 edited

Legend:

Unmodified
Added
Removed

  • Include/api_gdi.sbp

    r141 r160  
    1616Const _FuncName_GetEnhMetaFileDescription = "GetEnhMetaFileDescriptionW"
    1717Const _FuncName_GetObject = "GetObjectW"
     18Const _FuncName_GetTextFace = "GetTextFaceW"
    1819Const _FuncName_GetTextMetrics = "GetTextMetricsW"
    1920Const _FuncName_ResetDC = "ResetDCW"
    … …  
    3233Const _FuncName_GetEnhMetaFileDescription = "GetEnhMetaFileDescriptionA"
    3334Const _FuncName_GetObject = "GetObjectA"
     35Const _FuncName_GetTextFace = "GetTextFaceA"
    3436Const _FuncName_GetTextMetrics = "GetTextMetricsA"
    3537Const _FuncName_ResetDC = "ResetDCA"
    … …  
    428430Const DMCOLLATE_TRUE =  1
    429431
    430 Const CCHDEVICENAME = 32
    431432Const CCHFORMNAME = 32
    432433Type DEVMODEW
    … …  
    571572
    572573Declare Function AbortPath Lib "gdi32" (hdc As HDC) As BOOL
     574Type BLENDFUNCTION
     575    BlendOp As Byte
     576    BlendFlags As Byte
     577    SourceConstantAlpha As Byte
     578    AlphaFormat As Byte
     579End Type
     580Declare Function AlphaBlend Lib "msimg32" (hdcDest As HDC, nXDest As Long, nYDest As Long, nDestWidth As Long, nDestHeight As Long, hdcSrc As HDC, XSrc As Long, YSrc As Long, nSrcWidth As Long, nSrcHeight As Long, ByRef blendfunc As BLENDFUNCTION) As Long
    573581Declare Function Arc Lib "gdi32" (hdc As HDC, nLeftRect As Long, nTopRect As Long, nRightRect As Long, nBottomRect As Long, nXStartArc As Long, nYStartArc As Long, nXEndArc As Long, nYEndArc As Long) As BOOL
    574582Declare Function BeginPath Lib "gdi32" (hdc As HDC) As BOOL
    … …  
    10141022Declare Function GetTextExtentPoint32 Lib "gdi32" Alias "GetTextExtentPoint32A" (hdc As HDC, pString As PCSTR, cbString As Long, ByRef Size As SIZE) As Long
    10151023#endif
     1024Declare Function GetTextFace Lib "gdi32" Alias _FuncName_GetTextFace (hdc As HDC, nCount As Long, lpFacename As LPTSTR)As Long
    10161025
    10171026Const TMPF_FIXED_PITCH = &H01
    … …  
    11611170Declare Function TextOut Lib "gdi32" Alias "TextOutA" (hdc As HDC, nXStart As Long, nYStart As Long, pString As PCSTR, cbString As Long) As Long
    11621171#endif
     1172 Declare Function TransparentBlt Lib "msimg32" (hdcDest As HDC, nXDest As Long, nYDest As Long, nDestWidth As Long, nDestHeight As Long, hdcSrc As HDC, XSrc As Long, YSrc As Long, nSrcWidth As Long, nSrcHeight As Long, dwRop As DWord) As Long
    11631173
    11641174/* Pixel Format */

  • Include/api_imm.sbp

    r125 r160  
    4949Declare Function ImmReleaseContext Lib "imm32" (hWnd As HWND, hIMC As HIMC) As BOOL
    5050
     51Declare Function ImmAssociateContext Lib "imm32" (hWnd As HWND, himc As HIMC) As HIMC
     52
    5153Const GCS_COMPREADSTR               = &h0001
    5254Const GCS_COMPREADATTR              = &h0002

  • Include/api_shell.sbp

    r141 r160  
    1616Const _FuncName_ShellAbout = "ShellAboutW"
    1717Const _FuncName_ShellExecute = "ShellExecuteW"
     18Const _FuncName_ShellExecuteEx = "ShellExecuteExW"
     19Const _FuncName_Shell_NotifyIcon = "_FuncName_Shell_NotifyIconW"
     20Const _FuncName_SHEmptyRecycleBin = "_FuncName_SHEmptyRecycleBinW"
    1821Const _FuncName_SHFileOperation = "SHFileOperationW"
     22Const _FuncName_SHGetFileInfo = "_FuncName_SHGetFileInfoW"
    1923Const _FuncName_SHGetPathFromIDList = "SHGetPathFromIDListW"
     24Const _FuncName_SHGetSpecialFolderPath = "_FuncName_SHGetSpecialFolderPathW"
    2025#else
    2126Const _FuncName_DoEnvironmentSubst = "DoEnvironmentSubstA"
    … …  
    2934Const _FuncName_ShellAbout = "ShellAboutA"
    3035Const _FuncName_ShellExecute = "ShellExecuteA"
     36Const _FuncName_ShellExecuteEx = "ShellExecuteExA"
     37Const _FuncName_Shell_NotifyIcon = "_FuncName_Shell_NotifyIconA"
     38Const _FuncName_SHEmptyRecycleBin = "_FuncName_SHEmptyRecycleBinA"
    3139Const _FuncName_SHFileOperation = "SHFileOperationA"
     40Const _FuncName_SHGetFileInfo = "_FuncName_SHGetFileInfoA"
    3241Const _FuncName_SHGetPathFromIDList = "SHGetPathFromIDListA"
    33 #endif
     42Const _FuncName_SHGetSpecialFolderPath = "_FuncName_SHGetSpecialFolderPathA"
     43#endif
     44
     45Interface IEnumIDList
     46End Interface
    3447
    3548'-----------
    3649' Shell API
    3750
     51' shellapi.h
    3852Declare Function DoEnvironmentSubst Lib "shell32" Alias _FuncName_DoEnvironmentSubst (
    39     pszString As PSTR,
     53    pszString As PTSTR,
    4054    cchString As DWord
    4155) As DWord
    4256
     57' shellapi.h
    4358Declare Sub DragAcceptFiles Lib "shell32" (hWnd As HWND, bAccept As BOOL)
    4459Declare Sub DragFinish Lib "shell32" (hDrop As HDROP)
    … …  
    4661Declare Function DragQueryPoint Lib "shell32" (hDrop As HDROP, ByRef lpPoint As POINTAPI) As Long
    4762Declare Function ExtractAssociatedIcon Lib "shell32" Alias _FuncName_ExtractAssociatedIcon (hInst As HINSTANCE, lpIconPath As LPTSTR, lpiIcon As *Word) As HICON
     63' Shellapi.h
    4864Declare Function ExtractIcon Lib "shell32" Alias _FuncName_ExtractIcon (hInst As HINSTANCE, lpszExeFileName As LPCTSTR, nIconIndex As Long) As HICON
    4965Declare Function ExtractIconEx Lib "shell32" Alias _FuncName_ExtractIconEx (lpszFile As PCSTR, nIconIndex As Long, phiconLarge As *DWord, phiconSmall As *DWord, nIcons As Long) As HICON
    5066
     67' shellapi.h
    5168Declare Function FindExecutable Lib "shell32" Alias _FuncName_FindExecutable (
    52     pFile As PCTSTR,
    53     pDirectory As PCTSTR,
    54     pResult As PCTSTR
     69    lpFile As LPCTSTR,
     70    lpDirectory As LPCTSTR,
     71    lpResult As LPCTSTR
    5572) As Long
    5673
    … …  
    7289) As HRESULT
    7390
     91' shlobj.h
    7492Declare Sub SHAddToRecentDocs Lib "shell32" (ByVal uFlags As Long, ByVal pv As VoidPtr)
    7593
    … …  
    108126End Type
    109127
     128' shellapi.h
    110129Declare Function SHAppBarMessage Lib "shell32" (dwMessage As DWord, ByRef Data As APPBARDATA) As ULONG_PTR
    111130
    … …  
    148167#endif
    149168
    150 Type SHITEMID
     169Type SHITEMID 'shtypes.h
    151170    cb As Word
    152171    abID[ELM(1)] As Byte
    153172End Type
    154173
    155 Type ITEMIDLIST
     174Type ITEMIDLIST 'shtypes.h
    156175    mkid As SHITEMID
    157176End Type
     177
     178typedef LPITEMIDLIST = /*__unaligned*/ *ITEMIDLIST
     179typedef LPCITEMIDLIST = /*__unaligned const*/ *ITEMIDLIST
     180
     181'shlobj.h
    158182Declare Function SHBrowseForFolder Lib "shell32" Alias _FuncName_SHBrowseForFolder (ByRef bi As BROWSEINFO) As *ITEMIDLIST
    159183
    … …  
    232256' ShellApi.h
    233257Declare Function ShellExecute Lib "shell32" Alias _FuncName_ShellExecute (hWnd As HWND, lpOperation As LPCTSTR, lpFile As LPCTSTR, lpParameters As LPCTSTR, lpDirectory As LPCTSTR, nShowCmd As Long) As HINSTANCE
     258
     259Const SEE_MASK_CLASSNAME      = &H0001
     260Const SEE_MASK_CLASSKEY       = &H0003
     261Const SEE_MASK_IDLIST         = &H0004
     262Const SEE_MASK_INVOKEIDLIST   = &H000C
     263Const SEE_MASK_ICON           = &H0010
     264Const SEE_MASK_HOTKEY         = &H0020
     265Const SEE_MASK_NOCLOSEPROCESS = &H0040
     266Const SEE_MASK_CONNECTNETDRV  = &H0080
     267Const SEE_MASK_FLAG_DDEWAIT   = &H0100
     268Const SEE_MASK_DOENVSUBST     = &H0200
     269Const SEE_MASK_FLAG_NO_UI     = &H0400
     270
     271Type SHELLEXECUTEINFOA
     272    cbSize As DWord
     273    fMask As DWord
     274    hwnd As HWND
     275    lpVerb As LPCSTR
     276    lpFile As LPCSTR
     277    lpParameters As LPCSTR
     278    lpDirectory As LPCSTR
     279    nShow As Long
     280    hInstApp As HINSTANCE
     281    lpIDList As LPVOID
     282    lpClass As LPCSTR
     283    hkeyClass As HKEY
     284    dwHotKey As DWord
     285    hIcon As HANDLE
     286    hProcess As HANDLE
     287End Type
     288Type SHELLEXECUTEINFOW
     289    cbSize As DWord
     290    fMask As DWord
     291    hwnd As HWND
     292    lpVerb As LPCWSTR
     293    lpFile As LPCWSTR
     294    lpParameters As LPCWSTR
     295    lpDirectory As LPCWSTR
     296    nShow As Long
     297    hInstApp As HINSTANCE
     298    lpIDList As LPVOID
     299    lpClass As LPCWSTR
     300    hkeyClass As HKEY
     301    dwHotKey As DWord
     302    hIcon As HANDLE
     303    hProcess As HANDLE
     304End Type
     305#ifdef UNICODE
     306TypeDef SHELLEXECUTEINFO = SHELLEXECUTEINFOW
     307#else
     308TypeDef SHELLEXECUTEINFO = SHELLEXECUTEINFOA
     309#endif
     310TypeDef LPSHELLEXECUTEINFO = *SHELLEXECUTEINFO
     311Declare Function ShellExecuteEx Lib "shell32" Alias _FuncName_ShellExecuteEx (ByRef ExecInfo As SHELLEXECUTEINFO) As BOOL
    234312
    235313Const FO_MOVE =   &H0001
    … …  
    283361'SHGetDataFromIDList
    284362
     363'shlobj.h
     364Declare Function SHGetDesktopFolder Lib "shell32" (ByRef pshf As *IShellFolder) As HRESULT
     365
    285366Declare Function SHGetPathFromIDList Lib "shell32" Alias _FuncName_SHGetPathFromIDList (pidl As *ITEMIDLIST, pszPath As PTSTR) As Long
    286367
     368' ShellApi.h
     369Declare Function SHEmptyRecycleBin Lib"shell32" Alias _FuncName_SHEmptyRecycleBin (hwnd As HWND, pszRootPath As LPCTSTR, dwFlags As DWord) As HRESULT
     370
     371' ShlObj.h
     372Declare Function SHGetSpecialFolderPath Lib "shell32" Alias _FuncName_SHGetSpecialFolderPath (hwndOwner As HWND, lpszPath As LPTSTR, nFolder As Long, fCreate As BOOL) As BOOL
     373
     374' shlobj.h
     375Declare Function SHGetInstanceExplorer Lib "shell32" (ByRef ppunk As *IUnknown) As HRESULT
     376
     377Const CSIDL_PERSONAL = 5
     378Const CSIDL_FAVORITIES = 6
     379
     380Const SHGFI_ICON              = &H000000100
     381Const SHGFI_DISPLAYNAME       = &H000000200
     382Const SHGFI_TYPENAME          = &H000000400
     383Const SHGFI_ATTRIBUTES        = &H000000800
     384Const SHGFI_ICONLOCATION      = &H000001000
     385Const SHGFI_EXETYPE           = &H000002000
     386Const SHGFI_SYSICONINDEX      = &H000004000
     387Const SHGFI_LINKOVERLAY       = &H000008000
     388Const SHGFI_SELECTED          = &H000010000
     389Const SHGFI_ATTR_SPECIFIED    = &H000020000
     390Const SHGFI_LARGEICON         = &H000000000
     391Const SHGFI_SMALLICON         = &H000000001
     392Const SHGFI_OPENICON          = &H000000002
     393Const SHGFI_SHELLICONSIZE     = &H000000004
     394Const SHGFI_PIDL              = &H000000008
     395Const SHGFI_USEFILEATTRIBUTES = &H000000010
     396Const SHGFI_ADDOVERLAYS       = &H000000020
     397Const SHGFI_OVERLAYINDEX      = &H000000040
     398
     399' ShellApi.h
     400Type SHFILEINFO
     401    hIcon As HICON
     402    iIcon As Long
     403    dwAttributes As DWord
     404    szDisplayName[ELM(MAX_PATH)] As TCHAR
     405    szTypeName[ELM(80)] As TCHAR
     406End Type
     407
     408' shellapi.h
     409Declare Function SHGetFileInfo Lib "shell32" Alias _FuncName_SHGetFileInfo (pszPath As LPCTSTR, dwFileAttributes As DWord, ByRef sfi As SHFILEINFO, cbFileInfo As DWord, uFlags As DWord) As ULONG_PTR
     410
     411Type NOTIFYICONDATAW
     412    cbSize As DWord
     413    hWnd As HWND
     414    uID As DWord
     415    uFlags As DWord
     416    uCallbackMessage As DWord
     417    hIcon As HICON
     418    szTip[ELM(64)] As WCHAR
     419    dwState As DWord
     420    dwStateMask As DWord
     421    szInfo[ELM(256)] As WCHAR
     422    'Union
     423        uTimeout As DWord
     424    '   uVersion As DWord
     425    'End Union
     426    szInfoTitle[ELM(64)] As WCHAR
     427    dwInfoFlags As DWord
     428    guidItem As GUID
     429End Type
     430Type NOTIFYICONDATAA
     431    cbSize As DWord
     432    hWnd As HWND
     433    uID As DWord
     434    uFlags As DWord
     435    uCallbackMessage As DWord
     436    hIcon As HICON
     437    szTip[ELM(64)] As SByte
     438    dwState As DWord
     439    dwStateMask As DWord
     440    szInfo[ELM(256)] As SByte
     441    'Union
     442        uTimeout As DWord
     443    '   uVersion As DWord
     444    'End Union
     445    szInfoTitle[ELM(64)] As SByte
     446    dwInfoFlags As DWord
     447    guidItem As GUID
     448End Type
     449#ifdef UNICODE
     450TypeDef NOTIFYICONDATA = NOTIFYICONDATAW
     451#else
     452TypeDef NOTIFYICONDATA = NOTIFYICONDATAA
     453#endif
     454Declare Function Shell_NotifyIcon Lib "shell32" Alias _FuncName_Shell_NotifyIcon (dwMessage As DWORD, ByRef data As NOTIFYICONDATA) As BOOL
     455
     456Type STRRET 'shtypes.h
     457    uType As DWord
     458    'Union
     459        'pOleStr As *WCHAR
     460        'uOffset As DWord
     461        cStr[ELM(MAX_PATH)] As Byte
     462    'End Union
     463End Type
     464
     465' shobjidl.h
     466Enum SLGP_FLAGS
     467    SLGP_SHORTPATH = &h1
     468    SLGP_UNCPRIORITY = &h2
     469    SLGP_RAWPATH = &h4
     470    SLGP_RELATIVEPRIORITY = &h8
     471End Enum
     472
     473Interface IShellLinkA 'shobjidl.h
     474    Inherits IUnknown
     475
     476    Function GetPath(
     477        /* [size_is][out] */ pszFile As PSTR,
     478        /* [in] */ cch As Long,
     479        /* [full][out][in] */ pfd As *WIN32_FIND_DATAA,
     480        /* [in] */ fFlags As DWord) As HRESULT
     481    Function GetIDList(
     482        /* [out] */ ByRef ppidl As LPITEMIDLIST) As HRESULT
     483    Function SetIDList(
     484        /* [in] */ pidl As LPCITEMIDLIST) As HRESULT
     485    Function GetDescription(
     486        /* [size_is][out] */ pszName As PSTR,
     487        /* [in] */ cch As Long) As HRESULT
     488    Function SetDescription(
     489        /* [in] */ pszName As PCSTR) As HRESULT
     490    Function GetWorkingDirectory(
     491        /* [size_is][out] */ pszDir As PSTR,
     492        /* [in] */ cch As Long) As HRESULT
     493    Function SetWorkingDirectory(
     494        /* [in] */ pszDir As PCSTR) As HRESULT
     495    Function GetArguments(
     496        /* [size_is][out] */ pszArgs As PSTR,
     497        /* [in] */ cch As Long) As HRESULT
     498    Function SetArguments(
     499        /* [in] */ pszArgs As PCSTR) As HRESULT
     500    Function GetHotkey(
     501        /* [out] */ ByRef wHotkey As Word) As HRESULT
     502    Function SetHotkey(
     503        /* [in] */ wHotkey As Word) As HRESULT
     504    Function GetShowCmd(
     505        /* [out] */ ByRef piShowCmd As Long) As HRESULT
     506    Function SetShowCmd(
     507        /* [in] */ iShowCmd As Long) As HRESULT
     508    Function GetIconLocation(
     509        /* [size_is][out] */ pszIconPath As PSTR,
     510        /* [in] */ cch As Long,
     511        /* [out] */ ByRef iIcon As Long) As HRESULT
     512    Function SetIconLocation(
     513        /* [in] */ pszIconPath As PCSTR,
     514        /* [in] */ iIcon As Long) As HRESULT
     515    Function SetRelativePath(
     516        /* [in] */ pszPathRel As PCSTR,
     517        /* [in] */ dwReserved As DWord) As HRESULT
     518    Function Resolve(
     519        /* [in] */ hwnd As HWND,
     520        /* [in] */ fFlags As DWord) As HRESULT
     521    Function SetPath(
     522        /* [in] */ pszFile As PCSTR) As HRESULT
     523End Interface
     524
     525Interface IShellLinkW 'shobjidl.h
     526    Inherits IUnknown
     527
     528    Function GetPath(
     529        /* [size_is][out] */ pszFile As PWSTR,
     530        /* [in] */ cch As Long,
     531        /* [full][out][in] */ pfd As *WIN32_FIND_DATAW,
     532        /* [in] */ fFlags As DWord) As HRESULT
     533    Function GetIDList(
     534        /* [out] */ ppidl As *LPITEMIDLIST) As HRESULT
     535    Function SetIDList(
     536        /* [in] */ pidl As LPCITEMIDLIST) As HRESULT
     537    Function GetDescription(
     538        /* [size_is][out] */ pszName As PWSTR,
     539        /* [in] */ cch As Long) As HRESULT
     540    Function SetDescription(
     541        /* [in] */ pszName As PCWSTR) As HRESULT
     542    Function GetWorkingDirectory(
     543        /* [size_is][out] */ pszDir As PSTR,
     544        /* [in] */ cch As Long) As HRESULT
     545    Function SetWorkingDirectory(
     546        /* [in] */ pszDir As PCWSTR) As HRESULT
     547    Function GetArguments(
     548        /* [size_is][out] */ pszArgs As PSTR,
     549        /* [in] */ cch As Long) As HRESULT
     550    Function SetArguments(
     551        /* [in] */ pszArgs As PCWSTR) As HRESULT
     552    Function GetHotkey(
     553        /* [out] */ ByRef wHotkey As Word) As HRESULT
     554    Function SetHotkey(
     555        /* [in] */ wHotkey As Word) As HRESULT
     556    Function GetShowCmd(
     557        /* [out] */ ByRef piShowCmd As Long) As HRESULT
     558    Function SetShowCmd(
     559        /* [in] */ iShowCmd As Long) As HRESULT
     560    Function GetIconLocation(
     561        /* [size_is][out] */ pszIconPath As PWSTR,
     562        /* [in] */ cch As Long,
     563        /* [out] */ ByRef iIcon As Long) As HRESULT
     564    Function SetIconLocation(
     565        /* [in] */ pszIconPath As PCWSTR,
     566        /* [in] */ iIcon As Long) As HRESULT
     567    Function SetRelativePath(
     568        /* [in] */ pszPathRel As PCWSTR,
     569        /* [in] */ dwReserved As DWord) As HRESULT
     570    Function Resolve(
     571        /* [in] */ hwnd As HWND,
     572        /* [in] */ fFlags As DWord) As HRESULT
     573    Function SetPath(
     574        /* [in] */ pszFile As PCWSTR) As HRESULT
     575End Interface
     576
     577#ifdef UNICODE
     578TypeDef IShellLink = IShellLinkW
     579#else
     580TypeDef IShellLink = IShellLinkA
     581#endif
     582
     583Enum SHCONT
     584    SHCONTF_FOLDERS = &h0020
     585    SHCONTF_NONFOLDERS = &h0040
     586    SHCONTF_INCLUDEHIDDEN = &h0080
     587    SHCONTF_INIT_ON_FIRST_NEXT = &h0100
     588    SHCONTF_NETPRINTERSRCH = &h0200
     589    SHCONTF_SHAREABLE = &h0400
     590    SHCONTF_STORAGE = &h0800
     591End Enum
     592
     593Enum SHGNO
     594    SHGDN_NORMAL = &h0000
     595    SHGDN_INFOLDER = &h0001
     596    SHGDN_FOREDITING = &h1000
     597    SHGDN_FORADDRESSBAR = &h4000
     598    SHGDN_FORPARSING = &h8000
     599End Enum
     600
     601TypeDef SHCONTF = DWord
     602TypeDef SFGAOF = DWord
     603TypeDef SHGDNF = DWord
     604
     605Dim IID_IShellFolder = [&h000214E6, 0, 0, [&hC0, 0, 0, 0, 0, 0, 0, &h46]] As IID
     606Interface IShellFolder 'shobjidl.h
     607    Inherits IUnknown
     608
     609    Function ParseDisplayName(
     610        /* [in] */ hwnd As HWND,
     611        /* [in] */ pbc As *IBindCtx,
     612        /* [string][in] */ pszDisplayName As LPOLESTR,
     613        /* [out] */ pchEaten As *DWord,
     614        /* [out] */ ByRef pidl As *ITEMIDLIST,
     615        /* [unique][out][in] */ pdwAttributes As *DWord) As HRESULT
     616    Function EnumObjects(
     617        /* [in] */ hwnd As HWND,
     618        /* [in] */ grfFlags As SHCONTF,
     619        /* [out] */ ByRef penumIDList As *IEnumIDList) As HRESULT
     620    Function BindToObject(
     621        /* [in] */ pidl As *ITEMIDLIST,
     622        /* [in] */ pbc As *IBindCtx,
     623        /* [in] */ ByRef riid As IID,
     624        /* [iid_is][out] */ ppv As *VoidPtr) As HRESULT
     625    Function BindToStorage(
     626        /* [in] */ pidl As *ITEMIDLIST,
     627        /* [in] */ pbc As *IBindCtx,
     628        /* [in] */ ByRef riid As IID,
     629        /* [iid_is][out] */ ppv As *VoidPtr) As HRESULT
     630    Function CompareIDs(
     631        /* [in] */ lParam As LPARAM,
     632        /* [in] */ pidl1 As *ITEMIDLIST,
     633        /* [in] */ pidl2 As *ITEMIDLIST) As HRESULT
     634    Function CreateViewObject(
     635        /* [in] */ hwndOwner As HWND,
     636        /* [in] */ ByRef riid As IID,
     637        /* [iid_is][out] */ ppv As *VoidPtr) As HRESULT
     638    Function GetAttributesOf(
     639        /* [in] */ cidl As DWord,
     640        /* [size_is][in] */ apidl As *ITEMIDLIST,
     641        /* [out][in] */ ByRef rgfInOut As SFGAOF) As HRESULT
     642    Function GetUIObjectOf(
     643        /* [in] */ hwndOwner As HWND,
     644        /* [in] */ cidl As DWord,
     645        /* [size_is][in] */ apidl As *ITEMIDLIST,
     646        /* [in] */ ByRef riid As IID,
     647        /* [unique][out][in] */ rgfReserved As *DWord,
     648        /* [iid_is][out] */ ppv As *VoidPtr) As HRESULT
     649    Function GetDisplayNameOf(
     650        /* [in] */ pidl As *ITEMIDLIST,
     651        /* [in] */ uFlags As SHGDNF,
     652        /* [out] */ ByRef pName As STRRET) As HRESULT
     653    Function SetNameOf(
     654        /* [in] */ hwnd As HWND,
     655        /* [in] */ pidl As *ITEMIDLIST,
     656        /* [string][in] */ pszName As LPCWSTR,
     657        /* [in] */ uFlags As SHGDNF,
     658        /* [out] */ ByRef ppidlOut As LPITEMIDLIST) As HRESULT
     659End Interface
     660
    287661#endif '_INC_SHELL

  • Include/api_shlwapi.sbp

    r141 r160  
    66
    77
    8 Declare Function PathGetArgsA Lib "shlwapi" Alias (pszPath As LPCWSTR) As LPWSTR
    9 Declare Function PathGetArgsW Lib "shlwapi" Alias (pszPath As LPCSTR) As LPSTR
     8Declare Function PathGetArgsA Lib "shlwapi" (pszPath As LPCWSTR) As LPWSTR
     9Declare Function PathGetArgsW Lib "shlwapi" (pszPath As LPCSTR) As LPSTR
    1010#ifdef UNICODE
    1111Declare Function PathGetArgs Lib "shlwapi" Alias "PathGetArgsW" (pszPath As LPCWSTR) As LPWSTR
    … …  
    1414#endif
    1515
    16 Declare Function StrFormatByteSize64 Lib "shlwapi" Alias (ll As Int64, pszBuf As PWSTR, BufSize As DWord) As PWSTR
    17 Declare Function StrFormatByteSize64 Lib "shlwapi" Alias (ll As Int64, pszBuf As PSTR, BufSize As DWord) As PSTR
     16Declare Function StrFormatByteSize64W Lib "shlwapi" (ll As Int64, pszBuf As PWSTR, BufSize As DWord) As PWSTR
     17Declare Function StrFormatByteSize64A Lib "shlwapi" (ll As Int64, pszBuf As PSTR, BufSize As DWord) As PSTR
    1818#ifdef UNICODE
    1919Declare Function StrFormatByteSize64 Lib "shlwapi" Alias "StrFormatByteSize64W" (ll As Int64, pszBuf As PWSTR, BufSize As DWord) As PWSTR
    … …  
    2222#endif
    2323
     24Declare Function StrFormatKBSizeA Lib "shlwapi" (ByVal Value As Int64, ByVal pszBuf As LPSTR, ByVal uiBuSize As DWord) As LPSTR
     25Declare Function StrFormatKBSizeW Lib "shlwapi" (ByVal Value As Int64, ByVal pszBuf As LPWSTR, ByVal uiBuSize As DWord) As LPWSTR
     26#ifdef UNICODE
     27Declare Function StrFormatKBSize Lib "shlwapi" Alias "StrFormatKBSizeW" (ByVal Value As Int64, ByVal pszBuf As LPWSTR, ByVal uiBuSize As DWord) As LPWSTR
     28#else
     29Declare Function StrFormatKBSize Lib "shlwapi" Alias "StrFormatKBSizeA" (ByVal Value As Int64, ByVal pszBuf As LPSTR, ByVal uiBuSize As DWord) As LPSTR
     30#endif
     31
     32Declare Function StrRetToStrA Lib "shlwapi" (ByRef pstr As STRRET, pidl As *ITEMIDLIST, ByRef pszName As PSTR) As HRESULT
     33Declare Function StrRetToStrW Lib "shlwapi" (ByRef pstr As STRRET, pidl As *ITEMIDLIST, ByRef pszName As PWSTR) As HRESULT
     34#ifdef UNICODE
     35Declare Function StrRetToStr Lib "shlwapi" Alias "StrRetToStrW" (ByRef str As STRRET, pidl As *ITEMIDLIST, ByRef pszName As PWSTR) As HRESULT
     36#else
     37Declare Function StrRetToStr Lib "shlwapi" Alias "StrRetToStrA" (ByRef str As STRRET, pidl As *ITEMIDLIST, ByRef pszName As PSTR) As HRESULT
     38#endif
     39
     40Declare Function StrChrA Lib "shlwapi" (lpStart As LPCSTR, ch As SByte) As LPSTR
     41Declare Function StrChrW Lib "shlwapi" (lpStart As LPCWSTR, ch As WCHAR) As LPWSTR
     42#ifdef UNICODE
     43Declare Function StrChr Lib "shlwapi" Alias "StrChrW" (lpStart As LPCWSTR, ch As WCHAR) As LPWSTR
     44#else
     45Declare Function StrChr Lib "shlwapi" Alias "StrChrA" (lpStart As LPCSTR, ch As SByte) As LPSTR
     46#endif
     47
     48Declare Function StrStrA Lib "shlwapi" (lpFirst As LPCSTR, lpSrch As LPCSTR) As LPSTR
     49Declare Function StrStrW Lib "shlwapi" (lpFirst As LPCWSTR, lpSrch As LPCWSTR) As LPWSTR
     50#ifdef UNICODE
     51Declare Function StrStr Lib "shlwapi" Alias "StrStrW" (lpFirst As LPCWSTR, lpSrch As LPCWSTR) As LPWSTR
     52#else
     53Declare Function StrStr Lib "shlwapi" Alias "StrStrA" (lpFirst As LPCSTR, lpSrch As LPCSTR) As LPSTR
     54#endif
     55
     56Declare Function StrToIntA Lib "shlwapi" (psz As LPCSTR) As Long
     57Declare Function StrToIntW Lib "shlwapi" (psz As LPCWSTR) As Long
     58#ifdef UNICODE
     59Declare Function StrToInt Lib "shlwapi" Alias "StrToIntW" (psz As LPCWSTR) As Long
     60#else
     61Declare Function StrToInt Lib "shlwapi" Alias "StrToIntA" (psz As LPCSTR) As Long
     62#endif
     63
     64Declare Function PathRenameExtensionA Lib "shlwapi" (pszPath As LPSTR, pszExt As LPCSTR) As BOOL
     65Declare Function PathRenameExtensionW Lib "shlwapi" (pszPath As LPWSTR, pszExt As LPCWSTR) As BOOL
     66#ifdef UNICODE
     67Declare Function PathRenameExtension Lib "shlwapi" Alias "PathRenameExtensionW" (pszPath As LPWSTR, pszExt As LPCWSTR) As BOOL
     68#else
     69Declare Function PathRenameExtension Lib "shlwapi" Alias "PathRenameExtensionA" (pszPath As LPSTR, pszExt As LPCSTR) As BOOL
     70#endif
     71
     72
     73Declare Function PathRemoveFileSpecA Lib "shlwapi" (pszPath As LPCSTR) As BOOL
     74Declare Function PathRemoveFileSpecW Lib "shlwapi" (pszPath As LPCWSTR) As BOOL
     75#ifdef UNICODE
     76Declare Function PathRemoveFileSpec Lib "shlwapi" Alias "PathRemoveFileSpecW" (pszPath As LPCWSTR) As BOOL
     77#else
     78Declare Function PathRemoveFileSpec Lib "shlwapi" Alias "PathRemoveFileSpecA" (pszPath As LPCSTR) As BOOL
     79#endif
     80
     81Declare Function PathRenameExtensionA Lib "shlwapi" (hKey As HKEY, pszSubKey As LPCSTR) As DWord
     82Declare Function PathRenameExtensionW Lib "shlwapi" (hKey As HKEY, pszSubKey As LPCWSTR) As DWord
     83#ifdef UNICODE
     84Declare Function PathRenameExtension Lib "shlwapi" Alias "PathRenameExtensionW" (hKey As HKEY, pszSubKey As LPCWSTR) As DWord
     85#else
     86Declare Function PathRenameExtension Lib "shlwapi" Alias "PathRenameExtensionA" (hKey As HKEY, pszSubKey As LPCSTR) As DWord
     87#endif
     88
    2489#endif '_INC_SHLWAPI

  • Include/api_system.sbp

    r142 r160  
    1818Const _FuncName_CreateProcess = "CreateProcessW"
    1919Const _FuncName_DeleteFile = "DeleteFileW"
     20Const _FuncName_ExpandEnvironmentStrings = "ExpandEnvironmentStringsW"
    2021Const _FuncName_FatalAppExit = "FatalAppExitW"
    2122Const _FuncName_FindFirstChangeNotification = "FindFirstChangeNotificationW"
    2223Const _FuncName_FindFirstFile = "FindFirstFileW"
    2324Const _FuncName_FindNextFile = "FindNextFileW"
     25Const _FuncName_FindResource = "FindResourceW"
    2426Const _FuncName_FormatMessage = "FormatMessageW"
    2527Const _FuncName_FreeEnvironmentStrings = "FreeEnvironmentStringsW"
    … …  
    3739Const _FuncName_GetFullPathName = "GetFullPathNameW"
    3840Const _FuncName_GetLogicalDriveStrings = "GetLogicalDriveStringsW"
     41Const _FuncName_GetLongPathName = "GetLongPathNameW"
    3942Const _FuncName_GetModuleFileName = "GetModuleFileNameW"
    4043Const _FuncName_GetModuleHandle = "GetModuleHandleW"
    … …  
    5154Const _FuncName_LoadLibrary = "LoadLibraryW"
    5255Const _FuncName_LoadLibraryEx = "LoadLibraryExW"
     56Const _FuncName_LookupPrivilegeValue = "LookupPrivilegeValueW"
    5357Const _FuncName_lstrcat = "lstrcatW"
    5458Const _FuncName_lstrcmp = "lstrcmpW"
    5559Const _FuncName_lstrcmpi = "lstrcmpiW"
    5660Const _FuncName_lstrcpy = "lstrcpyW"
     61Const _FuncName_lstrcpyn = "lstrcpynW"
    5762Const _FuncName_MoveFile = "MoveFileW"
    5863Const _FuncName_OpenEvent = "OpenEventW"
    … …  
    8085Const _FuncName_CreateProcess = "CreateProcessA"
    8186Const _FuncName_DeleteFile = "DeleteFileA"
     87Const _FuncName_ExpandEnvironmentStrings = "ExpandEnvironmentStringsA"
    8288Const _FuncName_FatalAppExit = "FatalAppExitA"
    8389Const _FuncName_FindFirstChangeNotification = "FindFirstChangeNotificationA"
    8490Const _FuncName_FindFirstFile = "FindFirstFileA"
    8591Const _FuncName_FindNextFile = "FindNextFileA"
     92Const _FuncName_FindResource = "FindResourceA"
    8693Const _FuncName_FormatMessage = "FormatMessageA"
    8794Const _FuncName_FreeEnvironmentStrings = "FreeEnvironmentStringsA"
    … …  
    99106Const _FuncName_GetFullPathName = "GetFullPathNameA"
    100107Const _FuncName_GetLogicalDriveStrings = "GetLogicalDriveStringsA"
     108Const _FuncName_GetLongPathName = "GetLongPathNameA"
    101109Const _FuncName_GetModuleFileName = "GetModuleFileNameA"
    102110Const _FuncName_GetModuleHandle = "GetModuleHandleA"
    … …  
    113121Const _FuncName_LoadLibrary = "LoadLibraryA"
    114122Const _FuncName_LoadLibraryEx = "LoadLibraryExA"
     123Const _FuncName_LookupPrivilegeValue = "LookupPrivilegeValueA"
    115124Const _FuncName_lstrcat = "lstrcatA"
    116125Const _FuncName_lstrcmp = "lstrcmpA"
    117126Const _FuncName_lstrcmpi = "lstrcmpiA"
    118127Const _FuncName_lstrcpy = "lstrcpyA"
     128Const _FuncName_lstrcpyn = "lstrcpynA"
    119129Const _FuncName_MoveFile = "MoveFileA"
    120130Const _FuncName_OpenEvent = "OpenEventA"
    … …  
    483493Declare Function CreateEvent Lib "kernel32" Alias _FuncName_CreateEvent (pEventAttributes As *SECURITY_ATTRIBUTES, bManualReset As BOOL, bInitialState As BOOL, pName As PCTSTR) As HANDLE
    484494Declare Function CreateMutex Lib "kernel32" Alias _FuncName_CreateMutex (lpMutexAttributes As *SECURITY_ATTRIBUTES, bInitialOwner As BOOL, lpName As PCTSTR) As HANDLE
     495Declare Function CreatePipe Lib "Kernel32" (
     496    ByRef hReadPipe As HANDLE,
     497    ByRef hWritePipe As HANDLE,
     498    ByVal pPipeAttributes As *SECURITY_ATTRIBUTES,
     499    ByVal nSize As DWORD) As Long
    485500Declare Function CreateSemaphore Lib "kernel32" Alias _FuncName_CreateSemaphore (pSemaphoreAttributes As *SECURITY_ATTRIBUTES, lInitialCount As Long, lMaximumCount As Long, pName As PCTSTR) As HANDLE
    486501
    … …  
    646661) As Long
    647662Declare Function DisableThreadLibraryCalls Lib "kernel32" (hLibModule As HINSTANCE) As BOOL
    648 Declare Function DosDateTimeToFileTime Lib "kernel32" (wFatDate As Word, wFatTime As Word, ByRef lpFileTime As FILETIME) As BOOL
     663Declare Function DosDateTimeToFileTime Lib "kernel32" (wFatDate As Word, wFatTime As Word, ByRef FileTime As FILETIME) As BOOL
    649664
    650665Const DUPLICATE_CLOSE_SOURCE = 1
    … …  
    788803Declare Function GetLogicalDrives Lib "kernel32" () As DWord
    789804Declare Function GetLogicalDriveStrings Lib "kernel32" Alias _FuncName_GetLogicalDriveStrings (nBufferLength As DWord, pBuffer As PTSTR) As DWord
     805Declare Function GetLongPathName Lib "kernel32" Alias _FuncName_GetLongPathName (lpszShortPath As LPCTSTR, lpszLongPath As LPTSTR, cchBuffer As DWord) As DWord
    790806Declare Function GetModuleFileName Lib "kernel32" Alias _FuncName_GetModuleFileName (hModule As HINSTANCE, lpFileName As PTSTR, nSize As DWord) As DWord
    791807Declare Function GetModuleHandle Lib "kernel32" Alias _FuncName_GetModuleHandle (lpModuleName As PTSTR) As HINSTANCE
    … …  
    796812    bWait As BOOL
    797813) As BOOL
     814Type SYSTEM_POWER_STATUS
     815    ACLineStatus As Byte
     816    BatteryFlag As Byte
     817    BatteryLifePercent As Byte
     818    Reserved1 As Byte
     819    BatteryLifeTime As Long
     820    BatteryFullLifeTime As Long
     821End Type
     822Declare Function GetSystemPowerStatus Lib "kernel32" (ByRef SystemPowerStatus As SYSTEM_POWER_STATUS) As Long
    798823Declare Function GetPriorityClass Lib "kernel32" (hProcess As HANDLE) As DWord
    799824Declare Function GetProcAddress Lib "kernel32" (hModule As HINSTANCE, pProcName As PCSTR) As DWord
    … …  
    868893Const TIME_FORCE24HOURFORMAT   = &H00000008
    869894Declare Function GetTimeFormat Lib "kernel32" Alias _FuncName_GetTimeFormat (Locale As LCID, dwFlags As DWord, ByRef Time As SYSTEMTIME, lpFormat As PCTSTR, lpTimeStr As PTSTR, cchTime As DWord) As BOOL
    870 
    871895Declare Function GetUserDefaultLCID Lib "kernel32" () As LCID
    872896Declare Function GetUserName Lib "advapi32" Alias _FuncName_GetUserName (pBuffer As PTSTR, ByRef nSize As DWord) As BOOL
    … …  
    967991Declare Function LoadLibraryEx Lib "kernel32" Alias _FuncName_LoadLibraryEx (pLibFileName As PCTSTR, hFile As HANDLE, dwFlags As DWord) As HINSTANCE
    968992
    969 Declare Function lstrcat Lib "kernel32" Alias _FuncName_lstrcat (pString1 As PTSTR, pString2 As PCTSTR) As PSTR
    970 Declare Function lstrcmp Lib "kernel32" Alias _FuncName_lstrcmp (pString1 As PCTSTR, pString2 As PCTSTR) As Long
    971 Declare Function lstrcmpi Lib "kernel32" Alias _FuncName_lstrcmpi (pString1 As PCTSTR, pString2 As PCTSTR) As Long
    972 Declare Function lstrcpy Lib "kernel32" Alias _FuncName_lstrcpy (pString1 As PTSTR, pString2 As PCTSTR) As PSTR
    973 Declare Function lstrlenA Lib "kernel32" (pString As PCSTR) As Long
    974 Declare Function lstrlenW Lib "kernel32" (pString As PCWSTR) As Long
     993Declare Function lstrcat Lib "kernel32" Alias _FuncName_lstrcat (lpString1 As LPTSTR, lpString2 As LPCTSTR) As LPTSTR
     994Declare Function lstrcmp Lib "kernel32" Alias _FuncName_lstrcmp (lpString1 As LPCTSTR, lpString2 As LPCTSTR) As Long
     995Declare Function lstrcmpi Lib "kernel32" Alias _FuncName_lstrcmpi (lpString1 As LPCTSTR, lpString2 As LPCTSTR) As Long
     996Declare Function lstrcpy Lib "kernel32" Alias _FuncName_lstrcpy (lpString1 As LPTSTR, lpString2 As LPCTSTR) As LPTSTR
     997Declare Function lstrcpyn Lib "kernel32" Alias _FuncName_lstrcpyn (lpString1 As LPTSTR,ByVal lpString2 As LPCTSTR,ByVal iMaxLength As Long) As LPTSTR
     998Declare Function lstrlenA Lib "kernel32" (lpString As LPCSTR) As Long
     999Declare Function lstrlenW Lib "kernel32" (lpString As LPCWSTR) As Long
    9751000#ifdef UNICODE
    976 Declare Function lstrlen Lib "kernel32" Alias "lstrlenW" (pString As PCWSTR) As Long
     1001Declare Function lstrlen Lib "kernel32" Alias "lstrlenW" (lpString As LPCWSTR) As Long
    9771002#else
    978 Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (pString As PCSTR) As Long
     1003Declare Function lstrlen Lib "kernel32" Alias "lstrlenA" (lpString As LPCSTR) As Long
    9791004#endif
    9801005Declare Sub memcpy Lib "kernel32" Alias "RtlMoveMemory" (pDest As VoidPtr, pSrc As VoidPtr, length As SIZE_T)
    9811006Declare Function MoveFile Lib "kernel32" Alias _FuncName_MoveFile (lpExistingFileName As LPCTSTR, lpNewFileName As LPCTSTR) As BOOL
    982 Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" (pDest As VoidPtr, pSrc As VoidPtr, length As SIZE_T)
     1007Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" (pDest As PVOID, pSrc As VoidPtr, length As SIZE_T)
    9831008
    9841009Declare Function MulDiv Lib "kernel32" (
    … …  
    10301055    pArguments As *ULONG_PTR)
    10311056Declare Function ReadFile Lib "kernel32" (hFile As HANDLE, lpBuffer As VoidPtr, nNumberOfBytesToRead As DWord, lpNumberOfBytesRead As DWordPtr, ByRef lpOverlapped As OVERLAPPED) As BOOL
     1057Declare Function ReadProcessMemory Lib "Kernel32"  (hProcess As HANDLE, lpBaseAddress As VoidPtr, lpBuffer As VoidPtr, nSize As SIZE_T, lpNumberOfBytesRead As *SIZE_T) As BOOL
    10321058Declare Function ReleaseMutex Lib "kernel32" (hMutex As HANDLE) As BOOL
    10331059Declare Function ReleaseSemaphore Lib "kernel32" (hSemaphore As HANDLE, lReleaseCount As Long, ByRef lpPreviousCount As Long) As BOOL
    … …  
    10661092) As BOOL
    10671093
    1068 Const EXCEPTION_MAXIMUM_PARAMETERS = ELM(15)
     1094Const EXCEPTION_MAXIMUM_PARAMETERS = 15
    10691095
    10701096Type EXCEPTION_RECORD
    … …  
    10741100    ExceptionAddress As VoidPtr
    10751101    NumberParameters As DWord
    1076     ExceptionInformation[EXCEPTION_MAXIMUM_PARAMETERS] As ULONG_PTR
     1102    ExceptionInformation[ELM(EXCEPTION_MAXIMUM_PARAMETERS)] As ULONG_PTR
    10771103End Type
    10781104
    … …  
    14161442Const WAIT_IO_COMPLETION = &h000000C0 'STATUS_USER_APC
    14171443
     1444Declare Function FindResource Lib "kernel32" Alias _FuncName_FindResource (hInstance As HINSTANCE, lpName As LPCTSTR, lpType As LPCTSTR) As HRSRC
     1445Declare Function LoadResource Lib "kernel32" (hModule As HMODULE, hResInfo As HRSRC) As HGLOBAL
     1446Declare Function FreeResource Lib "kernel32" (hResData As HGLOBAL) As BOOL
     1447Declare Function LockResource Lib "kernel32" (hResData As HGLOBAL) As VoidPtr
     1448Declare Function SizeofResource Lib "kernel32" (hModule As HANDLE, hResInfo As HRSRC) As DWord
     1449
     1450Declare Function ExpandEnvironmentStrings Lib "kernel32" Alias _FuncName_ExpandEnvironmentStrings (lpSrc As LPCTSTR, lpDst As LPTSTR, nSize As DWord) As DWord
     1451
     1452Type DCB
     1453    DCBlength As DWord
     1454    BaudRate As DWord
     1455    fBitFields As DWord
     1456    wReserved As Word
     1457    XonLim As Word
     1458    XoffLim As Word
     1459    ByteSize As Byte
     1460    Parity As Byte
     1461    StopBits As Byte
     1462    XonChar As CHAR
     1463    XoffChar As CHAR
     1464    ErrorChar As CHAR
     1465    EofChar As CHAR
     1466    EvtChar As CHAR
     1467    wReserved1 As Word
     1468End Type
     1469
     1470Type COMMTIMEOUTS
     1471    ReadIntervalTimeout As DWord
     1472    ReadTotalTimeoutMultiplier As DWord
     1473    ReadTotalTimeoutConstant As DWord
     1474    WriteTotalTimeoutMultiplier As DWord
     1475    WriteTotalTimeoutConstant As DWord
     1476End Type
     1477Type COMSTAT
     1478 fCoBitFlds As Long 'See Comment in Win32API.Txt
     1479 cbInQue As DWord
     1480 cbOutQue As DWord
     1481End Type
     1482Declare Function SetCommState Lib "kernel32" (hCommDev As HANDLE, ByRef dcb As DCB) As BOOL
     1483Declare Function SetCommTimeouts Lib "kernel32" (hFile As HANDLE ,ByRef pCommTimeouts As COMMTIMEOUTS) As BOOL
     1484Declare Function ClearCommError Lib "kernel32" (hCommDevs As HANDLE, ByRef Errors As DWord, ByRef Stat As COMSTAT) As BOOL
     1485Declare Function EscapeCommFunction Lib "kernel32" (nCid As HANDLE, ByVal nFunc As DWord) As BOOL
     1486Declare Function GetCommModemStatus Lib "kernel32" (hFile As HANDLE, ByRef ModemStat As DWord) As BOOL
     1487Declare Function SetCommMask Lib "kernel32" (hFile As HANDLE, dwEvtMask As DWord) As BOOL
     1488Declare Function WaitCommEvent Lib "kernel32" (hFile As HANDLE, ByRef EvtMask As DWord, lpOverlapped As *OVERLAPPED)  As BOOL
     1489
     1490Const ANYSIZE_ARRAY = 1
     1491Type LUID
     1492    LowPart As DWord
     1493    HighPart As Long
     1494End Type
     1495Type LUID_AND_ATTRIBUTES
     1496    Luid As LUID
     1497    Attributes As DWord
     1498End Type
     1499TypeDef PLUID_AND_ATTRIBUTES = *LUID_AND_ATTRIBUTES
     1500'TypeDef LUID_AND_ATTRIBUTES_ARRAY = LUID_AND_ATTRIBUTES[ANYSIZE_ARRAY]
     1501'TypeDef PLUID_AND_ATTRIBUTES_ARRAY = *LUID_AND_ATTRIBUTES_ARRAY
     1502
     1503Type TOKEN_PRIVILEGES
     1504    PrivilegeCount As DWord
     1505    Privileges[ELM(ANYSIZE_ARRAY)] As LUID_AND_ATTRIBUTES
     1506End Type
     1507
     1508Declare Function OpenProcessToken Lib "advapi32" (ProcessHandle As HANDLE, DesiredAccess As DWord, ByRef TokenHandle As HANDLE) As BOOL
     1509Declare Function LookupPrivilegeValue Lib "advapi32" Alias _FuncName_LookupPrivilegeValue (lpSystemName As LPCTSTR, lpName As LPCTSTR, ByRef Luid As LUID) As Long
     1510Declare Function AdjustTokenPrivileges Lib "advapi32" (TokenHandle As Long, DisableAllPrivileges As Long,_
     1511    ByRef NewState As TOKEN_PRIVILEGES, BufferLength As Long,
     1512    ByRef PreviousState As TOKEN_PRIVILEGES, ByRef ReturnLength As Long) As Long
     1513
    14181514#endif '_INC_SYSTEM

  • Include/api_window.sbp

    r141 r160  
    88' Window API Function Names
    99#ifdef UNICODE
    10 Const _FuncName_CreateWindowEx = "CreateWindowExW"
    1110Const _FuncName_CallWindowProc = "CallWindowProcW"
    1211Const _FuncName_CharLower = "CharLowerW"
     12Const _FuncName_CharNext = "CharNextW"
     13Const _FuncName_CharPrev = "CharPrevW"
    1314Const _FuncName_CharUpper = "CharUpperW"
     15Const _FuncName_CreateAcceleratorTable = "CreateAcceleratorTableW"
     16Const _FuncName_CreateWindowEx = "CreateWindowExW"
     17Const _FuncName_DefDlgProc = "DefDlgProcW"
    1418Const _FuncName_DefWindowProc = "DefWindowProcW"
     19Const _FuncName_DialogBoxIndirectParam = "DialogBoxIndirectParamW"
    1520Const _FuncName_DispatchMessage = "DispatchMessageW"
     21Const _FuncName_DlgDirList = "DlgDirListW"
     22Const _FuncName_DlgDirListComboBox = "DlgDirListComboBoxW"
     23Const _FuncName_DlgDirSelectComboBoxEx = "DlgDirSelectComboBoxExW"
     24Const _FuncName_DlgDirSelectEx = "DlgDirSelectExW"
    1625Const _FuncName_DrawText = "DrawTextW"
    1726Const _FuncName_DrawTextEx = "DrawTextExW"
    … …  
    2433Const _FuncName_GetClipboardFormatName = "GetClipboardFormatNameW"
    2534Const _FuncName_GetDlgItemText = "GetDlgItemTextW"
     35Const _FuncName_GetMonitorInfo = "GetMonitorInfoW"
    2636Const _FuncName_GetMenuItemInfo = "GetMenuItemInfoW"
    2737Const _FuncName_GetMessage = "GetMessageW"
    … …  
    3141Const _FuncName_GetWindowText = "GetWindowTextW"
    3242Const _FuncName_GetWindowTextLength = "GetWindowTextLengthW"
     43Const _FuncName_GetWindowModuleFileName = "GetWindowModuleFileNameW"
    3344Const _FuncName_InsertMenuItem = "InsertMenuItemW"
    3445Const _FuncName_IsCharAlpha = "IsCharAlphaW"
    … …  
    4253Const _FuncName_LoadIcon = "LoadIconW"
    4354Const _FuncName_LoadImage = "LoadImageW"
     55Const _FuncName_LoadString = "LoadStringW"
     56Const _FuncName_MapVirtualKey = "MapVirtualKeyW"
    4457Const _FuncName_PeekMessage = "PeekMessageW"
    4558Const _FuncName_PostMessage = "PostMessageW"
    … …  
    5467Const _FuncName_SetDlgItemText = "SetDlgItemTextW"
    5568Const _FuncName_SetClassLong = "SetClassLongW"
    56 Const _FuncName_SetClassLong = "SetClassLongW"
     69Const _FuncName_SetClassLongPtr = "SetClassLongPtrW"
    5770Const _FuncName_SetMenuItemInfo = "SetMenuItemInfoW"
    5871Const _FuncName_SetProp = "SetPropW"
    … …  
    6073Const _FuncName_SetWindowLongPtr = "SetWindowLongPtrW"
    6174Const _FuncName_SetWindowText = "SetWindowTextW"
     75Const _FuncName_SetWindowsHookEx = "SetWindowsHookExW"
    6276Const _FuncName_SystemParametersInfo = "SystemParametersInfoW"
     77Const _FuncName_TranslateAccelerator = "TranslateAcceleratorW"
    6378Const _FuncName_UnregisterClass = "UnregisterClassW"
    6479Const _FuncName_wsprintf = "wsprintfW"
    6580Const _FuncName_wvsprintf = "wvsprintfW"
    6681#else
    67 Const _FuncName_CreateWindowEx = "CreateWindowExA"
    6882Const _FuncName_CallWindowProc = "CallWindowProcA"
    6983Const _FuncName_CharLower = "CharLowerA"
     84Const _FuncName_CharNext = "CharNextA"
     85Const _FuncName_CharPrev = "CharPrevA"
    7086Const _FuncName_CharUpper = "CharUpperA"
     87Const _FuncName_CreateAcceleratorTable = "CreateAcceleratorTableA"
     88Const _FuncName_CreateWindowEx = "CreateWindowExA"
     89Const _FuncName_DefDlgProc = "DefDlgProcA"
    7190Const _FuncName_DefWindowProc = "DefWindowProcA"
     91Const _FuncName_DialogBoxIndirectParam = "DialogBoxIndirectParamA"
    7292Const _FuncName_DispatchMessage = "DispatchMessageA"
     93Const _FuncName_DlgDirList = "DlgDirListA"
     94Const _FuncName_DlgDirListComboBox = "DlgDirListComboBoxA"
     95Const _FuncName_DlgDirSelectComboBoxEx = "DlgDirSelectComboBoxExA"
     96Const _FuncName_DlgDirSelectEx = "DlgDirSelectExA"
    7397Const _FuncName_DrawText = "DrawTextA"
    7498Const _FuncName_DrawTextEx = "DrawTextExA"
    … …  
    83107Const _FuncName_GetMenuItemInfo = "GetMenuItemInfoA"
    84108Const _FuncName_GetMessage = "GetMessageA"
     109Const _FuncName_GetMonitorInfo = "GetMonitorInfoA"
    85110Const _FuncName_GetProp = "GetPropA"
    86111Const _FuncName_GetWindowLong = "GetWindowLongA"
    … …  
    88113Const _FuncName_GetWindowText = "GetWindowTextA"
    89114Const _FuncName_GetWindowTextLength = "GetWindowTextLengthA"
     115Const _FuncName_GetWindowModuleFileName = "GetWindowModuleFileNameA"
    90116Const _FuncName_InsertMenuItem = "InsertMenuItemA"
    91117Const _FuncName_IsCharAlpha = "IsCharAlphaA"
    … …  
    99125Const _FuncName_LoadIcon = "LoadIconA"
    100126Const _FuncName_LoadImage = "LoadImageA"
     127Const _FuncName_LoadString = "LoadStringA"
     128Const _FuncName_MapVirtualKey = "MapVirtualKeyA"
    101129Const _FuncName_PeekMessage = "PeekMessageA"
    102130Const _FuncName_PostMessage = "PostMessageA"
    … …  
    116144Const _FuncName_SetWindowLong = "SetWindowLongA"
    117145Const _FuncName_SetWindowLongPtr = "SetWindowLongPtrA"
     146Const _FuncName_SetWindowsHookEx = "SetWindowsHookExA"
    118147Const _FuncName_SetWindowText = "SetWindowTextA"
    119148Const _FuncName_SystemParametersInfo = "SystemParametersInfoA"
     149Const _FuncName_TranslateAccelerator = "TranslateAcceleratorA"
    120150Const _FuncName_UnregisterClass = "UnregisterClassA"
    121151Const _FuncName_wsprintf = "wsprintfA"
    … …  
    123153#endif
    124154
    125 Const CREATEPROCESS_MANIFEST_RESOURCE_ID = 1
    126 
     155Type _System_DeclareHandle_HDWP:unused As DWord:End Type
     156TypeDef HDWP = *_System_DeclareHandle_HDWP
    127157
    128158Type MSG
    … …  
    135165End Type
    136166
    137 
    138 Const MAKEINTRESOURCEW(i) = i As PCWSTR
    139 Const MAKEINTRESOURCEA(i) = i As PCSTR
    140 Const MAKEINTRESOURCE(i) = i As PCTSTR
    141 
    142 TypeDef WNDENUMPROC = *Function(ByVal hwnd As HWND, ByVal lParam As LPARAM) As BOOL
     167Const IS_INTRESOURCE(_r) = ((((_r) As ULONG_PTR) >> 16) = 0)
     168Const MAKEINTRESOURCEW(i) = ((((i) As Word) As ULONG_PTR) As PCWSTR)
     169Const MAKEINTRESOURCEA(i) = ((((i) As Word) As ULONG_PTR) As PCSTR)
     170Const MAKEINTRESOURCE(i) = ((((i) As Word) As ULONG_PTR) As PCTSTR)
     171
     172Const RT_CURSOR = MAKEINTRESOURCE(1)
     173Const RT_BITMAP = MAKEINTRESOURCE(2)
     174Const RT_ICON = MAKEINTRESOURCE(3)
     175Const RT_MENU = MAKEINTRESOURCE(4)
     176Const RT_DIALOG = MAKEINTRESOURCE(5)
     177Const RT_STRING = MAKEINTRESOURCE(6)
     178Const RT_FONTDIR = MAKEINTRESOURCE(7)
     179Const RT_FONT = MAKEINTRESOURCE(8)
     180Const RT_ACCELERATOR = MAKEINTRESOURCE(9)
     181Const RT_RCDATA = MAKEINTRESOURCE(10)
     182Const RT_MESSAGETABLE = MAKEINTRESOURCE(11)
     183
     184Const DIFFERENCE = 11
     185Const RT_GROUP_CURSOR = MAKEINTRESOURCE((RT_CURSOR) As ULONG_PTR + DIFFERENCE)
     186Const RT_GROUP_ICON = MAKEINTRESOURCE((RT_ICON) As ULONG_PTR + DIFFERENCE)
     187Const RT_VERSION = MAKEINTRESOURCE(16)
     188Const RT_DLGINCLUDE = MAKEINTRESOURCE(17)
     189Const RT_PLUGPLAY = MAKEINTRESOURCE(19)
     190Const RT_VXD = MAKEINTRESOURCE(20)
     191Const RT_ANICURSOR = MAKEINTRESOURCE(21)
     192Const RT_ANIICON = MAKEINTRESOURCE(22)
     193Const RT_HTML = MAKEINTRESOURCE(23)
     194Const RT_MANIFEST = MAKEINTRESOURCE(24)
     195Const CREATEPROCESS_MANIFEST_RESOURCE_ID = MAKEINTRESOURCE(1)
     196Const ISOLATIONAWARE_MANIFEST_RESOURCE_ID = MAKEINTRESOURCE(2)
     197Const ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID = MAKEINTRESOURCE(3)
     198Const MINIMUM_RESERVED_MANIFEST_RESOURCE_ID = MAKEINTRESOURCE(1)
     199Const MAXIMUM_RESERVED_MANIFEST_RESOURCE_ID = MAKEINTRESOURCE(16)
     200
     201TypeDef WNDENUMPROC = *Function(hwnd As HWND, lParam As LPARAM) As BOOL
     202TypeDef HOOKPROC = *Function(code As Long, wParam As WPARAM, lParam As LPARAM) As LRESULT
     203TypeDef MONITORENUMPROC = *Function(hm As HMONITOR, hdc As HDC, ByRef rc As RECT, dwData As LPARAM) As BOOL
    143204
    144205Const CS_VREDRAW =         &H0001
    … …  
    373434
    374435Declare Function BringWindowToTop Lib "user32" (hWnd As HWND) As Long
     436Declare Function CallNextHookEx Lib "user32" (hHook As HHOOK, nCode As Long, wParam As WPARAM, lParam As LPARAM) As LRESULT
    375437Declare Function CallWindowProc Lib "user32" Alias _FuncName_CallWindowProc (lpPrevWndFunc As WNDPROC, hWnd As HWND, Msg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
     438Declare Function ChangeClipboardChain Lib "user32" (hwndRemove As HWND, hwndNewNext As HWND) As BOOL
    376439Declare Function CharLower Lib "user32" Alias _FuncName_CharLower (psz As PTSTR) As DWord
     440Declare Function CharNext Lib "user32" Alias _FuncName_CharNext (lpszCurrent As LPCTSTR) As LPTSTR
     441Declare Function CharNextExA Lib "user32" (CodePage As Word, lpCurrentChar As LPCSTR, dwFlags As DWord) As LPSTR
     442Declare Function CharPrev Lib "user32" Alias _FuncName_CharPrev (lpszStart As LPCTSTR, lpszCurrent As LPCTSTR) As LPTSTR
     443Declare Function CharPrevExA Lib "user32" (CodePage As Word, lpStart As LPCSTR, lpCurrentChar As LPCSTR, dwFlags As DWord) As LPSTR
    377444Declare Function CharUpper Lib "user32" Alias _FuncName_CharUpper (psz As PTSTR) As DWord
    378445Declare Function CheckMenuItem Lib "user32" (hMenu As HMENU, uIDCheckItem As DWord, uCheck As DWord) As DWord
    379446Declare Function CheckMenuRadioItem Lib "user32" (hMenu As HMENU, idFirst As DWord, idLast As DWord, idCheck As DWord, uFlags As DWord) As BOOL
     447Declare Function CheckDlgButton Lib "user32" (hDlg As HWND, nIDButton As Long, uCheck As DWord) As BOOL
     448Declare Function CheckRadioButton Lib "user32" (hDlg As HWND, nIDFirstButton As Long, nIDLastButton As Long, nIDCheckButton As Long) As BOOL
    380449Declare Function ChildWindowFromPoint Lib "user32" (hWndParent As HWND, x As Long, y As Long) As HWND
    381 
    382450Const CWP_ALL =             &H0000
    383451Const CWP_SKIPINVISIBLE =   &H0001
    … …  
    392460Declare Function CopyImage Lib "user32" (hImage As HANDLE, uType As DWord, cxDesired As Long, cyDesired As Long, fuFlags As DWord) As HANDLE
    393461Declare Function CountClipboardFormats Lib "user32" () As Long
     462Const FVIRTKEY = &H01
     463Const FNOINVERT = &H02
     464Const FSHIFT = &H04
     465Const FCONTROL = &H08
     466Const FALT = &H10
     467Type ACCEL
     468    fVirt As Byte
     469    key As Word
     470    cmd As Word
     471End Type
     472Declare Function CreateAcceleratorTable Lib "user32" Alias _FuncName_CreateAcceleratorTable (ByRef acl As ACCEL, i As Long) As HACCEL
    394473Declare Function CreateCaret Lib "user32" (hWnd As HWND, hBitmap As HBITMAP, nWidth As Long, nHeight As Long) As BOOL
    395474Declare Function CreateCursor Lib "user32" (hInst As HINSTANCE, xHotSpot As Long, yHotSpot As Long, nWidth As Long, nHeight As Long, pvANDPlane As VoidPtr, pvXORPlane As VoidPtr) As HCURSOR
    … …  
    411490Declare Function CreateWindowEx Lib "user32" Alias _FuncName_CreateWindowEx (dwExStyle As DWord, pClassName As PCTSTR, lpWindowName As PCTSTR, dwStyle As DWord, x As Long, y As Long, nWidth As Long, nHeight As Long, hwndParent As HWND, hmenu As HMENU, hInstance As HINSTANCE, pParm As VoidPtr) As HWND
    412491
     492Declare Function DefDlgProc Lib "user32" Alias _FuncName_DefWindowProc (hDlg As HWND, Msg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
    413493Declare Function DefWindowProc Lib "user32" Alias _FuncName_DefWindowProc (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
    414494Declare Function DeleteMenu Lib "user32" (hMenu As HMENU, uPosition As DWord, uFlags As DWord) As BOOL
     495Declare Function DestroyAcceleratorTable Lib "user32" (hAccel As HACCEL) As BOOL
    415496Declare Function DestroyCaret Lib "user32" () As BOOL
    416497Declare Function DestroyCursor Lib "user32" (hCursor As HCURSOR) As BOOL
    … …  
    418499Declare Function DestroyMenu Lib "user32" (hMenu As HMENU) As BOOL
    419500Declare Function DestroyWindow Lib "user32" (hWnd As HWND) As BOOL
     501Type DLGITEMTEMPLATE
     502    style As DWord
     503    dwExtendedStyle As DWord
     504    x As Integer
     505    y As Integer
     506    cx As Integer
     507    cy As Integer
     508    id As Word
     509End Type
     510Type DLGTEMPLATE
     511    style As DWord
     512    dwExtendedStyle As DWord
     513    cdit As Word
     514    x As Integer
     515    y As Integer
     516    cx As Integer
     517    cy As Integer
     518End Type
     519Declare Function DialogBoxIndirectParam Lib "user32" Alias _FuncName_DialogBoxIndirectParam (hInstance As HINSTANCE, DialogTemplate As *DLGTEMPLATE, hwndParent As HWND, pDialogFunc As DLGPROC, InitParam As LPARAM) As LONG_PTR
    420520Declare Function DispatchMessage Lib "user32" Alias _FuncName_DispatchMessage (ByRef Msg As MSG) As LRESULT
    421 
     521Declare Function DlgDirList Lib "user32" Alias _FuncName_DlgDirList (hDlg As HWND, lpPathSpec As LPTSTR, nIDListBox As Long, nIDStaticPath As Long, uFileType As DWord) As Long
     522Declare Function DlgDirListComboBox Lib "user32" Alias _FuncName_DlgDirListComboBox (hDlg As HWND, lpPathSpec As LPTSTR, nIDComboBox As Long, nIDStaticPath As Long,uFileType As DWord) As Long
     523Declare Function DlgDirSelectComboBoxEx Lib "user32" Alias _FuncName_DlgDirSelectComboBoxEx (hDlg As HWND, lpString As LPTSTR, nCount As Long, nIDComboBox As Long) As BOOL
     524Declare Function DlgDirSelectEx Lib "user32" Alias _FuncName_DlgDirSelectEx (hDlg As HWND, lpString As LPTSTR, nCount As Long, nIDListBox As Long) As BOOL
    422525Const BDR_RAISEDOUTER = &H0001
    423526Const BDR_SUNKENOUTER = &H0002
    … …  
    545648
    546649Declare Function EnableWindow Lib "user32" (hWnd As HWND, bEnable As BOOL) As BOOL
     650Declare Function EndDialogAPI Lib "user32" Alias "EndDialog" (hwndDlg As HWND, nRet As Long) As BOOL
    547651Declare Function EndPaint Lib "user32" (hWnd As HWND, ByRef lpPaint As PAINTSTRUCT) As BOOL
    548652Declare Function EnumClipboardFormats Lib "user32" (uFormat As DWord) As DWord
    549653Declare Function EnumChildWindows Lib "user32" (hwndParent As HWND, pEnumFunc As WNDENUMPROC, lParam As LPARAM) As BOOL
     654Declare Function EnumDisplayMonitors Lib "user32.dll" (ByVal hdc As HDC, lprcClip As *RECT, ByVal lpfnEnum As MONITORENUMPROC, dwData As LPARAM) As BOOL
    550655Declare Function EnumThreadWindows Lib "user32" (dwThreadId As DWord, pEnumFunc As WNDENUMPROC, lParam As LPARAM) As BOOL
    551656Declare Function EnumWindows Lib "user32" (pEnumFunc As WNDENUMPROC, lParam As LPARAM) As BOOL
     657Declare Function ExitWindowsEx Lib "user32" (uFlags As DWord, dwReserved As DWord) As BOOL
    552658Declare Function FillRect Lib "user32" (hdc As HDC, ByRef lpRect As RECT, hBrush As HBRUSH) As BOOL
    553659Declare Function FindWindow Lib "user32" Alias _FuncName_FindWindow (pClassName As PCTSTR, lpWindowName As PCTSTR) As HWND
    554660Declare Function FindWindowEx Lib "user32" Alias _FuncName_FindWindowEx (hwndParent As HWND, hwndChildAfter As HWND, pszClass As PCTSTR, pszWindow As PCTSTR) As HWND
    555661Declare Function FlashWindow Lib "user32" (hWnd As HWND, bInvert As BOOL) As BOOL
     662Const FLASHW_STOP = 0
     663Const FLASHW_CAPTION = 1
     664Const FLASHW_TRAY = 2
     665Const FLASHW_ALL = (FLASHW_CAPTION Or FLASHW_TRAY)
     666Const FLASHW_TIMER = 4
     667Const FLASHW_TIMERNOFG = 12
     668Type FLASHWINFO
     669    cbSize As DWord
     670    hWnd As HWND
     671    dwFlags As DWord
     672    uCount As DWord
     673    dwTimeout As DWord
     674End Type
     675Declare Function FlashWindowEx Lib "user32" (ByRef fwi As FLASHWINFO) As Long
    556676Declare Function FrameRect Lib "user32" (hdc As HDC, ByRef lpRect As RECT, hBrush As HBRUSH) As Long
    557677Declare Function GetActiveWindow Lib "user32" () As HWND
    … …  
    584704Declare Function GetClipboardData Lib "user32" (uFormat As DWord) As HANDLE
    585705Declare Function GetClipboardFormatName Lib "user32" Alias _FuncName_GetClipboardFormatName (uFormat As DWord, pszFormatName As PTSTR, cchMaxCount As Long) As BOOL
     706Declare Function GetClipboardOwner Lib "user32" () As HWND
     707Declare Function GetClipboardViewer Lib "user32" () As HWND
    586708Declare Function GetClipCursor Lib "user32" (ByRef lpRect As RECT) As BOOL
    587709Declare Function GetCursor Lib "user32" () As HCURSOR
    … …  
    604726
    605727Declare Function GetDesktopWindow Lib "user32" () As HWND
     728Declare Function GetDialogBaseUnits Lib "user32" () As Long
    606729Declare Function GetDlgCtrlID Lib "user32" (hWnd As HWND) As Long
    607730Declare Function GetDlgItem Lib "user32" (hDlg As HWND, nIDDlgItem As Long) As HWND
     731Declare Function GetDlgItemInt Lib "user32" (hDlg As HWND, nIDDlgItem As Long, lpTranslated As *BOOL, bSigned As BOOL) As DWord
    608732Declare Function GetDlgItemText Lib "user32" Alias _FuncName_GetDlgItemText (hDlg As HWND, nIDDlgItem As Long, pString As PTSTR, nMaxCount As Long) As Long
    609733Declare Function GetDoubleClickTime Lib "user32" () As DWord
    … …  
    613737Declare Function GetKeyboardState Lib "user32" (lpKeyState As *Byte) As BOOL
    614738Declare Function GetKeyState Lib "user32" (nVirtKey As Long) As Integer
     739Declare Function GetListBoxInfo Lib "user32" (ByVal hwnd As HWND) As DWord
    615740Declare Function GetMenu Lib "user32" (hWnd As HWND) As HMENU
    616741
    … …  
    624749Declare Function GetMenuItemInfo Lib "user32" Alias _FuncName_GetMenuItemInfo (hMenu As HMENU, uItem As DWord, fByPosition As DWord, ByRef mii As MENUITEMINFO) As BOOL
    625750Declare Function GetMessage Lib "user32" Alias _FuncName_GetMessage (ByRef Msg As MSG, hWnd As HWND, wMsgFilterMin As DWord, wMsgFilterMax As DWord) As Long
     751Const CCHDEVICENAME = 32
     752Type MONITORINFO
     753    cbSize As DWord
     754    rcMonitor As RECT
     755    rcWork As RECT
     756    dwFlags As DWord
     757End Type
     758Type MONITORINFOEXA
     759    cbSize As DWord
     760    rcMonitor As RECT
     761    rcWork As RECT
     762    dwFlags As DWord
     763    szDevice[ELM(CCHDEVICENAME)] As SByte
     764End Type
     765Type MONITORINFOEXW
     766    cbSize As DWord
     767    rcMonitor As RECT
     768    rcWork As RECT
     769    dwFlags As DWord
     770    szDevice[ELM(CCHDEVICENAME)] As WCHAR
     771End Type
     772Declare Function GetMonitorInfo Lib "user32.dll" Alias _FuncName_GetMonitorInfo (hMonitor As HMONITOR, ByRef mi As Any /*MONITORINFO*/) As BOOL
     773Declare Function GetNextDlgGroupItem Lib "user32" (hDlg As HWND, hCtl As HWND, bPrevious As BOOL) As HWND
     774Declare Function GetNextDlgTabItem Lib "user32" (hDlg As HWND, hCtl As HWND, bPrevious As BOOL) As HWND
     775Declare Function GetOpenClipboardWindow Lib "user32" () As HWND
    626776Declare Function GetParent Lib "user32" (hWnd As HWND) As HWND
     777Declare Function GetPriorityClipboardFormat Lib "user32" (lpFormatList As *DWord, FormatNum As Long) As Long
    627778Declare Function GetProp Lib "user32" Alias _FuncName_GetProp (hWnd As HWND, pString As PCTSTR) As HANDLE
    628779Declare Function GetScrollInfo Lib "user32" (hWnd As HWND, fnBar As Long, ByRef lpsi As SCROLLINFO) As BOOL
    … …  
    787938Declare Function GetWindowLongPtr Lib "user32" Alias _FuncName_GetWindowLong (hWnd As HWND, nIndex As Long) As LONG_PTR
    788939#endif
     940Declare Function GetWindowModuleFileName Lib "user32" Alias _FuncName_GetWindowModuleFileName (hwnd As HWND, pszFileName As LPTSTR, cchFileNameMax As DWord) As DWord
    789941
    790942Const WPF_SETMINPOSITION =     &H0001
    … …  
    815967Declare Function IsCharUpper Lib "user32" Alias _FuncName_IsCharUpper (ch As TCHAR) As BOOL
    816968Declare Function IsChild Lib "user32" (hWndParent As HWND, hWnd As HWND) As BOOL
     969Declare Function IsClipboardFormatAvailable Lib "user32" (ByVal wFormat As DWord) As BOOL
    817970Declare Function IsDialogMessage Lib "user32" Alias _FuncName_IsDialogMessage (hDlg As HWND, ByRef msg As MSG) As BOOL
     971Declare Function IsDlgButtonChecked Lib "user32" (hDlg As HWND, nIDButton As Long) As DWord
    818972Declare Function IsIconic Lib "user32" (hWnd As HWND) As BOOL
    819973Declare Function IsWindow Lib "user32" (hWnd As HWND) As BOOL
    … …  
    8761030Const LR_SHARED =           &H8000
    8771031Declare Function LoadImage Lib "user32" Alias _FuncName_LoadImage (hinst As HINSTANCE, pszName As PCTSTR, dwImageType As DWord, cxDesired As Long, cyDesired As Long, dwFlags As DWord) As HANDLE
    878 
     1032Declare Function LoadString Lib "user32" Alias _FuncName_LoadString (hInstance As HINSTANCE, uID As DWord, lpBuffer As LPTSTR, nBufferMax As Long) As Long
    8791033Declare Function LockWindowUpdate Lib "user32" (hWnd As HWND) As BOOL
     1034Declare Function MapVirtualKey Lib "user32" Alias _FuncName_MapVirtualKey (wCode As DWord, wMapType As DWord) As DWord
    8801035Declare Function MapWindowPoints Lib "user32" (
    8811036    hWndFrom As HWND,
    … …  
    9451100Declare Sub PostQuitMessage Lib "user32" (nExitCode As Long)
    9461101Declare Function PostThreadMessage Lib "user32" Alias _FuncName_PostThreadMessage (idThread As DWord, Msg As DWord, wParam As WPARAM, lParam As LPARAM) As BOOL
     1102Declare Function RealChildWindowFromPoint Lib "user32" (hwndParent As HWND, xPoint As Long, yPoint As Long) As HWND
    9471103
    9481104Const RDW_INVALIDATE =        &H0001
    … …  
    9621118Declare Function RegisterClassEx Lib "user32" Alias _FuncName_RegisterClassEx (ByRef wcx As WNDCLASSEX) As ATOM
    9631119Declare Function RegisterClipboardFormat Lib "user32" Alias _FuncName_RegisterClipboardFormat (pszFormat As PCTSTR) As DWord
     1120Declare Function RegisterHotKey lib "user32.dll" (hwnd As HWND, id As Long, dwModufuers As DWord, vk As DWord) As BOOL
    9641121Declare Function RegisterWindowMessage Lib "user32" Alias _FuncName_RegisterWindowMessage (pString As PCTSTR) As DWord
    9651122Declare Function ReleaseCapture Lib "user32" () As BOOL
    … …  
    9671124Declare Function RemoveMenu Lib "user32" (hMenu As HMENU, uPosition As DWord, uFlags As DWord) As BOOL
    9681125Declare Function RemoveProp Lib "user32" Alias _FuncName_RemoveProp (hWnd As HWND, pString As PCTSTR) As HANDLE
    969 Declare Function TranslateMessage Lib "user32" (ByRef lpMsg As MSG) As Long
    970 Declare Function ScreenToClient Lib "user32" (hWnd As HWND, ByRef lpPoint As POINTAPI) As BOOL
     1126Declare Function TranslateAccelerator Lib "user32" Alias _FuncName_TranslateAccelerator (hwnd As HWND, hAccTable As HACCEL, ByRef msg As MSG) As Long
     1127Declare Function TranslateMessage Lib "user32" (ByRef msg As MSG) As Long
     1128Declare Function ScreenToClient Lib "user32" (hWnd As HWND, ByRef Point As POINTAPI) As BOOL
    9711129Declare Function ScrollDC Lib "user32" (hdc As HDC, dx As Long, dy As Long, ByRef rcScroll As RECT, ByRef rcClip As RECT, hrgnUpdate As HRGN, ByRef rcUpdate As RECT) As BOOL
    9721130
    … …  
    9801138Declare Function SendNotifyMessage Lib "user32" Alias _FuncName_SendNotifyMessage (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
    9811139Declare Function SetActiveWindow Lib "user32" (hWnd As HWND) As HWND
     1140Declare Function SetDlgItemInt Lib "user32" (hDlg As HWND, nIDDlgItem As Long, uValue As DWord, bSigned As BOOL) As BOOL
    9821141Declare Function SetDlgItemText Lib "user32" Alias _FuncName_SetDlgItemText (hDlg As HWND, nIDDlgItem As Long, lpString As PCTSTR) As BOOL
    9831142Declare Function SetCapture Lib "user32" (hWnd As HWND) As HWND
    … …  
    9931152
    9941153Declare Function SetClipboardData Lib "user32" (uFormat As DWord, hMem As HANDLE) As HANDLE
     1154Declare Function SetClipboardViewer Lib "user32" (ByVal hWndNewViewer As HWND) As HWND
    9951155Declare Function SetCursor Lib "user32" (hCursor As HCURSOR) As HCURSOR
    9961156Declare Function SetCursorPos Lib "user32" (x As Long, y As Long) As BOOL
    … …  
    10051165Declare Function SetParent Lib "user32" (hWndChild As HWND, hWndNewParent As HWND) As HWND
    10061166Declare Function SetProp Lib "user32" Alias _FuncName_SetProp (hWnd As HWND, pString As PCTSTR, hData As HANDLE) As BOOL
     1167Declare Function SetRect Lib "User32" (ByRef rc As RECT, xLeft As Long, yTop As Long, xRight As Long, yBottom As Long) As Long
    10071168Declare Function SetScrollInfo Lib "user32" (hWnd As HWND, fnBar As Long, ByRef lpsi As SCROLLINFO, bRedraw As Long) As BOOL
    10081169Declare Function SetSysColors Lib "user32" (cElements As Long, lpaElements As *DWord, lpaRgbValues As *DWord) As BOOL
    … …  
    10121173
    10131174Declare Function SetWindowContextHelpId Lib "user32"(hwnd As HWND, dwContextHelpId As DWord) As BOOL
    1014 
    10151175#ifdef _WIN64
    10161176Declare Function SetWindowLong Lib "user32" Alias _FuncName_SetWindowLongPtr (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
    … …  
    10451205
    10461206Declare Function SetWindowRgn Lib "user32" (hWnd As HWND, hRgn As HRGN, bRedraw As BOOL) As BOOL
     1207Declare Function SetWindowsHookEx Lib "user32" Alias _FuncName_SetWindowsHookEx (idHook As Long, lpfn As HOOKPROC, hMod As HINSTANCE, dwThreadId As DWord) As HHOOK
    10471208Declare Function SetWindowText Lib "user32" Alias _FuncName_SetWindowText (hWnd As HWND, pString As PCTSTR) As BOOL
    10481209Declare Function ShowCaret Lib "user32" (hWnd As HWND) As BOOL
    … …  
    12671428Declare Function TrackPopupMenu Lib "user32" (hMenu As HMENU, uFlags As DWord, x As Long, y As Long, nReserved As Long, hWnd As HWND, ByRef prcRect As RECT) As BOOL
    12681429
     1430declare function UnhookWindowsHookEx lib "user32" (ByVal hhk As HHOOK) As BOOL
    12691431Declare Function UnregisterClass Lib "user32" Alias _FuncName_UnregisterClass (pClassName As PCTSTR, hinst As HINSTANCE) As BOOL
     1432Declare Function UnregisterHotKey Lib "user32" (hwnd As HWND, id As Long) As BOOL
    12701433Declare Function UpdateWindow Lib "user32" (hWnd As HWND) As BOOL
    12711434Declare Function ValidateRect Lib "user32" (hWnd As HWND, ByRef lpRect As RECT) As BOOL

  • Include/objbase.sbp

    r1 r160  
    104104' IStream Interface
    105105'-------------------
    106 
    107 Type STATSTG
    108     pwcsName As LPOLESTR
    109     dwType As DWord
    110     cbSize As ULARGE_INTEGER
    111     ntime As FILETIME
    112     ctime As FILETIME
    113     atime As FILETIME
    114     grfMode As DWord
    115     grfLocksSupported As DWord
    116     clsid As CLSID
    117     grfStateBits As DWord
    118     reserved As DWord
    119 End Type
    120106
    121107Const CLSCTX_INPROC_SERVER     = &H01

  • Include/objidl.sbp

    r1 r160  
    44TypeDef SNB = **OLECHAR
    55
    6 Class ISequentialStream
    7     Inherits IUnknown
    8 Public
    9     Abstract Function Read(pv As VoidPtr, cb As DWord, pcbRead As *DWord) As HRESULT
    10     Abstract Function Write(pv As VoidPtr, cb As DWord, pcbWritten As *DWord) As HRESULT
    11 End Class
    12 
    13 Class IStream
    14     Inherits ISequentialStream
    15 Public
    16     Abstract Function Seek(dlibMove_LowPart As DWord, dlibMove_HighPart As Long, dwOrigin As DWord, plibNewPosition As *ULARGE_INTEGER) As HRESULT
    17     Abstract Function SetSize(libNewSize_LowPart As DWord, libNewSize_HighPart As DWord) As HRESULT
    18     Abstract Function CopyTo(pstm As *IStream, cb_LowPart As DWord, cb_HighPart As DWord, pcbRead As *ULARGE_INTEGER, pcbWritten As *ULARGE_INTEGER) As HRESULT
    19     Abstract Function Commit(grfCommitFlags As DWord) As HRESULT
    20     Abstract Function Revert() As HRESULT
    21     Abstract Function LockRegion(libOffset_LowPart As DWord, libOffset_HighPart As DWord, cb_LowPart As DWord, cb_HighPart As DWord, dwLockType As DWord) As HRESULT
    22     Abstract Function UnlockRegion(libOffset_LowPart As DWord, libOffset_HighPart As DWord, cb_LowPart As DWord, cb_HighPart As DWord, dwLockType As DWord) As HRESULT
    23     Abstract Function Stat(pstatstg As *STATSTG, grfStatFlag As DWord) As HRESULT
    24     Abstract Function Clone(ByRef ppstm As *IStream) As HRESULT
    25 End Class
    26 TypeDef LPSTREAM = *IStream
    27 
    28 Interface IMessageFilter
    29     Inherits IUnknown
    30 End Interface
    31 
    32 Interface IStorage
    33     Inherits IUnknown
    34 End Interface
    35 
    36 Interface ILockBytes
    37     Inherits IUnknown
    38 End Interface
    39 
    40 Interface IFillLockBytes
    41     Inherits IUnknown
    42 End Interface
    43 
    44 Interface IMoniker
    45     Inherits IUnknown
    46 End Interface
    47 
    48 Interface IBindCtx
    49     Inherits IUnknown
    50 End Interface
    51 
    52 Interface IRunningObjectTable
    53     Inherits IUnknown
    54 End Interface
    55 
    56 Interface IDataAdviseHolder
    57     Inherits IUnknown
    58 End Interface
    59 
    60 Class IMalloc
    61     Inherits IUnknown
    62 Public
    63     Abstract Function Alloc(cb As SIZE_T) As VoidPtr
    64     Abstract Function Realloc(pv As VoidPtr, cb As SIZE_T) As VoidPtr
    65     Abstract Sub Free(pv As VoidPtr)
    66     Abstract Function GetSize(pv As VoidPtr) As SIZE_T
    67     Abstract Function DidAlloc(pv As VoidPtr) As Long
    68     Abstract Sub HeapMinimize()
    69 End Class
    70 
    71 Class BIND_OPTS
    72 Public
     6' IMarshal
     7
     8' IMarshal2
     9
     10Interface IMalloc
     11    Inherits IUnknown
     12
     13    Function Alloc(cb As SIZE_T) As VoidPtr
     14    Function Realloc(pv As VoidPtr, cb As SIZE_T) As VoidPtr
     15    Sub Free(pv As VoidPtr)
     16    Function GetSize(pv As VoidPtr) As SIZE_T
     17    Function DidAlloc(pv As VoidPtr) As Long
     18    Sub HeapMinimize()
     19End Interface
     20
     21' IMallocSpy
     22
     23' IStdMarshalInfo
     24
     25' IExternalCennection
     26
     27' IMultiQI
     28
     29' AsyncIMultiQI
     30
     31' IInternalUnknown
     32
     33' IEnumUnknown
     34
     35Type BIND_OPTS
    7336    cbStruct As DWord
    7437    grfFlags As DWord
    7538    grfMode As DWord
    7639    dwTickCountDeadline As DWord
    77 End Class
    78 
    79 Class BIND_OPTS2
    80     Inherits BIND_OPTS
    81 Public
     40End Type
     41
     42Type BIND_OPTS2
     43'   Inherits BIND_OPTS
     44    cbStruct As DWord
     45    grfFlags As DWord
     46    grfMode As DWord
     47    dwTickCountDeadline As DWord
     48
    8249    dwTrackFlags As DWord
    8350    dwClassContext As DWord
    8451    locale As LCID
    8552    pServerInfo As *COSERVERINFO
    86 End Class
    87 
     53End Type
     54
     55Interface IBindCtx
     56    Inherits IUnknown
     57End Interface
     58
     59' IEnumMoniker
     60
     61Interface IRunningObjectTable
     62    Inherits IUnknown
     63End Interface
     64
     65Dim IID_IPersist = [&h0000010c, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     66Interface IPersist
     67    Inherits IUnknown
     68
     69    Function GetClassID(
     70        /* [out] */ ByRef ClassID As CLSID) As HRESULT
     71End Interface
     72
     73Dim IID_IPersistStream = [&h00000109, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     74Interface IPersistStream
     75    Inherits IPersist
     76
     77    Function IsDirty() As HRESULT
     78
     79    Function Load(
     80        /* [unique][in] */ pStm As *IStream) As HRESULT
     81
     82    Function Save(
     83        /* [unique][in] */ pStm As *IStream,
     84        /* [in] */ fClearDirty As BOOL) As HRESULT
     85
     86    Function GetSizeMax(
     87        /* [out] */ ByRef cbSize As ULARGE_INTEGER) As HRESULT
     88End Interface
     89
     90Interface IMoniker
     91    Inherits IPersistStream
     92End Interface
     93
     94' IEnumString
     95
     96Dim IID_ISequentialStream = [&h0c733a30, &h2a1c, &h11ce, [&had, &he5, &h00, &haa, &h00, &h44, &h77, &h3d]] As IID
     97Interface ISequentialStream
     98    Inherits IUnknown
     99
     100    Function Read(pv As VoidPtr, cb As DWord, pcbRead As *DWord) As HRESULT
     101    Function Write(pv As VoidPtr, cb As DWord, pcbWritten As *DWord) As HRESULT
     102End Interface
     103
     104Type STATSTG
     105    pwcsName As LPOLESTR
     106    type_ As DWord
     107    cbSize As ULARGE_INTEGER
     108    mtime As FILETIME
     109    ctime As FILETIME
     110    atime As FILETIME
     111    grfMode As DWord
     112    grfLocksSupported As DWord
     113    clsid As CLSID
     114    grfStateBits As DWord
     115    reserved As DWord
     116End Type
     117
     118Enum STGTY
     119    STGTY_STORAGE = 1
     120    STGTY_STREAM = 2
     121    STGTY_LOCKBYTES = 3
     122    STGTY_PROPERTY = 4
     123End Enum
     124
     125Enum STREAM_SEEK
     126    STREAM_SEEK_SET = 0
     127    STREAM_SEEK_CUR = 1
     128    STREAM_SEEK_END = 2
     129End Enum
     130
     131Enum LOCKTYPE
     132    LOCK_WRITE = 1
     133    LOCK_EXCLUSIVE = 2
     134    LOCK_ONLYONCE = 4
     135End Enum
     136
     137Dim IID_IStream = [&h0000000c, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     138Interface IStream
     139    Inherits ISequentialStream
     140
     141    Function Seek(dlibMove As LARGE_INTEGER, dwOrigin As DWord, plibNewPosition As *ULARGE_INTEGER) As HRESULT
     142    Function SetSize(libNewSize As ULARGE_INTEGER) As HRESULT
     143    Function CopyTo(pstm As *IStream, cb As ULARGE_INTEGER, pcbRead As *ULARGE_INTEGER, pcbWritten As *ULARGE_INTEGER) As HRESULT
     144    Function Commit(grfCommitFlags As DWord) As HRESULT
     145    Function Revert() As HRESULT
     146    Function LockRegion(libOffset As ULARGE_INTEGER, cb As ULARGE_INTEGER, dwLockType As DWord) As HRESULT
     147    Function UnlockRegion(libOffset As ULARGE_INTEGER, cb As ULARGE_INTEGER, dwLockType As DWord) As HRESULT
     148    Function Stat(pstatstg As *STATSTG, grfStatFlag As DWord) As HRESULT
     149    Function Clone(ByRef ppstm As *IStream) As HRESULT
     150End Interface
     151TypeDef LPSTREAM = *IStream
     152
     153' IEnumSTATSTG
     154
     155Interface IStorage
     156    Inherits IUnknown
     157End Interface
     158
     159Interface IPersistFile
     160    Inherits IPersist
     161
     162    Function IsDirty() As HRESULT
     163
     164    Function Load(
     165        /* [in] */ pszFileName As LPCOLESTR,
     166        /* [in] */ dwMode As DWord) As HRESULT
     167
     168    Function Save(
     169        /* [unique][in] */ pszFileName As LPCOLESTR,
     170        /* [in] */ fRemember As BOOL) As HRESULT
     171
     172    Function SaveCompleted(
     173        /* [unique][in] */ pszFileName As LPCOLESTR) As HRESULT
     174
     175    Function GetCurFile(
     176        /* [out] */ ByRef pszFileName As LPOLESTR) As HRESULT
     177End Interface
     178
     179
     180' IPersistStrage
     181
     182Interface ILockBytes
     183    Inherits IUnknown
     184End Interface
     185
     186Type DVTARGETDEVICE
     187    tdSize As DWord
     188    tdDriverNameOffset As Word
     189    tdDeviceNameOffset As Word
     190    tdPortNameOffset As Word
     191    tdExtDevmodeOffset As Word
     192    tdData[ELM(1)] As Byte
     193End Type
     194
     195TypeDef CLIPFORMAT = Word
     196TypeDef LPCLIPFORMAT = *CLIPFORMAT
     197
     198Type FORMATETC
     199    cfFormat As CLIPFORMAT
     200    ptd As *DVTARGETDEVICE
     201    dwAspect As DWord
     202    lindex As Long
     203    tymed As DWord
     204End Type
     205
     206TypeDef LPFORMATETC = *FORMATETC
     207
     208Interface IEnumFORMATETC
     209    Inherits IUnknown
     210End Interface
     211
     212Interface IEnumSTATDATA
     213    Inherits IUnknown
     214End Interface
     215
     216' IRootStorage
     217
     218Enum /*[transmit_as(long)]*/ TYMED
     219    TYMED_HGLOBAL = 1
     220    TYMED_FILE = 2
     221    TYMED_ISTREAM = 4
     222    TYMED_ISTORAGE = 8
     223    TYMED_GDI = 16
     224    TYMED_MFPICT = 32
     225    TYMED_ENHMF = 64
     226    TYMED_NULL = 0
     227End Enum
     228
     229Type STGMEDIUM
     230    tymed As DWord
     231    data As VoidPtr
     232'   /* [switch_type(DWORD), switch_is((DWORD) tymed)] */
     233'   Union
     234'       /*[case(TYMED_GDI)]*/      hBitmap As HBITMAP
     235'       /*[case(TYMED_MFPICT)]*/   hMetaFilePict As HMETAFILEPICT
     236'       /*[case(TYMED_ENHMF)]*/    hEnhMetaFile As HENHMETAFILE
     237'       /*[case(TYMED_HGLOBAL)]*/  hGlobal As HGLOBAL
     238'       /*[case(TYMED_FILE)]*/     lpszFileName As LPWSTR
     239'       /*[case(TYMED_ISTREAM)]*/  pstm As *IStream
     240'       /*[case(TYMED_ISTORAGE)]*/ pstg As *IStorage
     241'       /*[default]*/
     242'   End Union
     243    /*[unique]*/ pUnkForRelease As *IUnknown
     244End Type
     245
     246Interface IAdviseSink
     247    Inherits IUnknown
     248End Interface
     249
     250' AsyncIAdviseSink
     251
     252' IAdviseSink2
     253
     254' AsyncIAdviseSink2
     255
     256Interface IDataObject
     257    Inherits IUnknown
     258
     259    Function /* [local] */ GetData(
     260        /* [unique][in] */ ByRef rformatetcIn As FORMATETC,
     261        /* [out] */ ByRef rmedium As STGMEDIUM) As HRESULT
     262
     263    Function /* [local] */ GetDataHere(
     264        /* [unique][in] */ ByRef rformatetcIn As FORMATETC,
     265        /* [out] */ ByRef pmedium As STGMEDIUM) As HRESULT
     266
     267    Function QueryGetData(
     268        /* [unique][in] */ ByRef pformatetc As FORMATETC) As HRESULT
     269
     270    Function GetCanonicalFormatEtc(
     271        /* [unique][in] */ ByRef pformatetcIn As FORMATETC,
     272        /* [out] */ ByRef pmedium As STGMEDIUM) As HRESULT
     273
     274    Function /* [local] */ SetData(
     275        /* [unique][in] */ pformatetcIn As *FORMATETC,
     276        /* [out] */ pmedium As *STGMEDIUM,
     277        /* [in] */ fRelease As BOOL) As HRESULT
     278
     279    Function EnumFormatEtc(
     280        /* [in] */ ByVal dwDirection As DWord,
     281        /* [out] */ ByRef rpenumFormatEtc As *IEnumFORMATETC) As HRESULT
     282
     283    Function DAdvise(
     284        /* [in] */ ByRef pformatetc As FORMATETC,
     285        /* [in] */ ByVal advf As DWORD,
     286        /* [unique][in] */ ByVal pAdvSink As *IAdviseSink,
     287        /* [out] */ ByVal pdwConnection As *DWord) As HRESULT
     288
     289    Function DUnadvise(
     290        /* [in] */ ByVal dwConnection As DWord) As HRESULT
     291
     292    Function EnumDAdvise(
     293        /* [out] */ ByRef rpenumAdvise As *IEnumSTATDATA) As HRESULT
     294End Interface
     295
     296Interface IDataAdviseHolder
     297    Inherits IUnknown
     298End Interface
     299
     300Enum CALLTYPE
     301    CALLTYPE_TOPLEVEL = 1
     302    CALLTYPE_NESTED = 2
     303    CALLTYPE_ASYNC = 3
     304    CALLTYPE_TOPLEVEL_CALLPENDING = 4
     305    CALLTYPE_ASYNC_CALLPENDING = 5
     306End Enum
     307
     308Enum ERVERCALL
     309    SERVERCALL_ISHANDLED = 0
     310    SERVERCALL_REJECTED = 1
     311    SERVERCALL_RETRYLATER = 2
     312End Enum
     313
     314Enum PENDINGTYPE
     315    PENDINGTYPE_TOPLEVEL = 1
     316    PENDINGTYPE_NESTED = 2
     317End Enum
     318
     319Enum PENDINGMSG
     320    PENDINGMSG_CANCELCALL = 0
     321    PENDINGMSG_WAITNOPROCESS = 1
     322    PENDINGMSG_WAITDEFPROCESS = 2
     323End Enum
     324
     325Type INTERFACEINFO
     326    pUnk As *IUnknown
     327    iid As IID
     328    wMethod As Word
     329End Type
     330TypeDef LPINTERFACEINFO = *INTERFACEINFO
     331
     332Dim IID_IMessageFilter = [&h00000016, &h0000, &h0000, [&hC0, &h00, &h00, &h00, &h00, &h00, &h00, &h46]] As IID
     333
     334Interface IMessageFilter
     335    Inherits IUnknown
     336
     337    Function HandleInComingCall(
     338        /* [in] */ dwCallType As DWord,
     339        /* [in] */ htaskCaller As HTASK,
     340        /* [in] */ dwTickCount As DWord,
     341        /* [in] */ lpInterfaceInfo As LPINTERFACEINFO) As DWord
     342
     343    Function RetryRejectedCall(
     344        /* [in] */ htaskCallee As HTASK,
     345        /* [in] */ dwTickCount As DWord,
     346        /* [in] */ dwRejectType As DWord) As DWord
     347
     348    Function MessagePending(
     349        /* [in] */ htaskCallee As HTASK,
     350        /* [in] */ dwTickCount As DWord,
     351        /* [in] */ dwPendingType As DWord) As DWord
     352End Interface
     353
     354' IRpcChannelBuffer
     355
     356' IRpcChannelBuffer2
     357
     358' IAsyncRpcChannelBuffer
     359
     360' IRpcChannelBuffer3
     361
     362' IRpcSyntaxNegotiate
     363
     364' IRpcProxyBuffer
     365
     366' IRpcStubBuffer
     367
     368' IPSFactoryBuffer
     369
     370' IChannelHook
     371
     372' IClientSecurity
     373
     374' IServerSecurity
     375
     376' IClassActivator
     377
     378' IRpcOptions
     379
     380Interface IFillLockBytes
     381    Inherits IUnknown
     382End Interface
     383
     384' IProgressNotify
     385
     386' ILayoutStorage
     387
     388' IBlockingLock
     389
     390' ITimeAndNoticeControl
     391
     392' IOplockStorage
     393
     394' ISurrogate
     395
     396' IGlobalInterfaceTable
     397
     398' IDirectWriterLock
     399
     400' ISynchronize
     401
     402' ISynchronizeHandle
     403
     404' ISynchronizeEvent
     405
     406' ISynchronizeContainer
     407
     408' ISynchronizeMutex
     409
     410' ICancelMethodCalls
     411
     412' IAsyncManager
     413
     414' ICallFactory
     415
     416' IRpcHelper
     417
     418' IReleaseMarshalBuffers
     419
     420' IWaitMultiple
     421
     422' IUrlMon
     423
     424' IForegroundTransfer
     425
     426' IAddrTrackingControl
     427
     428' IAddrExclusionControl
     429
     430' IPipeByte
     431
     432' AsyncIPipeByte
     433
     434' IPipeLong
     435
     436' AsyncIPipeLong
     437
     438' IPipeDouble
     439
     440' AsyncIPipeDouble
     441
     442' IThumbnailExtractor
     443
     444' IDummyHICONIncluder
     445
     446' IEnumContextProps
     447
     448' IContext
     449
     450' IObjContext
     451
     452' IProcessLock
     453
     454' ISurrogateService
     455
     456' IComThreadingInfo
     457
     458' IProcessInitControl
     459
     460' IInitializeSpy
    88461
    89462#endif'_INC_OBJIDL

  • Include/ole2.ab

    r150 r160  
    368368    /*OUT*/ ByRef medium As STGMEDIUM) As HRESULT   '      bits
    369369
     370' olectl.h
     371Declare Function OleLoadPicture Lib "olepro32" (pStream As *IStream, lSize As Long, fRunmode As BOOL, ByRef riid As IID, ppvObj As VoidPtr) As HRESULT
     372
    370373#endif ' __OLE2_AB__

  • Include/windows.sbp

    r119 r160  
    1717TypeDef HKEY      = *_System_DeclareHandle_HKEY
    1818TypeDef HFILE     = Long
     19Type _System_DeclareHandle_HANDLE:unused As DWord:End Type
     20TypeDef HRSRC = *_System_DeclareHandle_HANDLE
    1921
    2022'variable type - User
    … …  
    5153Type _System_DeclareHandle_HTASK:unused As DWord:End Type
    5254TypeDef HTASK = *_System_DeclareHandle_HTASK
     55Type _System_DeclareHandle_HHOOK:unused As DWord:End Type
     56TypeDef HHOOK = *_System_DeclareHandle_HHOOK
     57Type _System_DeclareHandle_HMONITOR:unused As DWord:End Type
     58TypeDef HMONITOR = *_System_DeclareHandle_HMONITOR
    5359
    5460'variable type - Shell
    … …  
    123129TypeDef SIZEL = SIZE
    124130
     131TypeDef PVOID = VoidPtr
     132TypeDef LPVOID = VoidPtr
     133TypeDef LPCVOID = VoidPtr
     134
    125135TypeDef FARPROC = *Function() As LONG_PTR
    126136TypeDef NEARPROC = FARPROC
    … …  
    129139TypeDef DLGPROC = *Function(hwnd As HWND, msg As DWord, wParam As WPARAM, lParam As LPARAM) As LONG_PTR
    130140
    131 #include <api_winerror.sbp>
    132 #include <api_system.sbp>
    133 #include <api_window.sbp>
    134 #include <api_commdlg.sbp>
    135 #include <api_gdi.sbp>
    136 #include <api_shell.sbp>
    137 #include <api_reg.sbp>
    138 #include <api_msg.sbp>
    139 #include <api_windowstyles.sbp>
    140 #include <api_winspool.sbp>
    141 
     141#require <api_winerror.sbp>
     142#require <api_system.sbp>
     143#require <api_window.sbp>
     144#require <api_commdlg.sbp>
     145#require <api_gdi.sbp>
     146#require <api_shell.sbp>
     147#require <api_reg.sbp>
     148#require <api_msg.sbp>
     149#require <api_windowstyles.sbp>
     150#require <api_winspool.sbp>
     151#require <winver.ab>
    142152
    143153#endif '_INC_WINDOWS
Note: See TracChangeset for help on using the changeset viewer.