| 1 | ' api_window.sbp - Window Control API
|
|---|
| 2 |
|
|---|
| 3 |
|
|---|
| 4 | #ifndef _INC_WINDOW
|
|---|
| 5 | #define _INC_WINDOW
|
|---|
| 6 |
|
|---|
| 7 |
|
|---|
| 8 | Const CREATEPROCESS_MANIFEST_RESOURCE_ID = 1
|
|---|
| 9 |
|
|---|
| 10 |
|
|---|
| 11 | Type MSG
|
|---|
| 12 | hwnd As HWND
|
|---|
| 13 | message As DWord
|
|---|
| 14 | wParam As WPARAM
|
|---|
| 15 | lParam As LPARAM
|
|---|
| 16 | time As DWord
|
|---|
| 17 | pt As POINTAPI
|
|---|
| 18 | End Type
|
|---|
| 19 |
|
|---|
| 20 |
|
|---|
| 21 | Const MAKEINTRESOURCE(i) = i As PCSTR
|
|---|
| 22 |
|
|---|
| 23 | TypeDef WNDENUMPROC = *Function(ByVal hwnd As HWND, ByVal lParam As LPARAM) As BOOL
|
|---|
| 24 |
|
|---|
| 25 | Const CS_VREDRAW = &H0001
|
|---|
| 26 | Const CS_HREDRAW = &H0002
|
|---|
| 27 | Const CS_DBLCLKS = &H0008
|
|---|
| 28 | Const CS_OWNDC = &H0020
|
|---|
| 29 | Const CS_CLASSDC = &H0040
|
|---|
| 30 | Const CS_PARENTDC = &H0080
|
|---|
| 31 | Const CS_NOCLOSE = &H0200
|
|---|
| 32 | Const CS_SAVEBITS = &H0800
|
|---|
| 33 | Const CS_BYTEALIGNCLIENT = &H1000
|
|---|
| 34 | Const CS_BYTEALIGNWINDOW = &H2000
|
|---|
| 35 | Const CS_GLOBALCLASS = &H4000
|
|---|
| 36 | Type WNDCLASSEX
|
|---|
| 37 | cbSize As DWord
|
|---|
| 38 | style As DWord
|
|---|
| 39 | lpfnWndProc As WNDPROC
|
|---|
| 40 | cbClsExtra As Long
|
|---|
| 41 | cbWndExtra As Long
|
|---|
| 42 | hInstance As HINSTANCE
|
|---|
| 43 | hIcon As HICON
|
|---|
| 44 | hCursor As HCURSOR
|
|---|
| 45 | hbrBackground As HBRUSH
|
|---|
| 46 | lpszMenuName As BytePtr
|
|---|
| 47 | lpszClassName As BytePtr
|
|---|
| 48 | hIconSm As HICON
|
|---|
| 49 | End Type
|
|---|
| 50 |
|
|---|
| 51 |
|
|---|
| 52 | '------------------------
|
|---|
| 53 | ' Dialog Box Command IDs
|
|---|
| 54 | Const IDOK = 1
|
|---|
| 55 | Const IDCANCEL = 2
|
|---|
| 56 | Const IDABORT = 3
|
|---|
| 57 | Const IDRETRY = 4
|
|---|
| 58 | Const IDIGNORE = 5
|
|---|
| 59 | Const IDYES = 6
|
|---|
| 60 | Const IDNO = 7
|
|---|
| 61 | Const IDCLOSE = 8
|
|---|
| 62 | Const IDHELP = 9
|
|---|
| 63 |
|
|---|
| 64 |
|
|---|
| 65 | '------------------------
|
|---|
| 66 | ' Menu flags and structs
|
|---|
| 67 | Const MF_INSERT = &H00000000
|
|---|
| 68 | Const MF_CHANGE = &H00000080
|
|---|
| 69 | Const MF_APPEND = &H00000100
|
|---|
| 70 | Const MF_DELETE = &H00000200
|
|---|
| 71 | Const MF_REMOVE = &H00001000
|
|---|
| 72 | Const MF_BYCOMMAND = &H00000000
|
|---|
| 73 | Const MF_BYPOSITION = &H00000400
|
|---|
| 74 | Const MF_SEPARATOR = &H00000800
|
|---|
| 75 | Const MF_ENABLED = &H00000000
|
|---|
| 76 | Const MF_GRAYED = &H00000001
|
|---|
| 77 | Const MF_DISABLED = &H00000002
|
|---|
| 78 | Const MF_UNCHECKED = &H00000000
|
|---|
| 79 | Const MF_CHECKED = &H00000008
|
|---|
| 80 | Const MF_USECHECKBITMAPS = &H00000200
|
|---|
| 81 | Const MF_STRING = &H00000000
|
|---|
| 82 | Const MF_BITMAP = &H00000004
|
|---|
| 83 | Const MF_OWNERDRAW = &H00000100
|
|---|
| 84 | Const MF_POPUP = &H00000010
|
|---|
| 85 | Const MF_MENUBARBREAK = &H00000020
|
|---|
| 86 | Const MF_MENUBREAK = &H00000040
|
|---|
| 87 | Const MF_UNHILITE = &H00000000
|
|---|
| 88 | Const MF_HILITE = &H00000080
|
|---|
| 89 | Const MF_DEFAULT = &H00001000
|
|---|
| 90 | Const MF_SYSMENU = &H00002000
|
|---|
| 91 | Const MF_HELP = &H00004000
|
|---|
| 92 | Const MF_RIGHTJUSTIFY = &H00004000
|
|---|
| 93 | Const MF_MOUSESELECT = &H00008000
|
|---|
| 94 |
|
|---|
| 95 | Const MFS_GRAYED = &H00000003
|
|---|
| 96 | Const MFS_DISABLED = MFS_GRAYED
|
|---|
| 97 | Const MFS_CHECKED = MF_CHECKED
|
|---|
| 98 | Const MFS_HILITE = MF_HILITE
|
|---|
| 99 | Const MFS_ENABLED = MF_ENABLED
|
|---|
| 100 | Const MFS_UNCHECKED = MF_UNCHECKED
|
|---|
| 101 | Const MFS_UNHILITE = MF_UNHILITE
|
|---|
| 102 | Const MFS_DEFAULT = MF_DEFAULT
|
|---|
| 103 | Const MFS_MASK = &H0000108B
|
|---|
| 104 | Const MFS_HOTTRACKDRAWN = &H10000000
|
|---|
| 105 | Const MFS_CACHEDBMP = &H20000000
|
|---|
| 106 | Const MFS_BOTTOMGAPDROP = &H40000000
|
|---|
| 107 | Const MFS_TOPGAPDROP = &H80000000
|
|---|
| 108 | Const MFS_GAPDROP = &HC0000000
|
|---|
| 109 |
|
|---|
| 110 | Const MIIM_STATE = &H00000001
|
|---|
| 111 | Const MIIM_ID = &H00000002
|
|---|
| 112 | Const MIIM_SUBMENU = &H00000004
|
|---|
| 113 | Const MIIM_CHECKMARKS = &H00000008
|
|---|
| 114 | Const MIIM_TYPE = &H00000010
|
|---|
| 115 | Const MIIM_DATA = &H00000020
|
|---|
| 116 | Const MIIM_STRING = &H00000040
|
|---|
| 117 | Const MIIM_BITMAP = &H00000080
|
|---|
| 118 | Const MIIM_FTYPE = &H00000100
|
|---|
| 119 | Const MFT_STRING = MF_STRING
|
|---|
| 120 | Const MFT_BITMAP = MF_BITMAP
|
|---|
| 121 | Const MFT_MENUBARBREAK = MF_MENUBARBREAK
|
|---|
| 122 | Const MFT_MENUBREAK = MF_MENUBREAK
|
|---|
| 123 | Const MFT_OWNERDRAW = MF_OWNERDRAW
|
|---|
| 124 | Const MFT_RADIOCHECK = &H00000200
|
|---|
| 125 | Const MFT_SEPARATOR = MF_SEPARATOR
|
|---|
| 126 | Const MFT_RIGHTORDER = &H00002000
|
|---|
| 127 | Const MFT_RIGHTJUSTIFY = MF_RIGHTJUSTIFY
|
|---|
| 128 |
|
|---|
| 129 | Type MENUITEMINFO
|
|---|
| 130 | cbSize As DWord
|
|---|
| 131 | fMask As DWord
|
|---|
| 132 | fType As DWord
|
|---|
| 133 | fState As DWord
|
|---|
| 134 | wID As DWord
|
|---|
| 135 | hSubMenu As HMENU
|
|---|
| 136 | hbmpChecked As HBITMAP
|
|---|
| 137 | hbmpUnchecked As HBITMAP
|
|---|
| 138 | dwItemData As ULONG_PTR
|
|---|
| 139 | dwTypeData As LPSTR
|
|---|
| 140 | cch As DWord
|
|---|
| 141 | End Type
|
|---|
| 142 |
|
|---|
| 143 |
|
|---|
| 144 | '------------
|
|---|
| 145 | ' Scroll Bar
|
|---|
| 146 | Const SB_HORZ = 0
|
|---|
| 147 | Const SB_VERT = 1
|
|---|
| 148 | Const SB_CTL = 2
|
|---|
| 149 | Const SB_BOTH = 3
|
|---|
| 150 |
|
|---|
| 151 | ' SCROLLINFO struct
|
|---|
| 152 | Const SIF_RANGE = &H0001
|
|---|
| 153 | Const SIF_PAGE = &H0002
|
|---|
| 154 | Const SIF_POS = &H0004
|
|---|
| 155 | Const SIF_DISABLENOSCROLL = &H0008
|
|---|
| 156 | Const SIF_TRACKPOS = &H0010
|
|---|
| 157 | Const SIF_ALL = SIF_RANGE or SIF_PAGE or SIF_POS or SIF_TRACKPOS
|
|---|
| 158 | Type SCROLLINFO
|
|---|
| 159 | cbSize As DWord
|
|---|
| 160 | fMask As DWord
|
|---|
| 161 | nMin As Long
|
|---|
| 162 | nMax As Long
|
|---|
| 163 | nPage As DWord
|
|---|
| 164 | nPos As Long
|
|---|
| 165 | nTrackPos As Long
|
|---|
| 166 | End Type
|
|---|
| 167 |
|
|---|
| 168 |
|
|---|
| 169 | ' combo box
|
|---|
| 170 | Const CB_ERR = -1
|
|---|
| 171 | Const CB_ERRSPACE = -2
|
|---|
| 172 |
|
|---|
| 173 |
|
|---|
| 174 | ' Clipboard Formats
|
|---|
| 175 | Const CF_TEXT = 1
|
|---|
| 176 | Const CF_BITMAP = 2
|
|---|
| 177 | Const CF_METAFILEPICT = 3
|
|---|
| 178 | Const CF_SYLK = 4
|
|---|
| 179 | Const CF_DIF = 5
|
|---|
| 180 | Const CF_TIFF = 6
|
|---|
| 181 | Const CF_OEMTEXT = 7
|
|---|
| 182 | Const CF_DIB = 8
|
|---|
| 183 | Const CF_PALETTE = 9
|
|---|
| 184 | Const CF_PENDATA = 10
|
|---|
| 185 | Const CF_RIFF = 11
|
|---|
| 186 | Const CF_WAVE = 12
|
|---|
| 187 | Const CF_UNICODETEXT = 13
|
|---|
| 188 | Const CF_ENHMETAFILE = 14
|
|---|
| 189 | Const CF_HDROP = 15
|
|---|
| 190 | Const CF_LOCALE = 16
|
|---|
| 191 | Const CF_MAX = 17
|
|---|
| 192 | Const CF_OWNERDISPLAY = &H0080
|
|---|
| 193 | Const CF_DSPTEXT = &H0081
|
|---|
| 194 | Const CF_DSPBITMAP = &H0082
|
|---|
| 195 | Const CF_DSPMETAFILEPICT = &H0083
|
|---|
| 196 | Const CF_DSPENHMETAFILE = &H008E
|
|---|
| 197 | Const CF_PRIVATEFIRST = &H0200
|
|---|
| 198 | Const CF_PRIVATELAST = &H02FF
|
|---|
| 199 | Const CF_GDIOBJFIRST = &H0300
|
|---|
| 200 | Const CF_GDIOBJLAST = &H03FF
|
|---|
| 201 |
|
|---|
| 202 |
|
|---|
| 203 | '-------------
|
|---|
| 204 | ' Window API
|
|---|
| 205 |
|
|---|
| 206 | Declare Function AdjustWindowRect Lib "user32" (ByRef Rect As RECT, dwStyle As DWord, bMenu As BOOL) As BOOL
|
|---|
| 207 | Declare Function AdjustWindowRectEx Lib "user32" (ByRef Rect As RECT, dwStyle As DWord, bMenu As BOOL, dwExStyle As DWord) As BOOL
|
|---|
| 208 | Declare Function AnyPopup Lib "user32" () As BOOL
|
|---|
| 209 | Declare Function ArrangeIconicWindows Lib "user32" (hWnd As HWND) As DWord
|
|---|
| 210 |
|
|---|
| 211 | Type PAINTSTRUCT
|
|---|
| 212 | hdc As HDC
|
|---|
| 213 | fErase As BOOL
|
|---|
| 214 | rcPaint As RECT
|
|---|
| 215 | fRestore As BOOL
|
|---|
| 216 | fIncUpdate As BOOL
|
|---|
| 217 | rgbReserved(31) As Byte
|
|---|
| 218 | End Type
|
|---|
| 219 | Declare Function BeginPaint Lib "user32" (hWnd As HWND, ByRef Paint As PAINTSTRUCT) As HDC
|
|---|
| 220 |
|
|---|
| 221 | Declare Function BringWindowToTop Lib "user32" (hWnd As HWND) As Long
|
|---|
| 222 | Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (lpPrevWndFunc As WNDPROC, hWnd As HWND, Msg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
|
|---|
| 223 | Declare Function CharLower Lib "user32" Alias "CharLowerA" (lpsz As BytePtr) As DWord
|
|---|
| 224 | Declare Function CharUpper Lib "user32" Alias "CharUpperA" (lpsz As BytePtr) As DWord
|
|---|
| 225 | Declare Function CheckMenuItem Lib "user32" (hMenu As HMENU, uIDCheckItem As DWord, uCheck As DWord) As DWord
|
|---|
| 226 | Declare Function CheckMenuRadioItem Lib "user32" (hMenu As HMENU, idFirst As DWord, idLast As DWord, idCheck As DWord, uFlags As DWord) As BOOL
|
|---|
| 227 | Declare Function ChildWindowFromPoint Lib "user32" (hWndParent As HWND, x As Long, y As Long) As HWND
|
|---|
| 228 |
|
|---|
| 229 | Const CWP_ALL = &H0000
|
|---|
| 230 | Const CWP_SKIPINVISIBLE = &H0001
|
|---|
| 231 | Const CWP_SKIPDISABLED = &H0002
|
|---|
| 232 | Const CWP_SKIPTRANSPARENT = &H0004
|
|---|
| 233 | Declare Function ChildWindowFromPointEx Lib "user32" (hWndParent As HWND, x As Long, y As Long, uFlags As DWord) As HWND
|
|---|
| 234 |
|
|---|
| 235 | Declare Function ClientToScreen Lib "user32" (hWnd As HWND, ByRef lpPoint As POINTAPI) As BOOL
|
|---|
| 236 | Declare Function ClipCursor Lib "user32" (ByRef lpRect As RECT) As BOOL
|
|---|
| 237 | Declare Function CloseClipboard Lib "user32" () As BOOL
|
|---|
| 238 | Declare Function CloseWindow Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 239 | Declare Function CopyImage Lib "user32" (hImage As HANDLE, uType As DWord, cxDesired As Long, cyDesired As Long, fuFlags As DWord) As HANDLE
|
|---|
| 240 | Declare Function CountClipboardFormats Lib "user32" () As Long
|
|---|
| 241 | Declare Function CreateCaret Lib "user32" (hWnd As HWND, hBitmap As HBITMAP, nWidth As Long, nHeight As Long) As BOOL
|
|---|
| 242 | Declare 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
|
|---|
| 243 | Declare Function CreateIcon Lib "user32" (hInst As HINSTANCE, nWidth As Long, nHeight As Long, cPlanes As Byte, cBitsPixel As Byte, lpbANDbits As VoidPtr, lpbXORbits As VoidPtr) As HICON
|
|---|
| 244 |
|
|---|
| 245 | Type ICONINFO
|
|---|
| 246 | fIcon As BOOL
|
|---|
| 247 | xHotspot As DWord
|
|---|
| 248 | yHotspot As DWord
|
|---|
| 249 | hbmMask As HBITMAP
|
|---|
| 250 | hbmColor As HBITMAP
|
|---|
| 251 | End Type
|
|---|
| 252 | Declare Function CreateIconIndirect Lib "user32" (ByRef pIconInfo As ICONINFO) As HICON
|
|---|
| 253 |
|
|---|
| 254 | Declare Function CreateMenu Lib "user32" () As HMENU
|
|---|
| 255 | Declare Function CreatePopupMenu Lib "user32" () As HMENU
|
|---|
| 256 |
|
|---|
| 257 | Const CW_USEDEFAULT = &H80000000
|
|---|
| 258 | Declare Function CreateWindowEx Lib "user32" Alias "CreateWindowExA" (dwExStyle As DWord, lpClassName As PCSTR, lpWindowName As PCSTR, dwStyle As DWord, x As Long, y As Long, nWidth As Long, nHeight As Long, hWndParent As HWND, hMenu As HMENU, hInstance As HINSTANCE, lpParm As VoidPtr) As HWND
|
|---|
| 259 |
|
|---|
| 260 | Declare Function DefWindowProc Lib "user32" Alias "DefWindowProcA" (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
|
|---|
| 261 | Declare Function DeleteMenu Lib "user32" (hMenu As HMENU, uPosition As DWord, uFlags As DWord) As BOOL
|
|---|
| 262 | Declare Function DestroyCaret Lib "user32" () As BOOL
|
|---|
| 263 | Declare Function DestroyCursor Lib "user32" (hCursor As HCURSOR) As BOOL
|
|---|
| 264 | Declare Function DestroyIcon Lib "user32" (hIcon As HICON) As BOOL
|
|---|
| 265 | Declare Function DestroyMenu Lib "user32" (hMenu As HMENU) As BOOL
|
|---|
| 266 | Declare Function DestroyWindow Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 267 | Declare Function DispatchMessage Lib "user32" Alias "DispatchMessageA" (ByRef lpMsg As MSG) As LRESULT
|
|---|
| 268 |
|
|---|
| 269 | Const BDR_RAISEDOUTER = &H0001
|
|---|
| 270 | Const BDR_SUNKENOUTER = &H0002
|
|---|
| 271 | Const BDR_RAISEDINNER = &H0004
|
|---|
| 272 | Const BDR_SUNKENINNER = &H0008
|
|---|
| 273 | Const BDR_OUTER = &H0003
|
|---|
| 274 | Const BDR_INNER = &H000c
|
|---|
| 275 | Const EDGE_RAISED = BDR_RAISEDOUTER or BDR_RAISEDINNER
|
|---|
| 276 | Const EDGE_SUNKEN = BDR_SUNKENOUTER or BDR_SUNKENINNER
|
|---|
| 277 | Const EDGE_ETCHED = BDR_SUNKENOUTER or BDR_RAISEDINNER
|
|---|
| 278 | Const EDGE_BUMP = BDR_RAISEDOUTER or BDR_SUNKENINNER
|
|---|
| 279 | Const BF_LEFT = &H0001
|
|---|
| 280 | Const BF_TOP = &H0002
|
|---|
| 281 | Const BF_RIGHT = &H0004
|
|---|
| 282 | Const BF_BOTTOM = &H0008
|
|---|
| 283 | Const BF_TOPLEFT = BF_TOP or BF_LEFT
|
|---|
| 284 | Const BF_TOPRIGHT = BF_TOP or BF_RIGHT
|
|---|
| 285 | Const BF_BOTTOMLEFT = BF_BOTTOM or BF_LEFT
|
|---|
| 286 | Const BF_BOTTOMRIGHT = BF_BOTTOM or BF_RIGHT
|
|---|
| 287 | Const BF_RECT = BF_LEFT or BF_TOP or BF_RIGHT or BF_BOTTOM
|
|---|
| 288 | Const BF_DIAGONAL = &H0010
|
|---|
| 289 | Const BF_DIAGONAL_ENDTOPRIGHT = BF_DIAGONAL or BF_TOP or BF_RIGHT
|
|---|
| 290 | Const BF_DIAGONAL_ENDTOPLEFT = BF_DIAGONAL or BF_TOP or BF_LEFT
|
|---|
| 291 | Const BF_DIAGONAL_ENDBOTTOMLEFT = BF_DIAGONAL or BF_BOTTOM or BF_LEFT
|
|---|
| 292 | Const BF_DIAGONAL_ENDBOTTOMRIGHT = BF_DIAGONAL or BF_BOTTOM or BF_RIGHT
|
|---|
| 293 | Const BF_MIDDLE = &H0800
|
|---|
| 294 | Const BF_SOFT = &H1000
|
|---|
| 295 | Const BF_ADJUST = &H2000
|
|---|
| 296 | Const BF_FLAT = &H4000
|
|---|
| 297 | Const BF_MONO = &H8000
|
|---|
| 298 | Declare Function DrawEdge Lib "user32" (hdc As HDC, ByRef lpRect As RECT, edge As DWord, grfFlags As DWord) As BOOL
|
|---|
| 299 |
|
|---|
| 300 | Const DFC_CAPTION = 1
|
|---|
| 301 | Const DFC_MENU = 2
|
|---|
| 302 | Const DFC_SCROLL = 3
|
|---|
| 303 | Const DFC_BUTTON = 4
|
|---|
| 304 | Const DFC_POPUPMENU = 5
|
|---|
| 305 | Const DFCS_CAPTIONCLOSE = &H0000
|
|---|
| 306 | Const DFCS_CAPTIONMIN = &H0001
|
|---|
| 307 | Const DFCS_CAPTIONMAX = &H0002
|
|---|
| 308 | Const DFCS_CAPTIONRESTORE = &H0003
|
|---|
| 309 | Const DFCS_CAPTIONHELP = &H0004
|
|---|
| 310 | Const DFCS_MENUARROW = &H0000
|
|---|
| 311 | Const DFCS_MENUCHECK = &H0001
|
|---|
| 312 | Const DFCS_MENUBULLET = &H0002
|
|---|
| 313 | Const DFCS_MENUARROWRIGHT = &H0004
|
|---|
| 314 | Const DFCS_SCROLLUP = &H0000
|
|---|
| 315 | Const DFCS_SCROLLDOWN = &H0001
|
|---|
| 316 | Const DFCS_SCROLLLEFT = &H0002
|
|---|
| 317 | Const DFCS_SCROLLRIGHT = &H0003
|
|---|
| 318 | Const DFCS_SCROLLCOMBOBOX = &H0005
|
|---|
| 319 | Const DFCS_SCROLLSIZEGRIP = &H0008
|
|---|
| 320 | Const DFCS_SCROLLSIZEGRIPRIGHT = &H0010
|
|---|
| 321 | Const DFCS_BUTTONCHECK = &H0000
|
|---|
| 322 | Const DFCS_BUTTONRADIOIMAGE = &H0001
|
|---|
| 323 | Const DFCS_BUTTONRADIOMASK = &H0002
|
|---|
| 324 | Const DFCS_BUTTONRADIO = &H0004
|
|---|
| 325 | Const DFCS_BUTTON3STATE = &H0008
|
|---|
| 326 | Const DFCS_BUTTONPUSH = &H0010
|
|---|
| 327 | Const DFCS_INACTIVE = &H0100
|
|---|
| 328 | Const DFCS_PUSHED = &H0200
|
|---|
| 329 | Const DFCS_CHECKED = &H0400
|
|---|
| 330 | Const DFCS_TRANSPARENT = &H0800
|
|---|
| 331 | Const DFCS_HOT = &H1000
|
|---|
| 332 | Const DFCS_ADJUSTRECT = &H2000
|
|---|
| 333 | Const DFCS_FLAT = &H4000
|
|---|
| 334 | Const DFCS_MONO = &H8000
|
|---|
| 335 | Declare Function DrawFrameControl Lib "user32" (hdc As HDC, ByRef lpRect As RECT, uType As DWord, uState As DWord) As BOOL
|
|---|
| 336 |
|
|---|
| 337 | Declare Function DrawIcon Lib "user32" (hdc As HDC, x As Long, y As Long, hIcon As HICON) As BOOL
|
|---|
| 338 |
|
|---|
| 339 | Const DI_MASK = &H0001
|
|---|
| 340 | Const DI_IMAGE = &H0002
|
|---|
| 341 | Const DI_NORMAL = &H0003
|
|---|
| 342 | Const DI_COMPAT = &H0004
|
|---|
| 343 | Const DI_DEFAULTSIZE = &H0008
|
|---|
| 344 | Declare Function DrawIconEx Lib "user32" (hdc As HDC, xLeft As Long, yTop As Long, hIcon As HICON, cxWidth As Long, cyWidth As Long, istepIfAniCur As DWord, hbrFlickerFreeDraw As HBRUSH, diFlags As DWord) As BOOL
|
|---|
| 345 |
|
|---|
| 346 | Declare Function DrawMenuBar Lib "user32" (hwnd As HWND) As BOOL
|
|---|
| 347 |
|
|---|
| 348 | Const DT_TOP = &H00000000
|
|---|
| 349 | Const DT_LEFT = &H00000000
|
|---|
| 350 | Const DT_CENTER = &H00000001
|
|---|
| 351 | Const DT_RIGHT = &H00000002
|
|---|
| 352 | Const DT_VCENTER = &H00000004
|
|---|
| 353 | Const DT_BOTTOM = &H00000008
|
|---|
| 354 | Const DT_WORDBREAK = &H00000010
|
|---|
| 355 | Const DT_SINGLELINE = &H00000020
|
|---|
| 356 | Const DT_EXPANDTABS = &H00000040
|
|---|
| 357 | Const DT_TABSTOP = &H00000080
|
|---|
| 358 | Const DT_NOCLIP = &H00000100
|
|---|
| 359 | Const DT_EXTERNALLEADING =&H00000200
|
|---|
| 360 | Const DT_CALCRECT = &H00000400
|
|---|
| 361 | Const DT_NOPREFIX = &H00000800
|
|---|
| 362 | Const DT_INTERNAL = &H00001000
|
|---|
| 363 | Const DT_EDITCONTROL = &H00002000
|
|---|
| 364 | Const DT_PATH_ELLIPSIS = &H00004000
|
|---|
| 365 | Const DT_END_ELLIPSIS = &H00008000
|
|---|
| 366 | Const DT_MODIFYSTRING = &H00010000
|
|---|
| 367 | Const DT_RTLREADING = &H00020000
|
|---|
| 368 | Const DT_WORD_ELLIPSIS = &H00040000
|
|---|
| 369 | Declare Function DrawText Lib "user32" Alias "DrawTextA" (hdc As HDC, lpStr As PCSTR, nCount As Long, ByRef lpRect As RECT, dwFormat As DWord) As BOOL
|
|---|
| 370 |
|
|---|
| 371 | Type DRAWTEXTPARAMS
|
|---|
| 372 | cbSize As DWord
|
|---|
| 373 | iTabLength As Long
|
|---|
| 374 | iLeftMargin As Long
|
|---|
| 375 | iRightMargin As Long
|
|---|
| 376 | uiLengthDrawn As DWord
|
|---|
| 377 | End Type
|
|---|
| 378 | Declare Function DrawTextEx Lib "user32" Alias "DrawTextExA" (hdc As HDC, lpchText As PCSTR, cchText As Long, ByRef lpRect As RECT, dwDTFormat As DWord, ByRef lpDTParams As DRAWTEXTPARAMS) As BOOL
|
|---|
| 379 |
|
|---|
| 380 | Declare Function EmptyClipboard Lib "user32" () As BOOL
|
|---|
| 381 | Declare Function EnableMenuItem Lib "user32" (hMenu As HMENU, uIDEnableItem As DWord, uEnable As DWord) As BOOL
|
|---|
| 382 |
|
|---|
| 383 | Const ESB_ENABLE_BOTH = &H0000
|
|---|
| 384 | Const ESB_DISABLE_BOTH = &H0003
|
|---|
| 385 | Const ESB_DISABLE_LEFT = &H0001
|
|---|
| 386 | Const ESB_DISABLE_RIGHT = &H0002
|
|---|
| 387 | Const ESB_DISABLE_UP = &H0001
|
|---|
| 388 | Const ESB_DISABLE_DOWN = &H0002
|
|---|
| 389 | Const ESB_DISABLE_LTUP = ESB_DISABLE_LEFT
|
|---|
| 390 | Const ESB_DISABLE_RTDN = ESB_DISABLE_RIGHT
|
|---|
| 391 | Declare Function EnableScrollBar Lib "user32" (hWnd As HWND, dwSBflags As DWord, dwArrows As DWord) As BOOL
|
|---|
| 392 |
|
|---|
| 393 | Declare Function EnableWindow Lib "user32" (hWnd As HWND, bEnable As BOOL) As BOOL
|
|---|
| 394 | Declare Function EndPaint Lib "user32" (hWnd As HWND, ByRef lpPaint As PAINTSTRUCT) As BOOL
|
|---|
| 395 | Declare Function EnumClipboardFormats Lib "user32" (uFormat As DWord) As DWord
|
|---|
| 396 | Declare Function EnumChildWindows Lib "user32" (hwndParent As HWND, pEnumFunc As WNDENUMPROC, lParam As LPARAM) As BOOL
|
|---|
| 397 | Declare Function EnumThreadWindows Lib "user32" (dwThreadId As DWord, pEnumFunc As WNDENUMPROC, lParam As LPARAM) As BOOL
|
|---|
| 398 | Declare Function EnumWindows Lib "user32" (pEnumFunc As WNDENUMPROC, lParam As LPARAM) As BOOL
|
|---|
| 399 | Declare Function FillRect Lib "user32" (hdc As HDC, ByRef lpRect As RECT, hBrush As HBRUSH) As BOOL
|
|---|
| 400 | Declare Function FindWindow Lib "user32" Alias "FindWindowA" (lpClassName As PCSTR, lpWindowName As PCSTR) As HWND
|
|---|
| 401 | Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (hwndParent As HWND, hwndChildAfter As HWND, pszClass As PCSTR, pszWindow As PCSTR) As HWND
|
|---|
| 402 | Declare Function FlashWindow Lib "user32" (hWnd As HWND, bInvert As BOOL) As BOOL
|
|---|
| 403 | Declare Function FrameRect Lib "user32" (hdc As HDC, ByRef lpRect As RECT, hBrush As HBRUSH) As Long
|
|---|
| 404 | Declare Function GetActiveWindow Lib "user32" () As HWND
|
|---|
| 405 | Declare Function GetAsyncKeyState Lib "user32" (vKey As Long) As Integer
|
|---|
| 406 | Declare Function GetCapture Lib "user32" () As HWND
|
|---|
| 407 | Declare Function GetCaretPos Lib "user32" (ByRef lpPoint As POINTAPI) As BOOL
|
|---|
| 408 | Declare Function GetClassInfoEx Lib "user32" Alias "GetClassInfoExA" (hInst As HINSTANCE, lpszClass As PCSTR, ByRef lpwcx As WNDCLASSEX) As BOOL
|
|---|
| 409 |
|
|---|
| 410 | Const GCL_MENUNAME = -8
|
|---|
| 411 | Const GCL_HBRBACKGROUND = -10
|
|---|
| 412 | Const GCL_HCURSOR = -12
|
|---|
| 413 | Const GCL_HICON = -14
|
|---|
| 414 | Const GCL_HMODULE = -16
|
|---|
| 415 | Const GCL_CBWNDEXTRA = -18
|
|---|
| 416 | Const GCL_CBCLSEXTRA = -20
|
|---|
| 417 | Const GCL_WNDPROC = -24
|
|---|
| 418 | Const GCL_STYLE = -26
|
|---|
| 419 | Const GCW_ATOM = -32
|
|---|
| 420 | Const GCL_HICONSM = -34
|
|---|
| 421 | #ifdef _WIN64
|
|---|
| 422 | Declare Function GetClassLong Lib "user32" Alias "GetClassLongPtrA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 423 | Declare Function GetClassLongPtr Lib "user32" Alias "GetClassLongPtrA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 424 | #else
|
|---|
| 425 | Declare Function GetClassLong Lib "user32" Alias "GetClassLongA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 426 | Declare Function GetClassLongPtr Lib "user32" Alias "GetClassLongA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 427 | #endif
|
|---|
| 428 |
|
|---|
| 429 | Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (hWnd As HWND, lpClassName As PSTR, nMaxCount As Long) As Long
|
|---|
| 430 | Declare Function GetClientRect Lib "user32" (hWnd As HWND, ByRef lpRect As RECT) As BOOL
|
|---|
| 431 | Declare Function GetClipboardData Lib "user32" (uFormat As DWord) As HANDLE
|
|---|
| 432 | Declare Function GetClipboardFormatName Lib "user32" Alias "GetClipboardFormatNameA" (uFormat As DWord, lpszFormatName As BytePtr, cchMaxCount As Long) As BOOL
|
|---|
| 433 | Declare Function GetClipCursor Lib "user32" (ByRef lpRect As RECT) As BOOL
|
|---|
| 434 | Declare Function GetCursor Lib "user32" () As HCURSOR
|
|---|
| 435 | Declare Function GetCursorPos Lib "user32" (ByRef lpPoint As POINTAPI) As BOOL
|
|---|
| 436 | Declare Function GetDC Lib "user32" (hWnd As HWND) As HDC
|
|---|
| 437 |
|
|---|
| 438 | Const DCX_WINDOW = &H00000001
|
|---|
| 439 | Const DCX_CACHE = &H00000002
|
|---|
| 440 | Const DCX_NORESETATTRS = &H00000004
|
|---|
| 441 | Const DCX_CLIPCHILDREN = &H00000008
|
|---|
| 442 | Const DCX_CLIPSIBLINGS = &H00000010
|
|---|
| 443 | Const DCX_PARENTCLIP = &H00000020
|
|---|
| 444 | Const DCX_EXCLUDERGN = &H00000040
|
|---|
| 445 | Const DCX_INTERSECTRGN = &H00000080
|
|---|
| 446 | Const DCX_EXCLUDEUPDATE = &H00000100
|
|---|
| 447 | Const DCX_INTERSECTUPDATE = &H00000200
|
|---|
| 448 | Const DCX_LOCKWINDOWUPDATE = &H00000400
|
|---|
| 449 | Const DCX_VALIDATE = &H00200000
|
|---|
| 450 | Declare Function GetDCEx Lib "user32" (hWnd As HWND, hrgnClip As HRGN, dwFlags As DWord) As HDC
|
|---|
| 451 |
|
|---|
| 452 | Declare Function GetDesktopWindow Lib "user32" () As HWND
|
|---|
| 453 | Declare Function GetDlgCtrlID Lib "user32" (hWnd As HWND) As Long
|
|---|
| 454 | Declare Function GetDlgItem Lib "user32" (hDlg As HWND, nIDDlgItem As Long) As HWND
|
|---|
| 455 | Declare Function GetDlgItemText Lib "user32" Alias "GetDlgItemTextA" (hDlg As HWND, nIDDlgItem As Long, lpString As PSTR, nMaxCount As Long) As Long
|
|---|
| 456 | Declare Function GetDoubleClickTime Lib "user32" () As DWord
|
|---|
| 457 | Declare Function GetFocus Lib "user32" () As HWND
|
|---|
| 458 | Declare Function GetForegroundWindow Lib "user32" () As HWND
|
|---|
| 459 | Declare Function GetIconInfo Lib "user32" (hIcon As HICON, ByRef pIconInfo As ICONINFO) As Long
|
|---|
| 460 | Declare Function GetKeyboardState Lib "user32" (lpKeyState As *Byte) As BOOL
|
|---|
| 461 | Declare Function GetKeyState Lib "user32" (nVirtKey As Long) As Integer
|
|---|
| 462 | Declare Function GetMenu Lib "user32" (hWnd As HWND) As HMENU
|
|---|
| 463 |
|
|---|
| 464 | Declare Function GetMenuContextHelpId Lib "user32" (hmenu As HMENU) As DWord
|
|---|
| 465 | Const GMDI_USEDISABLED = &H0001
|
|---|
| 466 | Const GMDI_GOINTOPOPUPS = &H0002
|
|---|
| 467 | Declare Function GetMenuDefaultItem Lib "user32" (hMenu As HMENU, fByPos As DWord, gmdiFlags As DWord) As DWord
|
|---|
| 468 |
|
|---|
| 469 | Declare Function GetMenuItemID Lib "user32" (hMenu As HMENU, nPos As Long) As DWord
|
|---|
| 470 | Declare Function GetMenuItemCount Lib "user32" (hMenu As HMENU) As Long
|
|---|
| 471 | Declare Function GetMenuItemInfo Lib "user32" Alias "GetMenuItemInfoA" (hMenu As HMENU, uItem As DWord, fByPosition As DWord, ByRef lpmii As MENUITEMINFO) As BOOL
|
|---|
| 472 | Declare Function GetMessage Lib "user32" Alias "GetMessageA" (ByRef lpMsg As MSG, hWnd As HWND, wMsgFilterMin As DWord, wMsgFilterMax As DWord) As Long
|
|---|
| 473 | Declare Function GetParent Lib "user32" (hWnd As HWND) As HWND
|
|---|
| 474 | Declare Function GetProp Lib "user32" Alias "GetPropA" (hWnd As HWND, pString As PCSTR) As HANDLE
|
|---|
| 475 | Declare Function GetScrollInfo Lib "user32" (hWnd As HWND, fnBar As Long, ByRef lpsi As SCROLLINFO) As BOOL
|
|---|
| 476 | Declare Function GetSubMenu Lib "user32" (hMenu As HMENU, nPos As Long) As HMENU
|
|---|
| 477 |
|
|---|
| 478 | Const COLOR_SCROLLBAR = 0
|
|---|
| 479 | Const COLOR_BACKGROUND = 1
|
|---|
| 480 | Const COLOR_ACTIVECAPTION = 2
|
|---|
| 481 | Const COLOR_INACTIVECAPTION = 3
|
|---|
| 482 | Const COLOR_MENU = 4
|
|---|
| 483 | Const COLOR_WINDOW = 5
|
|---|
| 484 | Const COLOR_WINDOWFRAME = 6
|
|---|
| 485 | Const COLOR_MENUTEXT = 7
|
|---|
| 486 | Const COLOR_WINDOWTEXT = 8
|
|---|
| 487 | Const COLOR_CAPTIONTEXT = 9
|
|---|
| 488 | Const COLOR_ACTIVEBORDER = 10
|
|---|
| 489 | Const COLOR_INACTIVEBORDER = 11
|
|---|
| 490 | Const COLOR_APPWORKSPACE = 12
|
|---|
| 491 | Const COLOR_HIGHLIGHT = 13
|
|---|
| 492 | Const COLOR_HIGHLIGHTTEXT = 14
|
|---|
| 493 | Const COLOR_BTNFACE = 15
|
|---|
| 494 | Const COLOR_BTNSHADOW = 16
|
|---|
| 495 | Const COLOR_GRAYTEXT = 17
|
|---|
| 496 | Const COLOR_BTNTEXT = 18
|
|---|
| 497 | Const COLOR_INACTIVECAPTIONTEXT = 19
|
|---|
| 498 | Const COLOR_BTNHIGHLIGHT = 20
|
|---|
| 499 | Const COLOR_3DDKSHADOW = 21
|
|---|
| 500 | Const COLOR_3DLIGHT = 22
|
|---|
| 501 | Const COLOR_INFOTEXT = 23
|
|---|
| 502 | Const COLOR_INFOBK = 24
|
|---|
| 503 | Const COLOR_HOTLIGHT = 26
|
|---|
| 504 | Const COLOR_GRADIENTACTIVECAPTION = 27
|
|---|
| 505 | Const COLOR_GRADIENTINACTIVECAPTION = 28
|
|---|
| 506 | Const COLOR_DESKTOP = COLOR_BACKGROUND
|
|---|
| 507 | Const COLOR_3DFACE = COLOR_BTNFACE
|
|---|
| 508 | Const COLOR_3DSHADOW = COLOR_BTNSHADOW
|
|---|
| 509 | Const COLOR_3DHIGHLIGHT = COLOR_BTNHIGHLIGHT
|
|---|
| 510 | Const COLOR_3DHILIGHT = COLOR_BTNHIGHLIGHT
|
|---|
| 511 | Const COLOR_BTNHILIGHT = COLOR_BTNHIGHLIGHT
|
|---|
| 512 | Declare Function GetSysColor Lib "user32" (nIndex As Long) As DWord
|
|---|
| 513 | Declare Function GetSysColorBrush Lib "user32" (nIndex As Long) As HBRUSH
|
|---|
| 514 |
|
|---|
| 515 | Declare Function GetSystemMenu Lib "user32" (hWnd As HWND, bRevert As BOOL) As HMENU
|
|---|
| 516 |
|
|---|
| 517 | Const SM_CXSCREEN = 0
|
|---|
| 518 | Const SM_CYSCREEN = 1
|
|---|
| 519 | Const SM_CXVSCROLL = 2
|
|---|
| 520 | Const SM_CYHSCROLL = 3
|
|---|
| 521 | Const SM_CYCAPTION = 4
|
|---|
| 522 | Const SM_CXBORDER = 5
|
|---|
| 523 | Const SM_CYBORDER = 6
|
|---|
| 524 | Const SM_CXDLGFRAME = 7
|
|---|
| 525 | Const SM_CYDLGFRAME = 8
|
|---|
| 526 | Const SM_CYVTHUMB = 9
|
|---|
| 527 | Const SM_CXHTHUMB = 10
|
|---|
| 528 | Const SM_CXICON = 11
|
|---|
| 529 | Const SM_CYICON = 12
|
|---|
| 530 | Const SM_CXCURSOR = 13
|
|---|
| 531 | Const SM_CYCURSOR = 14
|
|---|
| 532 | Const SM_CYMENU = 15
|
|---|
| 533 | Const SM_CXFULLSCREEN = 16
|
|---|
| 534 | Const SM_CYFULLSCREEN = 17
|
|---|
| 535 | Const SM_CYKANJIWINDOW = 18
|
|---|
| 536 | Const SM_MOUSEPRESENT = 19
|
|---|
| 537 | Const SM_CYVSCROLL = 20
|
|---|
| 538 | Const SM_CXHSCROLL = 21
|
|---|
| 539 | Const SM_DEBUG = 22
|
|---|
| 540 | Const SM_SWAPBUTTON = 23
|
|---|
| 541 | Const SM_RESERVED1 = 24
|
|---|
| 542 | Const SM_RESERVED2 = 25
|
|---|
| 543 | Const SM_RESERVED3 = 26
|
|---|
| 544 | Const SM_RESERVED4 = 27
|
|---|
| 545 | Const SM_CXMIN = 28
|
|---|
| 546 | Const SM_CYMIN = 29
|
|---|
| 547 | Const SM_CXSIZE = 30
|
|---|
| 548 | Const SM_CYSIZE = 31
|
|---|
| 549 | Const SM_CXFRAME = 32
|
|---|
| 550 | Const SM_CYFRAME = 33
|
|---|
| 551 | Const SM_CXMINTRACK = 34
|
|---|
| 552 | Const SM_CYMINTRACK = 35
|
|---|
| 553 | Const SM_CXDOUBLECLK = 36
|
|---|
| 554 | Const SM_CYDOUBLECLK = 37
|
|---|
| 555 | Const SM_CXICONSPACING = 38
|
|---|
| 556 | Const SM_CYICONSPACING = 39
|
|---|
| 557 | Const SM_MENUDROPALIGNMENT = 40
|
|---|
| 558 | Const SM_PENWINDOWS = 41
|
|---|
| 559 | Const SM_DBCSENABLED = 42
|
|---|
| 560 | Const SM_CMOUSEBUTTONS = 43
|
|---|
| 561 | Const SM_CXFIXEDFRAME = SM_CXDLGFRAME
|
|---|
| 562 | Const SM_CYFIXEDFRAME = SM_CYDLGFRAME
|
|---|
| 563 | Const SM_CXSIZEFRAME = SM_CXFRAME
|
|---|
| 564 | Const SM_CYSIZEFRAME = SM_CYFRAME
|
|---|
| 565 | Const SM_SECURE = 44
|
|---|
| 566 | Const SM_CXEDGE = 45
|
|---|
| 567 | Const SM_CYEDGE = 46
|
|---|
| 568 | Const SM_CXMINSPACING = 47
|
|---|
| 569 | Const SM_CYMINSPACING = 48
|
|---|
| 570 | Const SM_CXSMICON = 49
|
|---|
| 571 | Const SM_CYSMICON = 50
|
|---|
| 572 | Const SM_CYSMCAPTION = 51
|
|---|
| 573 | Const SM_CXSMSIZE = 52
|
|---|
| 574 | Const SM_CYSMSIZE = 53
|
|---|
| 575 | Const SM_CXMENUSIZE = 54
|
|---|
| 576 | Const SM_CYMENUSIZE = 55
|
|---|
| 577 | Const SM_ARRANGE = 56
|
|---|
| 578 | Const SM_CXMINIMIZED = 57
|
|---|
| 579 | Const SM_CYMINIMIZED = 58
|
|---|
| 580 | Const SM_CXMAXTRACK = 59
|
|---|
| 581 | Const SM_CYMAXTRACK = 60
|
|---|
| 582 | Const SM_CXMAXIMIZED = 61
|
|---|
| 583 | Const SM_CYMAXIMIZED = 62
|
|---|
| 584 | Const SM_NETWORK = 63
|
|---|
| 585 | Const SM_CLEANBOOT = 67
|
|---|
| 586 | Const SM_CXDRAG = 68
|
|---|
| 587 | Const SM_CYDRAG = 69
|
|---|
| 588 | Const SM_SHOWSOUNDS = 70
|
|---|
| 589 | Const SM_CXMENUCHECK = 71
|
|---|
| 590 | Const SM_CYMENUCHECK = 72
|
|---|
| 591 | Const SM_SLOWMACHINE = 73
|
|---|
| 592 | Const SM_MIDEASTENABLED = 74
|
|---|
| 593 | Const SM_MOUSEWHEELPRESENT = 75
|
|---|
| 594 | Declare Function GetSystemMetrics Lib "user32" (nIndex As Long) As Long
|
|---|
| 595 |
|
|---|
| 596 | Declare Function GetUpdateRect Lib "user32" (hWnd As HWND, ByRef lpRect As RECT, bErase As BOOL) As BOOL
|
|---|
| 597 | Declare Function GetUpdateRgn Lib "user32" (hWnd As HWND, hRgn As HRGN, bErase As BOOL) As BOOL
|
|---|
| 598 |
|
|---|
| 599 | Const GW_HWNDFIRST = 0
|
|---|
| 600 | Const GW_HWNDLAST = 1
|
|---|
| 601 | Const GW_HWNDNEXT = 2
|
|---|
| 602 | Const GW_HWNDPREV = 3
|
|---|
| 603 | Const GW_OWNER = 4
|
|---|
| 604 | Const GW_CHILD = 5
|
|---|
| 605 | Declare Function GetWindow Lib "user32" (hWnd As HWND, uCmd As DWord) As HWND
|
|---|
| 606 |
|
|---|
| 607 | Declare Function GetWindowContextHelpId Lib "user32" (hwnd As HWND) As DWord
|
|---|
| 608 |
|
|---|
| 609 | Declare Function GetWindowDC Lib "user32" (hWnd As HWND) As HDC
|
|---|
| 610 |
|
|---|
| 611 | #ifndef _WIN64
|
|---|
| 612 | Const GWL_WNDPROC = -4
|
|---|
| 613 | Const GWL_HINSTANCE = -6
|
|---|
| 614 | Const GWL_HWNDPARENT = -8
|
|---|
| 615 | Const GWL_USERDATA = -21
|
|---|
| 616 | Const GWL_ID = -12
|
|---|
| 617 | #endif
|
|---|
| 618 |
|
|---|
| 619 | Const GWL_STYLE = -16
|
|---|
| 620 | Const GWL_EXSTYLE = -20
|
|---|
| 621 |
|
|---|
| 622 | Const GWLP_WNDPROC = -4
|
|---|
| 623 | Const GWLP_HINSTANCE = -6
|
|---|
| 624 | Const GWLP_HWNDPARENT = -8
|
|---|
| 625 | Const GWLP_USERDATA = -21
|
|---|
| 626 | Const GWLP_ID = -12
|
|---|
| 627 |
|
|---|
| 628 |
|
|---|
| 629 | #ifdef _WIN64
|
|---|
| 630 | Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongPtrA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 631 | Declare Function GetWindowLongPtr Lib "user32" Alias "GetWindowLongPtrA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 632 | #else
|
|---|
| 633 | Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 634 | Declare Function GetWindowLongPtr Lib "user32" Alias "GetWindowLongA" (hWnd As HWND, nIndex As Long) As LONG_PTR
|
|---|
| 635 | #endif
|
|---|
| 636 |
|
|---|
| 637 | Const WPF_SETMINPOSITION = &H0001
|
|---|
| 638 | Const WPF_RESTORETOMAXIMIZED = &H0002
|
|---|
| 639 | Type WINDOWPLACEMENT
|
|---|
| 640 | length As DWord
|
|---|
| 641 | flags As DWord
|
|---|
| 642 | showCmd As DWord
|
|---|
| 643 | ptMinPosition As POINTAPI
|
|---|
| 644 | ptMaxPosition As POINTAPI
|
|---|
| 645 | rcNormalPosition As RECT
|
|---|
| 646 | End Type
|
|---|
| 647 | Declare Function GetWindowPlacement Lib "user32" (hWnd As HWND, ByRef lpwndpl As WINDOWPLACEMENT) As BOOL
|
|---|
| 648 |
|
|---|
| 649 | Declare Function GetWindowRect Lib "user32" (hWnd As HWND, ByRef lpRect As RECT) As BOOL
|
|---|
| 650 | Declare Function GetWindowRgn Lib "user32" (hWnd As HWND, hRgn As HRGN) As Long
|
|---|
| 651 | Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (hWnd As HWND, lpString As PSTR, nMaxCount As Long) As Long
|
|---|
| 652 | Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (hWnd As HWND) As Long
|
|---|
| 653 | Declare Function GetWindowThreadProcessId Lib "user32" (hWnd As HWND, lpdwProcessId As DWordPtr) As DWord
|
|---|
| 654 | Declare Function HideCaret Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 655 | Declare Function InsertMenuItem Lib "user32" Alias "InsertMenuItemA" (hMenu As HMENU, uItem As DWord, fByPosition As BOOL, ByRef lpmii As MENUITEMINFO) As BOOL
|
|---|
| 656 | Declare Function InvalidateRect Lib "user32" (hWnd As HWND, ByRef lpRect As RECT, bErase As BOOL) As BOOL
|
|---|
| 657 | Declare Function InvalidateRgn Lib "user32" (hWnd As HWND, hRgn As HRGN, bErase As BOOL) As BOOL
|
|---|
| 658 | Declare Function InvertRect Lib "user32" (hdc As HDC, ByRef lpRect As RECT) As BOOL
|
|---|
| 659 | Declare Function IsCharAlpha Lib "user32" Alias "IsCharAlphaA" (ch As Byte) As BOOL
|
|---|
| 660 | Declare Function IsCharAlphaNumeric Lib "user32" Alias "IsCharAlphaNumericA" (ch As Byte) As BOOL
|
|---|
| 661 | Declare Function IsCharLower Lib "user32" Alias "IsCharLowerA" (ch As Byte) As BOOL
|
|---|
| 662 | Declare Function IsCharUpper Lib "user32" Alias "IsCharUpperA" (ch As Byte) As BOOL
|
|---|
| 663 | Declare Function IsChild Lib "user32" (hWndParent As HWND, hWnd As HWND) As BOOL
|
|---|
| 664 | Declare Function IsDialogMessage Lib "user32" Alias "IsDialogMessageA" (hDlg As HWND, ByRef ref_msg As MSG) As BOOL
|
|---|
| 665 | Declare Function IsIconic Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 666 | Declare Function IsWindow Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 667 | Declare Function IsWindowEnabled Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 668 | Declare Function IsWindowUnicode Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 669 | Declare Function IsWindowVisible Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 670 | Declare Function IsZoomed Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 671 |
|
|---|
| 672 | Const KEYEVENTF_EXTENDEDKEY = &H0001
|
|---|
| 673 | Const KEYEVENTF_KEYUP = &H0002
|
|---|
| 674 | Declare Sub keybd_event Lib "user32" (bVk As Byte, bScan As Byte, dwFlags As DWord, dwExtraInfo As DWord)
|
|---|
| 675 |
|
|---|
| 676 | Declare Function KillTimer Lib "user32" (hWnd As HWND, nIDEvent As ULONG_PTR) As BOOL
|
|---|
| 677 | Declare Function LoadBitmap Lib "user32" Alias "LoadBitmapA" (hInst As HINSTANCE, lpBitmapName As PCSTR) As HBITMAP
|
|---|
| 678 |
|
|---|
| 679 | Const IDC_ARROW = 32512
|
|---|
| 680 | Const IDC_IBEAM = 32513
|
|---|
| 681 | Const IDC_WAIT = 32514
|
|---|
| 682 | Const IDC_CROSS = 32515
|
|---|
| 683 | Const IDC_UPARROW = 32516
|
|---|
| 684 | Const IDC_SIZE = 32640
|
|---|
| 685 | Const IDC_ICON = 32641
|
|---|
| 686 | Const IDC_SIZENWSE = 32642
|
|---|
| 687 | Const IDC_SIZENESW = 32643
|
|---|
| 688 | Const IDC_SIZEWE = 32644
|
|---|
| 689 | Const IDC_SIZENS = 32645
|
|---|
| 690 | Const IDC_SIZEALL = 32646
|
|---|
| 691 | Const IDC_NO = 32648
|
|---|
| 692 | Const IDC_HAND = 32649
|
|---|
| 693 | Const IDC_APPSTARTING = 32650
|
|---|
| 694 | Const IDC_HELP = 32651
|
|---|
| 695 | Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (hInst As HINSTANCE, lpCursorName As PCSTR) As HCURSOR
|
|---|
| 696 |
|
|---|
| 697 | Declare Function LoadCursorFromFile Lib "user32" Alias "LoadCursorFromFileA" (lpFileName As PCSTR) As HCURSOR
|
|---|
| 698 |
|
|---|
| 699 | Const IDI_APPLICATION = 32512
|
|---|
| 700 | Const IDI_HAND = 32513
|
|---|
| 701 | Const IDI_QUESTION = 32514
|
|---|
| 702 | Const IDI_EXCLAMATION = 32515
|
|---|
| 703 | Const IDI_ASTERISK = 32516
|
|---|
| 704 | Const IDI_WINLOGO = 32517
|
|---|
| 705 | Declare Function LoadIcon Lib "user32" Alias "LoadIconA" (hInst As HINSTANCE, lpIconName As PCSTR) As HICON
|
|---|
| 706 |
|
|---|
| 707 | Const IMAGE_BITMAP = 0
|
|---|
| 708 | Const IMAGE_ICON = 1
|
|---|
| 709 | Const IMAGE_CURSOR = 2
|
|---|
| 710 | Const IMAGE_ENHMETAFILE = 3
|
|---|
| 711 | Const LR_DEFAULTCOLOR = &H0000
|
|---|
| 712 | Const LR_MONOCHROME = &H0001
|
|---|
| 713 | Const LR_COLOR = &H0002
|
|---|
| 714 | Const LR_COPYRETURNORG = &H0004
|
|---|
| 715 | Const LR_COPYDELETEORG = &H0008
|
|---|
| 716 | Const LR_LOADFROMFILE = &H0010
|
|---|
| 717 | Const LR_LOADTRANSPARENT = &H0020
|
|---|
| 718 | Const LR_DEFAULTSIZE = &H0040
|
|---|
| 719 | Const LR_VGACOLOR = &H0080
|
|---|
| 720 | Const LR_LOADMAP3DCOLORS = &H1000
|
|---|
| 721 | Const LR_CREATEDIBSECTION = &H2000
|
|---|
| 722 | Const LR_COPYFROMRESOURCE = &H4000
|
|---|
| 723 | Const LR_SHARED = &H8000
|
|---|
| 724 | Declare Function LoadImage Lib "user32" Alias "LoadImageA" (hInst As HINSTANCE, lpszName As PCSTR, dwImageType As DWord, cxDesired As Long, cyDesired As Long, dwFlags As DWord) As HANDLE
|
|---|
| 725 |
|
|---|
| 726 | Declare Function LockWindowUpdate Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 727 | Declare Function MapWindowPoints Lib "user32" (
|
|---|
| 728 | hWndFrom As HWND,
|
|---|
| 729 | hWndTo As HWND,
|
|---|
| 730 | pPoints As *POINTAPI,
|
|---|
| 731 | cPoints As DWord) As Long
|
|---|
| 732 | Declare Function MessageBeep Lib "user32" (uType As DWord) As BOOL
|
|---|
| 733 |
|
|---|
| 734 | Const MB_OK = &H00000000
|
|---|
| 735 | Const MB_OKCANCEL = &H00000001
|
|---|
| 736 | Const MB_ABORTRETRYIGNORE = &H00000002
|
|---|
| 737 | Const MB_YESNOCANCEL = &H00000003
|
|---|
| 738 | Const MB_YESNO = &H00000004
|
|---|
| 739 | Const MB_RETRYCANCEL = &H00000005
|
|---|
| 740 | Const MB_ICONHAND = &H00000010
|
|---|
| 741 | Const MB_ICONQUESTION = &H00000020
|
|---|
| 742 | Const MB_ICONEXCLAMATION = &H00000030
|
|---|
| 743 | Const MB_ICONASTERISK = &H00000040
|
|---|
| 744 | Const MB_USERICON = &H00000080
|
|---|
| 745 | Const MB_ICONWARNING = MB_ICONEXCLAMATION
|
|---|
| 746 | Const MB_ICONERROR = MB_ICONHAND
|
|---|
| 747 | Const MB_ICONINFORMATION = MB_ICONASTERISK
|
|---|
| 748 | Const MB_ICONSTOP = MB_ICONHAND
|
|---|
| 749 | Const MB_DEFBUTTON1 = &H00000000
|
|---|
| 750 | Const MB_DEFBUTTON2 = &H00000100
|
|---|
| 751 | Const MB_DEFBUTTON3 = &H00000200
|
|---|
| 752 | Const MB_DEFBUTTON4 = &H00000300
|
|---|
| 753 | Const MB_APPLMODAL = &H00000000
|
|---|
| 754 | Const MB_SYSTEMMODAL = &H00001000
|
|---|
| 755 | Const MB_TASKMODAL = &H00002000
|
|---|
| 756 | Const MB_HELP = &H00004000
|
|---|
| 757 | Const MB_NOFOCUS = &H00008000
|
|---|
| 758 | Const MB_SETFOREGROUND = &H00010000
|
|---|
| 759 | Const MB_DEFAULT_DESKTOP_ONLY = &H00020000
|
|---|
| 760 | Const MB_TOPMOST = &H00040000
|
|---|
| 761 | Const MB_RIGHT = &H00080000
|
|---|
| 762 | Const MB_RTLREADING = &H00100000
|
|---|
| 763 | Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (hWnd As HWND, lpText As PCSTR, lpCaption As PCSTR, uType As DWord) As Long
|
|---|
| 764 |
|
|---|
| 765 | Const MOUSEEVENTF_MOVE = &H0001
|
|---|
| 766 | Const MOUSEEVENTF_LEFTDOWN = &H0002
|
|---|
| 767 | Const MOUSEEVENTF_LEFTUP = &H0004
|
|---|
| 768 | Const MOUSEEVENTF_RIGHTDOWN = &H0008
|
|---|
| 769 | Const MOUSEEVENTF_RIGHTUP = &H0010
|
|---|
| 770 | Const MOUSEEVENTF_MIDDLEDOWN = &H0020
|
|---|
| 771 | Const MOUSEEVENTF_MIDDLEUP = &H0040
|
|---|
| 772 | Const MOUSEEVENTF_WHEEL = &H0800
|
|---|
| 773 | Const MOUSEEVENTF_ABSOLUTE = &H8000
|
|---|
| 774 | Declare Sub mouse_event Lib "user32" (dwFlags As DWord, dx As DWord, dy As DWord, dwData As DWord, dwExtraInfo As DWord)
|
|---|
| 775 |
|
|---|
| 776 | Declare Function MoveWindow Lib "user32" (hWnd As HWND, x As Long, y As Long, nWidth As Long, nHight As Long, bRepaint As BOOL) As BOOL
|
|---|
| 777 | Declare Function OpenClipboard Lib "user32" (hWndNewOwner As HWND) As BOOL
|
|---|
| 778 | Declare Function OpenIcon Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 779 |
|
|---|
| 780 | Const PM_NOREMOVE = &H0000
|
|---|
| 781 | Const PM_REMOVE = &H0001
|
|---|
| 782 | Declare Function PeekMessage Lib "user32" Alias "PeekMessageA" (ByRef lpMsg As MSG, hWnd As HWND, wMsgFilterMin As DWord, wMsgFilterMax As DWord, wRemoveMsg As DWord) As BOOL
|
|---|
| 783 |
|
|---|
| 784 | Const HWND_BROADCAST = &HFFFF
|
|---|
| 785 | Declare Function PostMessage Lib "user32" Alias "PostMessageA" (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As BOOL
|
|---|
| 786 |
|
|---|
| 787 | Declare Sub PostQuitMessage Lib "user32" (nExitCode As Long)
|
|---|
| 788 | Declare Function PostThreadMessage Lib "user32" Alias "PostThreadMessageA" (idThread As DWord, Msg As DWord, wParam As WPARAM, lParam As LPARAM) As BOOL
|
|---|
| 789 |
|
|---|
| 790 | Const RDW_INVALIDATE = &H0001
|
|---|
| 791 | Const RDW_INTERNALPAINT = &H0002
|
|---|
| 792 | Const RDW_ERASE = &H0004
|
|---|
| 793 | Const RDW_VALIDATE = &H0008
|
|---|
| 794 | Const RDW_NOINTERNALPAINT = &H0010
|
|---|
| 795 | Const RDW_NOERASE = &H0020
|
|---|
| 796 | Const RDW_NOCHILDREN = &H0040
|
|---|
| 797 | Const RDW_ALLCHILDREN = &H0080
|
|---|
| 798 | Const RDW_UPDATENOW = &H0100
|
|---|
| 799 | Const RDW_ERASENOW = &H0200
|
|---|
| 800 | Const RDW_FRAME = &H0400
|
|---|
| 801 | Const RDW_NOFRAME = &H0800
|
|---|
| 802 | Declare Function RedrawWindow Lib "user32" (hWnd As HWND, ByRef lprcUpdate As RECT, hrgnUpdate As HRGN, flags As DWord) As BOOL
|
|---|
| 803 |
|
|---|
| 804 | Declare Function RegisterClassEx Lib "user32" Alias "RegisterClassExA" (ByRef wcx As WNDCLASSEX) As ATOM
|
|---|
| 805 | Declare Function RegisterClipboardFormat Lib "user32" Alias "RegisterClipboardFormatA" (lpszFormat As PCSTR) As DWord
|
|---|
| 806 | Declare Function RegisterWindowMessage Lib "user32" Alias "RegisterWindowMessageA" (lpString As PCSTR) As DWord
|
|---|
| 807 | Declare Function ReleaseCapture Lib "user32" () As BOOL
|
|---|
| 808 | Declare Function ReleaseDC Lib "user32" (hWnd As HWND, hdc As HDC) As BOOL
|
|---|
| 809 | Declare Function RemoveMenu Lib "user32" (hMenu As HMENU, uPosition As DWord, uFlags As DWord) As BOOL
|
|---|
| 810 | Declare Function RemoveProp Lib "user32" Alias "RemovePropA" (hWnd As HWND, lpString As PCSTR) As HANDLE
|
|---|
| 811 | Declare Function TranslateMessage Lib "user32" (ByRef lpMsg As MSG) As Long
|
|---|
| 812 | Declare Function ScreenToClient Lib "user32" (hWnd As HWND, ByRef lpPoint As POINTAPI) As BOOL
|
|---|
| 813 | Declare 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
|
|---|
| 814 |
|
|---|
| 815 | Const SW_SCROLLCHILDREN = &H0001
|
|---|
| 816 | Const SW_INVALIDATE = &H0002
|
|---|
| 817 | Const SW_ERASE = &H0004
|
|---|
| 818 | Declare Function ScrollWindowEx Lib "user32" (hWnd As HWND, dx As Long, dy As Long, ByRef rcScroll As RECT, ByRef rcClip As RECT, hrgnUpdate As HRGN, ByRef rcUpdate As RECT, flags As DWord) As BOOL
|
|---|
| 819 |
|
|---|
| 820 | Declare Function SendDlgItemMessage Lib "user32" Alias "SendDlgItemMessageA" (hDlg As HWND, nIDDlgItem As Long, Msg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
|
|---|
| 821 | Declare Function SendMessage Lib "user32" Alias "SendMessageA" (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
|
|---|
| 822 | Declare Function SendNotifyMessage Lib "user32" Alias "SendNotifyMessageA" (hWnd As HWND, wMsg As DWord, wParam As WPARAM, lParam As LPARAM) As LRESULT
|
|---|
| 823 | Declare Function SetActiveWindow Lib "user32" (hWnd As HWND) As HWND
|
|---|
| 824 | Declare Function SetDlgItemText Lib "user32" Alias "SetDlgItemTextA" (hDlg As HWND, nIDDlgItem As Long, lpString As PCSTR) As BOOL
|
|---|
| 825 | Declare Function SetCapture Lib "user32" (hWnd As HWND) As HWND
|
|---|
| 826 | Declare Function SetCaretPos Lib "user32" (x As Long, y As Long) As BOOL
|
|---|
| 827 |
|
|---|
| 828 | #ifdef _WIN64
|
|---|
| 829 | Declare Function SetClassLong Lib "user32" Alias "SetClassLongPtrA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 830 | Declare Function SetClassLongPtr Lib "user32" Alias "SetClassLongPtrA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 831 | #else
|
|---|
| 832 | Declare Function SetClassLong Lib "user32" Alias "SetClassLongA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 833 | Declare Function SetClassLongPtr Lib "user32" Alias "SetClassLongA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 834 | #endif
|
|---|
| 835 |
|
|---|
| 836 | Declare Function SetClipboardData Lib "user32" (uFormat As DWord, hMem As HANDLE) As HANDLE
|
|---|
| 837 | Declare Function SetCursor Lib "user32" (hCursor As HCURSOR) As HCURSOR
|
|---|
| 838 | Declare Function SetCursorPos Lib "user32" (x As Long, y As Long) As BOOL
|
|---|
| 839 | Declare Function SetDoubleClickTime Lib "user32" (uInterval As DWord) As BOOL
|
|---|
| 840 | Declare Function SetFocus Lib "user32" (hWnd As HWND) As HWND
|
|---|
| 841 | Declare Function SetForegroundWindow Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 842 | Declare Function SetKeyboardState Lib "user32" (lpKeyState As *Byte) As BOOL
|
|---|
| 843 | Declare Function SetMenu Lib "user32" (hWnd As HWND, hMenu As HMENU) As BOOL
|
|---|
| 844 | Declare Function SetMenuContextHelpId Lib "user32" (hmenu As HMENU, dwContextHelpId As DWord) As BOOL
|
|---|
| 845 | Declare Function SetMenuDefaultItem Lib "user32" (hMenu As HMENU, uItem As DWord, fByPos As DWord) As BOOL
|
|---|
| 846 | Declare Function SetMenuItemInfo Lib "user32" Alias "SetMenuItemInfoA" (hMenu As HMENU, uItem As DWord, fByPosition As BOOL, ByRef lpmii As MENUITEMINFO) As BOOL
|
|---|
| 847 | Declare Function SetParent Lib "user32" (hWndChild As HWND, hWndNewParent As HWND) As HWND
|
|---|
| 848 | Declare Function SetProp Lib "user32" Alias "SetPropA" (hWnd As HWND, pString As PCSTR, hData As HANDLE) As BOOL
|
|---|
| 849 | Declare Function SetScrollInfo Lib "user32" (hWnd As HWND, fnBar As Long, ByRef lpsi As SCROLLINFO, bRedraw As Long) As BOOL
|
|---|
| 850 | Declare Function SetSysColors Lib "user32" (cElements As Long, lpaElements As *DWord, lpaRgbValues As *DWord) As BOOL
|
|---|
| 851 |
|
|---|
| 852 | TypeDef TIMERPROC = *Sub(hwnd As HWND, msg As DWord, idEvent As ULONG_PTR, dwTime As DWord)
|
|---|
| 853 | Declare Function SetTimer Lib "user32" (hWnd As HWND, nIDEvent As ULONG_PTR, nElapse As DWord, lpTimerFunc As TIMERPROC) As ULONG_PTR
|
|---|
| 854 |
|
|---|
| 855 | Declare Function SetWindowContextHelpId Lib "user32"(hwnd As HWND, dwContextHelpId As DWord) As BOOL
|
|---|
| 856 |
|
|---|
| 857 | #ifdef _WIN64
|
|---|
| 858 | Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongPtrA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 859 | Declare Function SetWindowLongPtr Lib "user32" Alias "SetWindowLongPtrA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 860 | #else
|
|---|
| 861 | Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 862 | Declare Function SetWindowLongPtr Lib "user32" Alias "SetWindowLongA" (hWnd As HWND, nIndex As Long, NewLong As LONG_PTR) As LONG_PTR
|
|---|
| 863 | #endif
|
|---|
| 864 |
|
|---|
| 865 | Declare Function SetWindowPlacement Lib "user32" (hWnd As HWND, ByRef lpwndpl As WINDOWPLACEMENT) As BOOL
|
|---|
| 866 |
|
|---|
| 867 | Const HWND_TOP = 0 As HWND
|
|---|
| 868 | Const HWND_BOTTOM = 1 As HWND
|
|---|
| 869 | Const HWND_TOPMOST = -1 As HWND
|
|---|
| 870 | Const HWND_NOTOPMOST = -2 As HWND
|
|---|
| 871 | Const SWP_NOSIZE = &H0001
|
|---|
| 872 | Const SWP_NOMOVE = &H0002
|
|---|
| 873 | Const SWP_NOZORDER = &H0004
|
|---|
| 874 | Const SWP_NOREDRAW = &H0008
|
|---|
| 875 | Const SWP_NOACTIVATE = &H0010
|
|---|
| 876 | Const SWP_FRAMECHANGED = &H0020
|
|---|
| 877 | Const SWP_SHOWWINDOW = &H0040
|
|---|
| 878 | Const SWP_HIDEWINDOW = &H0080
|
|---|
| 879 | Const SWP_NOCOPYBITS = &H0100
|
|---|
| 880 | Const SWP_NOOWNERZORDER = &H0200
|
|---|
| 881 | Const SWP_NOSENDCHANGING = &H0400
|
|---|
| 882 | Const SWP_DRAWFRAME = SWP_FRAMECHANGED
|
|---|
| 883 | Const SWP_NOREPOSITION = SWP_NOOWNERZORDER
|
|---|
| 884 | Const SWP_DEFERERASE = &H2000
|
|---|
| 885 | Const SWP_ASYNCWINDOWPOS = &H4000
|
|---|
| 886 | Declare Function SetWindowPos Lib "user32" (hWnd As HWND, hWndInsertAfter As HWND, X As Long, Y As Long, cx As Long, cy As Long, uFlags As DWord) As BOOL
|
|---|
| 887 |
|
|---|
| 888 | Declare Function SetWindowRgn Lib "user32" (hWnd As HWND, hRgn As HRGN, bRedraw As BOOL) As BOOL
|
|---|
| 889 | Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (hWnd As HWND, pString As PCSTR) As BOOL
|
|---|
| 890 | Declare Function ShowCaret Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 891 | Declare Function ShowCursor Lib "user32" (bShow As Long) As BOOL
|
|---|
| 892 | Declare Function ShowScrollBar Lib "user32" (hWnd As HWND, wBar As DWord, bShow As BOOL) As BOOL
|
|---|
| 893 |
|
|---|
| 894 | Const SW_HIDE = 0
|
|---|
| 895 | Const SW_SHOWNORMAL = 1
|
|---|
| 896 | Const SW_NORMAL = 1
|
|---|
| 897 | Const SW_SHOWMINIMIZED = 2
|
|---|
| 898 | Const SW_SHOWMAXIMIZED = 3
|
|---|
| 899 | Const SW_MAXIMIZE = 3
|
|---|
| 900 | Const SW_SHOWNOACTIVATE = 4
|
|---|
| 901 | Const SW_SHOW = 5
|
|---|
| 902 | Const SW_MINIMIZE = 6
|
|---|
| 903 | Const SW_SHOWMINNOACTIVE = 7
|
|---|
| 904 | Const SW_SHOWNA = 8
|
|---|
| 905 | Const SW_RESTORE = 9
|
|---|
| 906 | Const SW_SHOWDEFAULT = 10
|
|---|
| 907 | Const SW_FORCEMINIMIZE = 11
|
|---|
| 908 | Const SW_MAX = 11
|
|---|
| 909 | Declare Function ShowWindow Lib "user32" (hWnd As HWND, nCmdShow As Long) As BOOL
|
|---|
| 910 | Declare Function ShowWindowAsync Lib "user32" (hWnd As HWND, nCmdShow As Long) As BOOL
|
|---|
| 911 |
|
|---|
| 912 | Type NONCLIENTMETRICS
|
|---|
| 913 | cbSize As DWord
|
|---|
| 914 | iBorderWidth As Long
|
|---|
| 915 | iScrollWidth As Long
|
|---|
| 916 | iScrollHeight As Long
|
|---|
| 917 | iCaptionWidth As Long
|
|---|
| 918 | iCaptionHeight As Long
|
|---|
| 919 | lfCaptionFont As LOGFONT
|
|---|
| 920 | iSmCaptionWidth As Long
|
|---|
| 921 | iSmCaptionHeight As Long
|
|---|
| 922 | lfSmCaptionFont As LOGFONT
|
|---|
| 923 | iMenuWidth As Long
|
|---|
| 924 | iMenuHeight As Long
|
|---|
| 925 | lfMenuFont As LOGFONT
|
|---|
| 926 | lfStatusFont As LOGFONT
|
|---|
| 927 | lfMessageFont As LOGFONT
|
|---|
| 928 | End Type
|
|---|
| 929 | Const SPI_GETBEEP = 1
|
|---|
| 930 | Const SPI_SETBEEP = 2
|
|---|
| 931 | Const SPI_GETMOUSE = 3
|
|---|
| 932 | Const SPI_SETMOUSE = 4
|
|---|
| 933 | Const SPI_GETBORDER = 5
|
|---|
| 934 | Const SPI_SETBORDER = 6
|
|---|
| 935 | Const SPI_GETKEYBOARDSPEED = 10
|
|---|
| 936 | Const SPI_SETKEYBOARDSPEED = 11
|
|---|
| 937 | Const SPI_LANGDRIVER = 12
|
|---|
| 938 | Const SPI_ICONHORIZONTALSPACING = 13
|
|---|
| 939 | Const SPI_GETSCREENSAVETIMEOUT = 14
|
|---|
| 940 | Const SPI_SETSCREENSAVETIMEOUT = 15
|
|---|
| 941 | Const SPI_GETSCREENSAVEACTIVE = 16
|
|---|
| 942 | Const SPI_SETSCREENSAVEACTIVE = 17
|
|---|
| 943 | Const SPI_GETGRIDGRANULARITY = 18
|
|---|
| 944 | Const SPI_SETGRIDGRANULARITY = 19
|
|---|
| 945 | Const SPI_SETDESKWALLPAPER = 20
|
|---|
| 946 | Const SPI_SETDESKPATTERN = 21
|
|---|
| 947 | Const SPI_GETKEYBOARDDELAY = 22
|
|---|
| 948 | Const SPI_SETKEYBOARDDELAY = 23
|
|---|
| 949 | Const SPI_ICONVERTICALSPACING = 24
|
|---|
| 950 | Const SPI_GETICONTITLEWRAP = 25
|
|---|
| 951 | Const SPI_SETICONTITLEWRAP = 26
|
|---|
| 952 | Const SPI_GETMENUDROPALIGNMENT = 27
|
|---|
| 953 | Const SPI_SETMENUDROPALIGNMENT = 28
|
|---|
| 954 | Const SPI_SETDOUBLECLKWIDTH = 29
|
|---|
| 955 | Const SPI_SETDOUBLECLKHEIGHT = 30
|
|---|
| 956 | Const SPI_GETICONTITLELOGFONT = 31
|
|---|
| 957 | Const SPI_SETDOUBLECLICKTIME = 32
|
|---|
| 958 | Const SPI_SETMOUSEBUTTONSWAP = 33
|
|---|
| 959 | Const SPI_SETICONTITLELOGFONT = 34
|
|---|
| 960 | Const SPI_GETFASTTASKSWITCH = 35
|
|---|
| 961 | Const SPI_SETFASTTASKSWITCH = 36
|
|---|
| 962 | Const SPI_SETDRAGFULLWINDOWS = 37
|
|---|
| 963 | Const SPI_GETDRAGFULLWINDOWS = 38
|
|---|
| 964 | Const SPI_GETNONCLIENTMETRICS = 41
|
|---|
| 965 | Const SPI_SETNONCLIENTMETRICS = 42
|
|---|
| 966 | Const SPI_GETMINIMIZEDMETRICS = 43
|
|---|
| 967 | Const SPI_SETMINIMIZEDMETRICS = 44
|
|---|
| 968 | Const SPI_GETICONMETRICS = 45
|
|---|
| 969 | Const SPI_SETICONMETRICS = 46
|
|---|
| 970 | Const SPI_SETWORKAREA = 47
|
|---|
| 971 | Const SPI_GETWORKAREA = 48
|
|---|
| 972 | Const SPI_SETPENWINDOWS = 49
|
|---|
| 973 | Const SPI_GETHIGHCONTRAST = 66
|
|---|
| 974 | Const SPI_SETHIGHCONTRAST = 67
|
|---|
| 975 | Const SPI_GETKEYBOARDPREF = 68
|
|---|
| 976 | Const SPI_SETKEYBOARDPREF = 69
|
|---|
| 977 | Const SPI_GETSCREENREADER = 70
|
|---|
| 978 | Const SPI_SETSCREENREADER = 71
|
|---|
| 979 | Const SPI_GETANIMATION = 72
|
|---|
| 980 | Const SPI_SETANIMATION = 73
|
|---|
| 981 | Const SPI_GETFONTSMOOTHING = 74
|
|---|
| 982 | Const SPI_SETFONTSMOOTHING = 75
|
|---|
| 983 | Const SPI_SETDRAGWIDTH = 76
|
|---|
| 984 | Const SPI_SETDRAGHEIGHT = 77
|
|---|
| 985 | Const SPI_SETHANDHELD = 78
|
|---|
| 986 | Const SPI_GETLOWPOWERTIMEOUT = 79
|
|---|
| 987 | Const SPI_GETPOWEROFFTIMEOUT = 80
|
|---|
| 988 | Const SPI_SETLOWPOWERTIMEOUT = 81
|
|---|
| 989 | Const SPI_SETPOWEROFFTIMEOUT = 82
|
|---|
| 990 | Const SPI_GETLOWPOWERACTIVE = 83
|
|---|
| 991 | Const SPI_GETPOWEROFFACTIVE = 84
|
|---|
| 992 | Const SPI_SETLOWPOWERACTIVE = 85
|
|---|
| 993 | Const SPI_SETPOWEROFFACTIVE = 86
|
|---|
| 994 | Const SPI_SETCURSORS = 87
|
|---|
| 995 | Const SPI_SETICONS = 88
|
|---|
| 996 | Const SPI_GETDEFAULTINPUTLANG = 89
|
|---|
| 997 | Const SPI_SETDEFAULTINPUTLANG = 90
|
|---|
| 998 | Const SPI_SETLANGTOGGLE = 91
|
|---|
| 999 | Const SPI_GETWINDOWSEXTENSION = 92
|
|---|
| 1000 | Const SPI_SETMOUSETRAILS = 93
|
|---|
| 1001 | Const SPI_GETMOUSETRAILS = 94
|
|---|
| 1002 | Const SPI_SETSCREENSAVERRUNNING = 97
|
|---|
| 1003 | Const SPI_SCREENSAVERRUNNING = SPI_SETSCREENSAVERRUNNING
|
|---|
| 1004 | Const SPI_GETFILTERKEYS = 50
|
|---|
| 1005 | Const SPI_SETFILTERKEYS = 51
|
|---|
| 1006 | Const SPI_GETTOGGLEKEYS = 52
|
|---|
| 1007 | Const SPI_SETTOGGLEKEYS = 53
|
|---|
| 1008 | Const SPI_GETMOUSEKEYS = 54
|
|---|
| 1009 | Const SPI_SETMOUSEKEYS = 55
|
|---|
| 1010 | Const SPI_GETSHOWSOUNDS = 56
|
|---|
| 1011 | Const SPI_SETSHOWSOUNDS = 57
|
|---|
| 1012 | Const SPI_GETSTICKYKEYS = 58
|
|---|
| 1013 | Const SPI_SETSTICKYKEYS = 59
|
|---|
| 1014 | Const SPI_GETACCESSTIMEOUT = 60
|
|---|
| 1015 | Const SPI_SETACCESSTIMEOUT = 61
|
|---|
| 1016 | Const SPI_GETSERIALKEYS = 62
|
|---|
| 1017 | Const SPI_SETSERIALKEYS = 63
|
|---|
| 1018 | Const SPI_GETSOUNDSENTRY = 64
|
|---|
| 1019 | Const SPI_SETSOUNDSENTRY = 65
|
|---|
| 1020 | Const SPI_GETMOUSEHOVERWIDTH = 98
|
|---|
| 1021 | Const SPI_SETMOUSEHOVERWIDTH = 99
|
|---|
| 1022 | Const SPI_GETMOUSEHOVERHEIGHT = 100
|
|---|
| 1023 | Const SPI_SETMOUSEHOVERHEIGHT = 101
|
|---|
| 1024 | Const SPI_GETMOUSEHOVERTIME = 102
|
|---|
| 1025 | Const SPI_SETMOUSEHOVERTIME = 103
|
|---|
| 1026 | Const SPI_GETWHEELSCROLLLINES = 104
|
|---|
| 1027 | Const SPI_SETWHEELSCROLLLINES = 105
|
|---|
| 1028 | Const SPI_GETSHOWIMEUI = 110
|
|---|
| 1029 | Const SPI_SETSHOWIMEUI = 111
|
|---|
| 1030 | Const SPI_GETMOUSESPEED = 112
|
|---|
| 1031 | Const SPI_SETMOUSESPEED = 113
|
|---|
| 1032 | Const SPI_GETSCREENSAVERRUNNING = 114
|
|---|
| 1033 | Const SPI_GETACTIVEWINDOWTRACKING = &H1000 'Windows 2000 or later
|
|---|
| 1034 | Const SPI_SETACTIVEWINDOWTRACKING = &H1001
|
|---|
| 1035 | Const SPI_GETMENUANIMATION = &H1002
|
|---|
| 1036 | Const SPI_SETMENUANIMATION = &H1003
|
|---|
| 1037 | Const SPI_GETCOMBOBOXANIMATION = &H1004
|
|---|
| 1038 | Const SPI_SETCOMBOBOXANIMATION = &H1005
|
|---|
| 1039 | Const SPI_GETLISTBOXSMOOTHSCROLLING = &H1006
|
|---|
| 1040 | Const SPI_SETLISTBOXSMOOTHSCROLLING = &H1007
|
|---|
| 1041 | Const SPI_GETGRADIENTCAPTIONS = &H1008
|
|---|
| 1042 | Const SPI_SETGRADIENTCAPTIONS = &H1009
|
|---|
| 1043 | Const SPI_GETMENUUNDERLINES = &H100A
|
|---|
| 1044 | Const SPI_SETMENUUNDERLINES = &H100B
|
|---|
| 1045 | Const SPI_GETACTIVEWNDTRKZORDER = &H100C
|
|---|
| 1046 | Const SPI_SETACTIVEWNDTRKZORDER = &H100D
|
|---|
| 1047 | Const SPI_GETHOTTRACKING = &H100E
|
|---|
| 1048 | Const SPI_SETHOTTRACKING = &H100F
|
|---|
| 1049 | Const SPI_GETFOREGROUNDLOCKTIMEOUT = &H2000
|
|---|
| 1050 | Const SPI_SETFOREGROUNDLOCKTIMEOUT = &H2001
|
|---|
| 1051 | Const SPI_GETACTIVEWNDTRKTIMEOUT = &H2002
|
|---|
| 1052 | Const SPI_SETACTIVEWNDTRKTIMEOUT = &H2003
|
|---|
| 1053 | Const SPI_GETFOREGROUNDFLASHCOUNT = &H2004
|
|---|
| 1054 | Const SPI_SETFOREGROUNDFLASHCOUNT = &H2005
|
|---|
| 1055 | Const SPIF_UPDATEINIFILE = &H0001
|
|---|
| 1056 | Const SPIF_SENDWININICHANGE = &H0002
|
|---|
| 1057 | Const SPIF_SENDCHANGE = SPIF_SENDWININICHANGE
|
|---|
| 1058 | Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (uiAction As DWord, uiParam As DWord, pvParam As VoidPtr, fWinIni As DWord) As BOOL
|
|---|
| 1059 |
|
|---|
| 1060 | Const TME_HOVER = &H00000001
|
|---|
| 1061 | Const TME_LEAVE = &H00000002
|
|---|
| 1062 | Const TME_NONCLIENT = &H00000010
|
|---|
| 1063 | Const TME_QUERY = &H40000000
|
|---|
| 1064 | Const TME_CANCEL = &H80000000
|
|---|
| 1065 | Const HOVER_DEFAULT = &HFFFFFFFF
|
|---|
| 1066 | Type TRACKMOUSEEVENT
|
|---|
| 1067 | cbSize As DWord
|
|---|
| 1068 | dwFlags As DWord
|
|---|
| 1069 | hwndTrack As HWND
|
|---|
| 1070 | dwHoverTime As DWord
|
|---|
| 1071 | End Type
|
|---|
| 1072 | Declare Function TrackMouseEvent Lib "user32" (ByRef EventTrack As TRACKMOUSEEVENT) As BOOL
|
|---|
| 1073 |
|
|---|
| 1074 | Const TPM_LEFTBUTTON = &H0000
|
|---|
| 1075 | Const TPM_RIGHTBUTTON = &H0002
|
|---|
| 1076 | Const TPM_LEFTALIGN = &H0000
|
|---|
| 1077 | Const TPM_CENTERALIGN = &H0004
|
|---|
| 1078 | Const TPM_RIGHTALIGN = &H0008
|
|---|
| 1079 | Const TPM_TOPALIGN = &H0000
|
|---|
| 1080 | Const TPM_VCENTERALIGN = &H0010
|
|---|
| 1081 | Const TPM_BOTTOMALIGN = &H0020
|
|---|
| 1082 | Const TPM_HORIZONTAL = &H0000
|
|---|
| 1083 | Const TPM_VERTICAL = &H0040
|
|---|
| 1084 | Const TPM_NONOTIFY = &H0080
|
|---|
| 1085 | Const TPM_RETURNCMD = &H0100
|
|---|
| 1086 | Const TPM_RECURSE = &H0001
|
|---|
| 1087 | Declare 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
|
|---|
| 1088 |
|
|---|
| 1089 | Declare Function UnregisterClass Lib "user32" Alias "UnregisterClassA" (lpClassName As BytePtr, hInst As HINSTANCE) As BOOL
|
|---|
| 1090 | Declare Function UpdateWindow Lib "user32" (hWnd As HWND) As BOOL
|
|---|
| 1091 | Declare Function ValidateRect Lib "user32" (hWnd As HWND, ByRef lpRect As RECT) As BOOL
|
|---|
| 1092 | Declare Function ValidateRgn Lib "user32" (hWnd As HWND, hRgn As HRGN) As BOOL
|
|---|
| 1093 | Declare Function WaitForInputIdle Lib "user32" (hProcess As HANDLE, dwMilliseconds As DWord) As DWord
|
|---|
| 1094 |
|
|---|
| 1095 | Declare Function WaitMessage Lib "user32" () As BOOL
|
|---|
| 1096 | Declare Function WindowFromDC Lib "user32" (hDC As HDC) As HWND
|
|---|
| 1097 | Declare Function WindowFromPoint Lib "user32" (ptX As Long, ptY As Long) As HWND
|
|---|
| 1098 | Declare Function wsprintf cdecl Lib "user32" Alias "wsprintfA" (pText As PSTR, pFormat As PCSTR, ...) As Long
|
|---|
| 1099 | Declare Function wvsprintf Lib "user32" Alias "wvsprintfA" (pOutput As PSTR, pFormat As PCSTR, arglist As DWordPtr) As Long
|
|---|
| 1100 |
|
|---|
| 1101 |
|
|---|
| 1102 | #endif '_INC_WINDOW
|
|---|
