![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to winuser.inc CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [WindowsNT SDKs] / mstools / mstest / include|
Return to winuser.inc CVS log | Up to [WindowsNT SDKs] / mstools / mstest / include |
1.1 root 1: '******************************** WINUSER.INC *********************************
2: ' WINUSER.INC
3: '
4: ' SAMPLE Declarations for 32-bit USER functions callable from MS Test. This
5: ' does NOT represent all of the functions available in USER32.DLL that are
6: ' callable from an MS Test script. If you need to use a function in USER32
7: ' that is not declared in this file, simply add the declaration to this file.
8: '******************************************************************************
9: '$ifndef _WINUSER
10:
11: '$ifndef _WNAPIDEC
12: Type RECT
13: wleft As Integer
14: top As Integer
15: wright As Integer
16: bottom As Integer
17: End Type
18:
19: Type POINT
20: x As Integer
21: y As Integer
22: End Type
23:
24: Declare Function FindWindow Lib "User32" ALIAS "FindWindowA" (lpClassName As Any, lpWindowName As Any) As Integer
25: Declare Function GetActiveWindow Lib "User32" ALIAS "GetActiveWindow" () As Integer
26: Declare Sub GetClientRect Lib "User32" ALIAS "GetClientRect" (hWnd%, lpRect As RECT)
27: Declare Function GetDesktopWindow Lib "User32" ALIAS "GetDesktopWindow" () As Integer
28: Declare Function GetFocus Lib "User32" ALIAS "GetFocus" () As Integer
29: Declare Function GetForegroundWindow Lib "User32" ALIAS "GetForegroundWindow" () As Integer
30: Declare Function GetSystemMetrics Lib "User32" ALIAS "GetSystemMetrics" (nIndex%) As Integer
31: Declare Function GetWindowLong Lib "User32" ALIAS "GetWindowLongA" (hWnd%, nIndex%) As Long
32: Declare Sub GetWindowRect Lib "User32" ALIAS "GetWindowRect" (hWnd%, lpRect As RECT)
33: Declare Function GetWindowText Lib "User32" ALIAS "GetWindowTextA" (hWnd%, lpString$, nMaxCount%) As Integer
34: Declare Function IsZoomed Lib "User32" ALIAS "IsZoomed" (hWnd%) As Integer
35: Declare Function MessageBox Lib "User32" ALIAS "MessageBoxA" (hWndParent%, lpText$, lpCaption$, wType%) As Integer
36: Declare Function SendMessage Lib "User32" ALIAS "SendMessageA" (hWnd%, wMsg%, wParam%, lParam As Any) As Long
37: Declare Function SetActiveWindow Lib "User32" ALIAS "SetActiveWindow" (hWnd%) As Integer
38: Declare Function SetFocus Lib "User32" ALIAS "SetFocus" (hWnd%) As Integer
39: Declare Function SetForegroundWindow Lib "User32" ALIAS "SetForegroundWindow" (hWnd%) As Integer
40: Declare Function SetWindowPos Lib "User32" ALIAS "SetWindowPos" (h%, ha%, x%, y%, cx%, cy%, f%) As Integer
41: Declare Function ShowWindow Lib "User32" ALIAS "ShowWindow" (hWnd%, nCmdShow%) As Integer
42:
43: ' ShowWindow() Commands
44: Const SW_HIDE = 0
45: Const SW_SHOWNORMAL = 1
46: Const SW_NORMAL = 1
47: Const SW_SHOWMINIMIZED = 2
48: Const SW_SHOWMAXIMIZED = 3
49: Const SW_MAXIMIZE = 3
50: Const SW_SHOWNOACTIVATE = 4
51: Const SW_SHOW = 5
52: Const SW_MINIMIZE = 6
53: Const SW_SHOWMINNOACTIVE = 7
54: Const SW_SHOWNA = 8
55: Const SW_RESTORE = 9
56:
57: ' Window Styles
58: Const WS_MINIMIZE = &H20000000
59: Const WS_MAXIMIZE = &H1000000
60:
61:
62: ' Window field offsets for GetWindowLong()
63: Const GWL_WNDPROC = (-4)
64: Const GWL_STYLE = (-16)
65: Const GWL_EXSTYLE = (-20)
66:
67: '$endif ' _WNAPIDEC -- above decls are duped in WNAPIDEC.INC
68:
69: Const IDOK = 1
70: Const IDCANCEL = 2
71: Const IDABORT = 3
72: Const IDRETRY = 4
73: Const IDIGNORE = 5
74: Const IDYES = 6
75: Const IDNO = 7
76:
77: ' Scroll Bar Constants
78: Const SB_HORZ = 0
79: Const SB_VERT = 1
80: Const SB_CTL = 2
81: Const SB_BOTH = 3
82:
83: ' Scroll Bar Commands
84: Const SB_LINEUP = 0
85: Const SB_LINEDOWN = 1
86: Const SB_PAGEUP = 2
87: Const SB_PAGEDOWN = 3
88: Const SB_THUMBPOSITION = 4
89: Const SB_THUMBTRACK = 5
90: Const SB_TOP = 6
91: Const SB_BOTTOM = 7
92: Const SB_ENDSCROLL = 8
93:
94: ' Old ShowWindow() Commands
95: Const HIDE_WINDOW = 0
96: Const SHOW_OPENWINDOW = 1
97: Const SHOW_ICONWINDOW = 2
98: Const SHOW_FULLSCREEN = 3
99: Const SHOW_OPENNOACTIVATE = 4
100:
101: ' Identifiers for the WM_SHOWWINDOW message
102: Const SW_PARENTCLOSING = 1
103: Const SW_OTHERZOOM = 2
104: Const SW_PARENTOPENING = 3
105: Const SW_OTHERUNZOOM = 4
106:
107: ' Region Flags
108: Const ERRORAPI = 0
109: Const NULLREGION = 1
110: Const SIMPLEREGION = 2
111: Const COMPLEXREGION = 3
112:
113: ' CombineRgn() Styles
114: Const RGN_AND = 1
115: Const RGN_OR = 2
116: Const RGN_XOR = 3
117: Const RGN_DIFF = 4
118: Const RGN_COPY = 5
119:
120: ' Virtual Keys, Standard Set
121: ' Conditional check to avoid duplicate definition in MSTEST.INC
122: '$IFNDEF VK_WINAPI
123: '$DEFINE VK_WINAPI
124: Const VK_LBUTTON = &H1
125: Const VK_RBUTTON = &H2
126: Const VK_MBUTTON = &H4 ' NOT contiguous with L & RBUTTON
127: '$ENDIF
128: Const VK_CANCEL = &H3
129: Const VK_BACK = &H8
130: Const VK_TAB = &H9
131: Const VK_CLEAR = &HC
132: Const VK_RETURN = &HD
133: Const VK_SHIFT = &H10
134: Const VK_CONTROL = &H11
135: Const VK_MENU = &H12
136: Const VK_PAUSE = &H13
137: Const VK_CAPITAL = &H14
138: Const VK_ESCAPE = &H1B
139: Const VK_SPACE = &H20
140: Const VK_PRIOR = &H21
141: Const VK_NEXT = &H22
142: Const VK_END = &H23
143: Const VK_HOME = &H24
144: Const VK_LEFT = &H25
145: Const VK_UP = &H26
146: Const VK_RIGHT = &H27
147: Const VK_DOWN = &H28
148: Const VK_SELECT = &H29
149: Const VK_PRINT = &H2A
150: Const VK_EXECUTE = &H2B
151: Const VK_SNAPSHOT = &H2C
152: 'Const VK_COPY = &H2C not used by keyboards.
153: Const VK_INSERT = &H2D
154: Const VK_DELETE = &H2E
155: Const VK_HELP = &H2F
156:
157: ' VK_A thru VK_Z are the same as their ASCII equivalents: 'A' thru 'Z'
158: ' VK_0 thru VK_9 are the same as their ASCII equivalents: '0' thru '9'
159:
160: Const VK_NUMPAD0 = &H60
161: Const VK_NUMPAD1 = &H61
162: Const VK_NUMPAD2 = &H62
163: Const VK_NUMPAD3 = &H63
164: Const VK_NUMPAD4 = &H64
165: Const VK_NUMPAD5 = &H65
166: Const VK_NUMPAD6 = &H66
167: Const VK_NUMPAD7 = &H67
168: Const VK_NUMPAD8 = &H68
169: Const VK_NUMPAD9 = &H69
170: Const VK_MULTIPLY = &H6A
171: Const VK_ADD = &H6B
172: Const VK_SEPARATOR = &H6C
173: Const VK_SUBTRACT = &H6D
174: Const VK_DECIMAL = &H6E
175: Const VK_DIVIDE = &H6F
176: Const VK_F1 = &H70
177: Const VK_F2 = &H71
178: Const VK_F3 = &H72
179: Const VK_F4 = &H73
180: Const VK_F5 = &H74
181: Const VK_F6 = &H75
182: Const VK_F7 = &H76
183: Const VK_F8 = &H77
184: Const VK_F9 = &H78
185: Const VK_F10 = &H79
186: Const VK_F11 = &H7A
187: Const VK_F12 = &H7B
188: Const VK_F13 = &H7C
189: Const VK_F14 = &H7D
190: Const VK_F15 = &H7E
191: Const VK_F16 = &H7F
192:
193: Const VK_NUMLOCK = &H90
194:
195: ' SetWindowsHook() codes
196: Const WH_MSGFILTER = (-1)
197: Const WH_JOURNALRECORD = 0
198: Const WH_JOURNALPLAYBACK = 1
199: Const WH_KEYBOARD = 2
200: Const WH_GETMESSAGE = 3
201: Const WH_CALLWNDPROC = 4
202: Const WH_CBT = 5
203: Const WH_SYSMSGFILTER = 6
204: Const WH_WINDOWMGR = 7
205:
206: ' Hook Codes
207: Const HC_LPLPFNNEXT = (-2)
208: Const HC_LPFNNEXT = (-1)
209: Const HC_ACTION = 0
210: Const HC_GETNEXT = 1
211: Const HC_SKIP = 2
212: Const HC_NOREM = 3
213: Const HC_NOREMOVE = 3
214: Const HC_SYSMODALON = 4
215: Const HC_SYSMODALOFF = 5
216:
217: ' CBT Hook Codes
218: Const HCBT_MOVESIZE = 0
219: Const HCBT_MINMAX = 1
220: Const HCBT_QS = 2
221:
222: ' WH_MSGFILTER Filter Proc Codes
223: Const MSGF_DIALOGBOX = 0
224: Const MSGF_MESSAGEBOX = 1
225: Const MSGF_MENU = 2
226: Const MSGF_MOVE = 3
227: Const MSGF_SIZE = 4
228: Const MSGF_SCROLLBAR = 5
229: Const MSGF_NEXTWINDOW = 6
230:
231: ' Window Manager Hook Codes
232: Const WC_INIT = 1
233: Const WC_SWP = 2
234: Const WC_DEFWINDOWPROC = 3
235: Const WC_MINMAX = 4
236: Const WC_MOVE = 5
237: Const WC_SIZE = 6
238: Const WC_DRAWCAPTION = 7
239:
240: ' Message Structure used in Journaling
241: Type EVENTMSG
242: message As Integer
243: paramL As Integer
244: paramH As Integer
245: dwtime As Long 'time is a reserved word in MSTest
246: End Type
247:
248: ' Message structure
249: Type MSG
250: hwnd As Integer
251: message As Integer
252: wParam As Integer
253: lParam As Long
254: dwtime As Long 'time is a reserved word in MSTest
255: pt As POINT
256: End Type
257:
258:
259: ' Window field offsets for GetWindowWord()
260: Const GWW_HINSTANCE = (-6)
261: Const GWW_HWNDPARENT = (-8)
262: Const GWW_ID = (-12)
263:
264: ' Class field offsets for GetClassLong() and GetClassWord()
265: Const GCL_MENUNAME = (-8)
266: Const GCW_HBRBACKGROUND = (-10)
267: Const GCW_HCURSOR = (-12)
268: Const GCW_HICON = (-14)
269: Const GCW_HMODULE = (-16)
270: Const GCW_CBWNDEXTRA = (-18)
271: Const GCW_CBCLSEXTRA = (-20)
272: Const GCL_WNDPROC = (-24)
273: Const GCW_STYLE = (-26)
274:
275: ' Window Messages
276: Const WM_NULL = &H0
277: Const WM_CREATE = &H1
278: Const WM_DESTROY = &H2
279: Const WM_MOVE = &H3
280: Const WM_SIZE = &H5
281: Const WM_ACTIVATE = &H6
282: Const WM_SETFOCUS = &H7
283: Const WM_KILLFOCUS = &H8
284: Const WM_ENABLE = &HA
285: Const WM_SETREDRAW = &HB
286: Const WM_SETTEXT = &HC
287: Const WM_GETTEXT = &HD
288: Const WM_GETTEXTLENGTH = &HE
289: Const WM_PAINT = &HF
290: Const WM_CLOSE = &H10
291: Const WM_QUERYENDSESSION = &H11
292: Const WM_QUIT = &H12
293: Const WM_QUERYOPEN = &H13
294: Const WM_ERASEBKGND = &H14
295: Const WM_SYSCOLORCHANGE = &H15
296: Const WM_ENDSESSION = &H16
297: Const WM_SHOWWINDOW = &H18
298: Const WM_CTLCOLOR = &H19
299: Const WM_WININICHANGE = &H1A
300: Const WM_DEVMODECHANGE = &H1B
301: Const WM_ACTIVATEAPP = &H1C
302: Const WM_FONTCHANGE = &H1D
303: Const WM_TIMECHANGE = &H1E
304: Const WM_CANCELMODE = &H1F
305: Const WM_SETCURSOR = &H20
306: Const WM_MOUSEACTIVATE = &H21
307: Const WM_CHILDACTIVATE = &H22
308: Const WM_QUEUESYNC = &H23
309: Const WM_GETMINMAXINFO = &H24
310: Const WM_PAINTICON = &H26
311: Const WM_ICONERASEBKGND = &H27
312: Const WM_NEXTDLGCTL = &H28
313: Const WM_SPOOLERSTATUS = &H2A
314: Const WM_DRAWITEM = &H2B
315: Const WM_MEASUREITEM = &H2C
316: Const WM_DELETEITEM = &H2D
317: Const WM_VKEYTOITEM = &H2E
318: Const WM_CHARTOITEM = &H2F
319: Const WM_SETFONT = &H30
320: Const WM_GETFONT = &H31
321:
322: Const WM_QUERYDRAGICON = &H37
323:
324: Const WM_COMPAREITEM = &H39
325: Const WM_COMPACTING = &H41
326:
327: Const WM_NCCREATE = &H81
328: Const WM_NCDESTROY = &H82
329: Const WM_NCCALCSIZE = &H83
330: Const WM_NCHITTEST = &H84
331: Const WM_NCPAINT = &H85
332: Const WM_NCACTIVATE = &H86
333: Const WM_GETDLGCODE = &H87
334: Const WM_NCMOUSEMOVE = &HA0
335: Const WM_NCLBUTTONDOWN = &HA1
336: Const WM_NCLBUTTONUP = &HA2
337: Const WM_NCLBUTTONDBLCLK = &HA3
338: Const WM_NCRBUTTONDOWN = &HA4
339: Const WM_NCRBUTTONUP = &HA5
340: Const WM_NCRBUTTONDBLCLK = &HA6
341: Const WM_NCMBUTTONDOWN = &HA7
342: Const WM_NCMBUTTONUP = &HA8
343: Const WM_NCMBUTTONDBLCLK = &HA9
344:
345: Const WM_KEYFIRST = &H100
346: Const WM_KEYDOWN = &H100
347: Const WM_KEYUP = &H101
348: Const WM_CHAR = &H102
349: Const WM_DEADCHAR = &H103
350: Const WM_SYSKEYDOWN = &H104
351: Const WM_SYSKEYUP = &H105
352: Const WM_SYSCHAR = &H106
353: Const WM_SYSDEADCHAR = &H107
354: Const WM_KEYLAST = &H108
355:
356: Const WM_INITDIALOG = &H110
357: Const WM_COMMAND = &H111
358: Const WM_SYSCOMMAND = &H112
359: Const WM_TIMER = &H113
360: Const WM_HSCROLL = &H114
361: Const WM_VSCROLL = &H115
362: Const WM_INITMENU = &H116
363: Const WM_INITMENUPOPUP = &H117
364: Const WM_MENUSELECT = &H11F
365: Const WM_MENUCHAR = &H120
366: Const WM_ENTERIDLE = &H121
367:
368: Const WM_MOUSEFIRST = &H200
369: Const WM_MOUSEMOVE = &H200
370: Const WM_LBUTTONDOWN = &H201
371: Const WM_LBUTTONUP = &H202
372: Const WM_LBUTTONDBLCLK = &H203
373: Const WM_RBUTTONDOWN = &H204
374: Const WM_RBUTTONUP = &H205
375: Const WM_RBUTTONDBLCLK = &H206
376: Const WM_MBUTTONDOWN = &H207
377: Const WM_MBUTTONUP = &H208
378: Const WM_MBUTTONDBLCLK = &H209
379: Const WM_MOUSELAST = &H209
380:
381: Const WM_PARENTNOTIFY = &H210
382: Const WM_MDICREATE = &H220
383: Const WM_MDIDESTROY = &H221
384: Const WM_MDIACTIVATE = &H222
385: Const WM_MDIRESTORE = &H223
386: Const WM_MDINEXT = &H224
387: Const WM_MDIMAXIMIZE = &H225
388: Const WM_MDITILE = &H226
389: Const WM_MDICASCADE = &H227
390: Const WM_MDIICONARRANGE = &H228
391: Const WM_MDIGETACTIVE = &H229
392: Const WM_MDISETMENU = &H230
393:
394: Const WM_CUT = &H300
395: Const WM_COPY = &H301
396: Const WM_PASTE = &H302
397: Const WM_CLEAR = &H303
398: Const WM_UNDO = &H304
399: Const WM_RENDERFORMAT = &H305
400: Const WM_RENDERALLFORMATS = &H306
401: Const WM_DESTROYCLIPBOARD = &H307
402: Const WM_DRAWCLIPBOARD = &H308
403: Const WM_PAINTCLIPBOARD = &H309
404: Const WM_VSCROLLCLIPBOARD = &H30A
405: Const WM_SIZECLIPBOARD = &H30B
406: Const WM_ASKCBFORMATNAME = &H30C
407: Const WM_CHANGECBCHAIN = &H30D
408: Const WM_HSCROLLCLIPBOARD = &H30E
409: Const WM_QUERYNEWPALETTE = &H30F
410: Const WM_PALETTEISCHANGING = &H310
411: Const WM_PALETTECHANGED = &H311
412:
413: ' NOTE: All Message Numbers below 0x0400 are RESERVED.
414:
415: Const WM_USER = &H400
416:
417: ' WM_SYNCTASK Commands
418: Const ST_BEGINSWP = 0
419: Const ST_ENDSWP = 1
420:
421: ' WinWhere() Area Codes
422: Const HTERROR = (-2)
423: Const HTTRANSPARENT = (-1)
424: Const HTNOWHERE = 0
425: Const HTCLIENT = 1
426: Const HTCAPTION = 2
427: Const HTSYSMENU = 3
428: Const HTGROWBOX = 4
429: Const HTSIZE = HTGROWBOX
430: Const HTMENU = 5
431: Const HTHSCROLL = 6
432: Const HTVSCROLL = 7
433: Const HTREDUCE = 8
434: Const HTZOOM = 9
435: Const HTLEFT = 10
436: Const HTRIGHT = 11
437: Const HTTOP = 12
438: Const HTTOPLEFT = 13
439: Const HTTOPRIGHT = 14
440: Const HTBOTTOM = 15
441: Const HTBOTTOMLEFT = 16
442: Const HTBOTTOMRIGHT = 17
443: Const HTSIZEFIRST = HTLEFT
444: Const HTSIZELAST = HTBOTTOMRIGHT
445:
446: ' WM_MOUSEACTIVATE Return Codes
447: Const MA_ACTIVATE = 1
448: Const MA_ACTIVATEANDEAT = 2
449: Const MA_NOACTIVATE = 3
450:
451: ' Size Message Commands
452: Const SIZENORMAL = 0
453: Const SIZEICONIC = 1
454: Const SIZEFULLSCREEN = 2
455: Const SIZEZOOMSHOW = 3
456: Const SIZEZOOMHIDE = 4
457:
458: ' Key State Masks for Mouse Messages
459: Const MK_LBUTTON = &H1
460: Const MK_RBUTTON = &H2
461: Const MK_SHIFT = &H4
462: Const MK_CONTROL = &H8
463: Const MK_MBUTTON = &H10
464:
465: ' Window Styles
466: Const WS_OVERLAPPED = &H00000
467: Const WS_POPUP = &H80000000
468: Const WS_CHILD = &H40000000
469: Const WS_VISIBLE = &H10000000
470: Const WS_DISABLED = &H8000000
471: Const WS_CLIPSIBLINGS = &H4000000
472: Const WS_CLIPCHILDREN = &H2000000
473: Const WS_CAPTION = &HC00000 ' WS_BORDER Or WS_DLGFRAME
474: Const WS_BORDER = &H800000
475: Const WS_DLGFRAME = &H400000
476: Const WS_VSCROLL = &H200000
477: Const WS_HSCROLL = &H100000
478: Const WS_SYSMENU = &H80000
479: Const WS_THICKFRAME = &H40000
480: Const WS_GROUP = &H20000
481: Const WS_TABSTOP = &H10000
482:
483: Const WS_MINIMIZEBOX = &H20000
484: Const WS_MAXIMIZEBOX = &H10000
485:
486: Const WS_TILED = WS_OVERLAPPED
487: Const WS_ICONIC = WS_MINIMIZE
488: Const WS_SIZEBOX = WS_THICKFRAME
489:
490: ' Common Window Styles
491: Const WS_OVERLAPPEDWINDOW = (WS_OVERLAPPED Or WS_CAPTION Or WS_SYSMENU Or WS_THICKFRAME Or WS_MINIMIZEBOX Or WS_MAXIMIZEBOX)
492: Const WS_POPUPWINDOW = (WS_POPUP Or WS_BORDER Or WS_SYSMENU)
493: Const WS_CHILDWINDOW = (WS_CHILD)
494: Const WS_TILEDWINDOW = (WS_OVERLAPPEDWINDOW)
495:
496: ' Extended Window Styles
497: Const WS_EX_DLGMODALFRAME = &H00001
498: Const WS_EX_NOPARENTNOTIFY = &H00004
499:
500: ' Class styles
501: Const CS_VREDRAW = &H1
502: Const CS_HREDRAW = &H2
503: Const CS_KEYCVTWINDOW = &H4
504: Const CS_DBLCLKS = &H8
505: Const CS_OWNDC = &H20
506: Const CS_CLASSDC = &H40
507: Const CS_PARENTDC = &H80
508: Const CS_NOKEYCVT = &H100
509: Const CS_NOCLOSE = &H200
510: Const CS_SAVEBITS = &H800
511: Const CS_BYTEALIGNCLIENT = &H1000
512: Const CS_BYTEALIGNWINDOW = &H2000
513: Const CS_GLOBALCLASS = &H4000 ' Global window class
514:
515: ' Predefined Clipboard Formats
516: Const CF_TEXT = 1
517: Const CF_BITMAP = 2
518: Const CF_METAFILEPICT = 3
519: Const CF_SYLK = 4
520: Const CF_DIF = 5
521: Const CF_TIFF = 6
522: Const CF_OEMTEXT = 7
523: Const CF_DIB = 8
524: Const CF_PALETTE = 9
525:
526: Const CF_OWNERDISPLAY = &H80
527: Const CF_DSPTEXT = &H81
528: Const CF_DSPBITMAP = &H82
529: Const CF_DSPMETAFILEPICT = &H83
530:
531: ' "Private" formats don't get GlobalFree()'d
532: Const CF_PRIVATEFIRST = &H200
533: Const CF_PRIVATELAST = &H2FF
534:
535: ' "GDIOBJ" formats do get DeleteObject()'d
536: Const CF_GDIOBJFIRST = &H300
537: Const CF_GDIOBJLAST = &H3FF
538:
539: Type PAINTSTRUCT
540: hdc As Integer
541: fErase As Integer
542: rcPaint As RECT
543: fRestore As Integer
544: fIncUpdate As Integer
545: rgbReserved As String * 16
546: End Type
547:
548: Type CREATESTRUCT
549: lpCreateParams As Long
550: hInstance As Integer
551: hMenu As Integer
552: hwndParent As Integer
553: cy As Integer
554: cx As Integer
555: y As Integer
556: x As Integer
557: style As Long
558: lpszName As Long 'lpsz Actually LPSTR -
559: lpszClass As Long 'change to POINTER TO STRING * n or use lstrcpy
560: ExStyle As Long
561: End Type
562:
563: ' Owner draw control types
564: Const ODT_MENU = 1
565: Const ODT_LISTBOX = 2
566: Const ODT_COMBOBOX = 3
567: Const ODT_BUTTON = 4
568:
569: ' Owner draw actions
570: Const ODA_DRAWENTIRE = &H1
571: Const ODA_SELECT = &H2
572: Const ODA_FOCUS = &H4
573:
574: ' Owner draw state
575: Const ODS_SELECTED = &H1
576: Const ODS_GRAYED = &H2
577: Const ODS_DISABLED = &H4
578: Const ODS_CHECKED = &H8
579: Const ODS_FOCUS = &H10
580:
581: ' MEASUREITEMSTRUCT for ownerdraw
582: Type MEASUREITEMSTRUCT
583: CtlType As Integer
584: CtlID As Integer
585: itemID As Integer
586: itemWidth As Integer
587: itemHeight As Integer
588: itemData As Long
589: End Type
590:
591: ' DRAWITEMSTRUCT for ownerdraw
592: Type DRAWITEMSTRUCT
593: CtlType As Integer
594: CtlID As Integer
595: itemID As Integer
596: itemAction As Integer
597: itemState As Integer
598: hwndItem As Integer
599: hDC As Integer
600: rcItem As RECT
601: itemData As Long
602: End Type
603:
604: ' DELETEITEMSTRUCT for ownerdraw
605: Type DELETEITEMSTRUCT
606: CtlType As Integer
607: CtlID As Integer
608: itemID As Integer
609: hwndItem As Integer
610: itemData As Long
611: End Type
612:
613: ' COMPAREITEMSTRUCT for ownerdraw sorting
614: Type COMPAREITEMSTRUCT
615: CtlType As Integer
616: CtlID As Integer
617: hwndItem As Integer
618: itemID1 As Integer
619: itemData1 As Long
620: itemID2 As Integer
621: itemData2 As Long
622: End Type
623:
624: ' PeekMessage() Options
625: Const PM_NOREMOVE = &H0
626: Const PM_REMOVE = &H1
627: Const PM_NOYIELD = &H2
628:
629: Const READAPI = 0 ' Flags for _lopen
630: Const WRITEAPI = 1
631: Const READ_WRITE = 2
632:
633: Const CW_USEDEFAULT = &H8000
634:
635: ' SetWindowPos Flags
636: Const SWP_NOSIZE = &H1
637: Const SWP_NOMOVE = &H2
638: Const SWP_NOZORDER = &H4
639: Const SWP_NOREDRAW = &H8
640: Const SWP_NOACTIVATE = &H10
641: Const SWP_DRAWFRAME = &H20
642: Const SWP_SHOWWINDOW = &H40
643: Const SWP_HIDEWINDOW = &H80
644: Const SWP_NOCOPYBITS = &H100
645: Const SWP_NOREPOSITION = &H200
646:
647: Const DLGWINDOWEXTRA = 30 ' Window extra bytes needed for private dialog classes
648:
649: ' GetSystemMetrics() codes
650: Const SM_CXSCREEN = 0
651: Const SM_CYSCREEN = 1
652: Const SM_CXVSCROLL = 2
653: Const SM_CYHSCROLL = 3
654: Const SM_CYCAPTION = 4
655: Const SM_CXBORDER = 5
656: Const SM_CYBORDER = 6
657: Const SM_CXDLGFRAME = 7
658: Const SM_CYDLGFRAME = 8
659: Const SM_CYVTHUMB = 9
660: Const SM_CXHTHUMB = 10
661: Const SM_CXICON = 11
662: Const SM_CYICON = 12
663: Const SM_CXCURSOR = 13
664: Const SM_CYCURSOR = 14
665: Const SM_CYMENU = 15
666: Const SM_CXFULLSCREEN = 16
667: Const SM_CYFULLSCREEN = 17
668: Const SM_CYKANJIWINDOW = 18
669: Const SM_MOUSEPRESENT = 19
670: Const SM_CYVSCROLL = 20
671: Const SM_CXHSCROLL = 21
672: Const SM_DEBUG = 22
673: Const SM_SWAPBUTTON = 23
674: Const SM_RESERVED1 = 24
675: Const SM_RESERVED2 = 25
676: Const SM_RESERVED3 = 26
677: Const SM_RESERVED4 = 27
678: Const SM_CXMIN = 28
679: Const SM_CYMIN = 29
680: Const SM_CXSIZE = 30
681: Const SM_CYSIZE = 31
682: Const SM_CXFRAME = 32
683: Const SM_CYFRAME = 33
684: Const SM_CXMINTRACK = 34
685: Const SM_CYMINTRACK = 35
686: Const SM_CMETRICS = 36
687: Const SM_CYICONSPACING = 39
688:
689:
690: ' MessageBox() Flags
691: Const MB_OK = &H0
692: Const MB_OKCANCEL = &H1
693: Const MB_ABORTRETRYIGNORE = &H2
694: Const MB_YESNOCANCEL = &H3
695: Const MB_YESNO = &H4
696: Const MB_RETRYCANCEL = &H5
697:
698: Const MB_ICONHAND = &H10
699: Const MB_ICONQUESTION = &H20
700: Const MB_ICONEXCLAMATION = &H30
701: Const MB_ICONASTERISK = &H40
702:
703: Const MB_ICONINFORMATION = MB_ICONASTERISK
704: Const MB_ICONSTOP = MB_ICONHAND
705:
706: Const MB_DEFBUTTON1 = &H0
707: Const MB_DEFBUTTON2 = &H100
708: Const MB_DEFBUTTON3 = &H200
709:
710: Const MB_APPLMODAL = &H0
711: Const MB_SYSTEMMODAL = &H1000
712: Const MB_TASKMODAL = &H2000
713:
714: Const MB_NOFOCUS = &H8000
715:
716: Const MB_TYPEMASK = &HF
717: Const MB_ICONMASK = &HF0
718: Const MB_DEFMASK = &HF00
719: Const MB_MODEMASK = &H3000
720: Const MB_MISCMASK = &HC000
721:
722: '$define _WINUSER
723: '$endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.