]> gitweb.factorcode.org Git - factor.git/blob - basis/windows/user32/user32.factor
Merge branch 'master' of git://github.com/slavapestov/factor into techniques
[factor.git] / basis / windows / user32 / user32.factor
1 ! Copyright (C) 2005, 2006 Doug Coleman.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: alien alien.c-types alien.syntax parser namespaces
4 kernel math windows.types generalizations math.bitwise
5 classes.struct literals windows.kernel32 system accessors ;
6 IN: windows.user32
7
8 ! HKL for ActivateKeyboardLayout
9 CONSTANT: HKL_PREV 0
10 CONSTANT: HKL_NEXT 1
11
12 CONSTANT: CW_USEDEFAULT HEX: 80000000
13
14 CONSTANT: WS_OVERLAPPED       HEX: 00000000
15 CONSTANT: WS_POPUP            HEX: 80000000
16 CONSTANT: WS_CHILD            HEX: 40000000
17 CONSTANT: WS_MINIMIZE         HEX: 20000000
18 CONSTANT: WS_VISIBLE          HEX: 10000000
19 CONSTANT: WS_DISABLED         HEX: 08000000
20 CONSTANT: WS_CLIPSIBLINGS     HEX: 04000000
21 CONSTANT: WS_CLIPCHILDREN     HEX: 02000000
22 CONSTANT: WS_MAXIMIZE         HEX: 01000000
23 CONSTANT: WS_CAPTION          HEX: 00C00000
24 CONSTANT: WS_BORDER           HEX: 00800000
25 CONSTANT: WS_DLGFRAME         HEX: 00400000
26 CONSTANT: WS_VSCROLL          HEX: 00200000
27 CONSTANT: WS_HSCROLL          HEX: 00100000
28 CONSTANT: WS_SYSMENU          HEX: 00080000
29 CONSTANT: WS_THICKFRAME       HEX: 00040000
30 CONSTANT: WS_GROUP            HEX: 00020000
31 CONSTANT: WS_TABSTOP          HEX: 00010000
32 CONSTANT: WS_MINIMIZEBOX      HEX: 00020000
33 CONSTANT: WS_MAXIMIZEBOX      HEX: 00010000
34
35 ! Common window styles
36 CONSTANT: WS_OVERLAPPEDWINDOW
37     flags{
38         WS_OVERLAPPED
39         WS_CAPTION
40         WS_SYSMENU
41         WS_THICKFRAME
42         WS_MINIMIZEBOX
43         WS_MAXIMIZEBOX
44     }
45
46 CONSTANT: WS_POPUPWINDOW flags{ WS_POPUP WS_BORDER WS_SYSMENU }
47
48 ALIAS: WS_CHILDWINDOW      WS_CHILD
49
50 ALIAS: WS_TILED            WS_OVERLAPPED
51 ALIAS: WS_ICONIC           WS_MINIMIZE
52 ALIAS: WS_SIZEBOX          WS_THICKFRAME
53 ALIAS: WS_TILEDWINDOW WS_OVERLAPPEDWINDOW
54
55 ! Extended window styles
56
57 CONSTANT: WS_EX_DLGMODALFRAME     HEX: 00000001
58 CONSTANT: WS_EX_NOPARENTNOTIFY    HEX: 00000004
59 CONSTANT: WS_EX_TOPMOST           HEX: 00000008
60 CONSTANT: WS_EX_ACCEPTFILES       HEX: 00000010
61 CONSTANT: WS_EX_TRANSPARENT       HEX: 00000020
62 CONSTANT: WS_EX_MDICHILD          HEX: 00000040
63 CONSTANT: WS_EX_TOOLWINDOW        HEX: 00000080
64 CONSTANT: WS_EX_WINDOWEDGE        HEX: 00000100
65 CONSTANT: WS_EX_CLIENTEDGE        HEX: 00000200
66 CONSTANT: WS_EX_CONTEXTHELP       HEX: 00000400
67
68 CONSTANT: WS_EX_RIGHT             HEX: 00001000
69 CONSTANT: WS_EX_LEFT              HEX: 00000000
70 CONSTANT: WS_EX_RTLREADING        HEX: 00002000
71 CONSTANT: WS_EX_LTRREADING        HEX: 00000000
72 CONSTANT: WS_EX_LEFTSCROLLBAR     HEX: 00004000
73 CONSTANT: WS_EX_RIGHTSCROLLBAR    HEX: 00000000
74 CONSTANT: WS_EX_CONTROLPARENT     HEX: 00010000
75 CONSTANT: WS_EX_STATICEDGE        HEX: 00020000
76 CONSTANT: WS_EX_APPWINDOW         HEX: 00040000
77
78 CONSTANT: WS_EX_OVERLAPPEDWINDOW
79     flags{ WS_EX_WINDOWEDGE WS_EX_CLIENTEDGE }
80
81 CONSTANT: WS_EX_PALETTEWINDOW 
82     flags{ WS_EX_WINDOWEDGE WS_EX_TOOLWINDOW WS_EX_TOPMOST }
83
84 CONSTANT: CS_VREDRAW          HEX: 0001
85 CONSTANT: CS_HREDRAW          HEX: 0002
86 CONSTANT: CS_DBLCLKS          HEX: 0008
87 CONSTANT: CS_OWNDC            HEX: 0020
88 CONSTANT: CS_CLASSDC          HEX: 0040
89 CONSTANT: CS_PARENTDC         HEX: 0080
90 CONSTANT: CS_NOCLOSE          HEX: 0200
91 CONSTANT: CS_SAVEBITS         HEX: 0800
92 CONSTANT: CS_BYTEALIGNCLIENT  HEX: 1000
93 CONSTANT: CS_BYTEALIGNWINDOW  HEX: 2000
94 CONSTANT: CS_GLOBALCLASS      HEX: 4000
95
96 CONSTANT: COLOR_SCROLLBAR         0
97 CONSTANT: COLOR_BACKGROUND        1
98 CONSTANT: COLOR_ACTIVECAPTION     2
99 CONSTANT: COLOR_INACTIVECAPTION   3
100 CONSTANT: COLOR_MENU              4
101 CONSTANT: COLOR_WINDOW            5
102 CONSTANT: COLOR_WINDOWFRAME       6
103 CONSTANT: COLOR_MENUTEXT          7
104 CONSTANT: COLOR_WINDOWTEXT        8
105 CONSTANT: COLOR_CAPTIONTEXT       9
106 CONSTANT: COLOR_ACTIVEBORDER      10
107 CONSTANT: COLOR_INACTIVEBORDER    11
108 CONSTANT: COLOR_APPWORKSPACE      12
109 CONSTANT: COLOR_HIGHLIGHT         13
110 CONSTANT: COLOR_HIGHLIGHTTEXT     14
111 CONSTANT: COLOR_BTNFACE           15
112 CONSTANT: COLOR_BTNSHADOW         16
113 CONSTANT: COLOR_GRAYTEXT          17
114 CONSTANT: COLOR_BTNTEXT           18
115 CONSTANT: COLOR_INACTIVECAPTIONTEXT 19
116 CONSTANT: COLOR_BTNHIGHLIGHT      20
117
118 CONSTANT: IDI_APPLICATION     32512
119 CONSTANT: IDI_HAND            32513
120 CONSTANT: IDI_QUESTION        32514
121 CONSTANT: IDI_EXCLAMATION     32515
122 CONSTANT: IDI_ASTERISK        32516
123 CONSTANT: IDI_WINLOGO         32517
124
125 ! ShowWindow() Commands
126 CONSTANT: SW_HIDE             0
127 CONSTANT: SW_SHOWNORMAL       1
128 CONSTANT: SW_NORMAL           1
129 CONSTANT: SW_SHOWMINIMIZED    2
130 CONSTANT: SW_SHOWMAXIMIZED    3
131 CONSTANT: SW_MAXIMIZE         3
132 CONSTANT: SW_SHOWNOACTIVATE   4
133 CONSTANT: SW_SHOW             5
134 CONSTANT: SW_MINIMIZE         6
135 CONSTANT: SW_SHOWMINNOACTIVE  7
136 CONSTANT: SW_SHOWNA           8
137 CONSTANT: SW_RESTORE          9
138 CONSTANT: SW_SHOWDEFAULT      10
139 CONSTANT: SW_FORCEMINIMIZE    11
140 CONSTANT: SW_MAX              11
141
142 ! PeekMessage
143 CONSTANT: PM_NOREMOVE   0
144 CONSTANT: PM_REMOVE     1
145 CONSTANT: PM_NOYIELD    2
146 ! : PM_QS_INPUT         (QS_INPUT << 16) ;
147 ! : PM_QS_POSTMESSAGE   ((QS_POSTMESSAGE | QS_HOTKEY | QS_TIMER) << 16) ;
148 ! : PM_QS_PAINT         (QS_PAINT << 16) ;
149 ! : PM_QS_SENDMESSAGE   (QS_SENDMESSAGE << 16) ;
150
151
152
153 ! Standard Cursor IDs
154 !
155 CONSTANT: IDC_ARROW           32512
156 CONSTANT: IDC_IBEAM           32513
157 CONSTANT: IDC_WAIT            32514
158 CONSTANT: IDC_CROSS           32515
159 CONSTANT: IDC_UPARROW         32516
160 CONSTANT: IDC_SIZE            32640 ! OBSOLETE: use IDC_SIZEALL
161 CONSTANT: IDC_ICON            32641 ! OBSOLETE: use IDC_ARROW
162 CONSTANT: IDC_SIZENWSE        32642
163 CONSTANT: IDC_SIZENESW        32643
164 CONSTANT: IDC_SIZEWE          32644
165 CONSTANT: IDC_SIZENS          32645
166 CONSTANT: IDC_SIZEALL         32646
167 CONSTANT: IDC_NO              32648 ! not in win3.1
168 CONSTANT: IDC_HAND            32649
169 CONSTANT: IDC_APPSTARTING     32650 ! not in win3.1
170 CONSTANT: IDC_HELP            32651
171
172 ! Predefined Clipboard Formats
173 CONSTANT: CF_TEXT             1
174 CONSTANT: CF_BITMAP           2
175 CONSTANT: CF_METAFILEPICT     3
176 CONSTANT: CF_SYLK             4
177 CONSTANT: CF_DIF              5
178 CONSTANT: CF_TIFF             6
179 CONSTANT: CF_OEMTEXT          7
180 CONSTANT: CF_DIB              8
181 CONSTANT: CF_PALETTE          9
182 CONSTANT: CF_PENDATA          10
183 CONSTANT: CF_RIFF             11
184 CONSTANT: CF_WAVE             12
185 CONSTANT: CF_UNICODETEXT      13
186 CONSTANT: CF_ENHMETAFILE      14
187 CONSTANT: CF_HDROP            15
188 CONSTANT: CF_LOCALE           16
189 CONSTANT: CF_DIBV5            17
190 CONSTANT: CF_MAX              18
191
192 CONSTANT: CF_OWNERDISPLAY HEX: 0080
193 CONSTANT: CF_DSPTEXT HEX: 0081
194 CONSTANT: CF_DSPBITMAP HEX: 0082
195 CONSTANT: CF_DSPMETAFILEPICT HEX: 0083
196 CONSTANT: CF_DSPENHMETAFILE HEX: 008E
197
198 ! "Private" formats don't get GlobalFree()'d
199 CONSTANT: CF_PRIVATEFIRST HEX: 200
200 CONSTANT: CF_PRIVATELAST HEX: 2FF
201
202 ! "GDIOBJ" formats do get DeleteObject()'d
203 CONSTANT: CF_GDIOBJFIRST HEX: 300
204 CONSTANT: CF_GDIOBJLAST HEX: 3FF
205
206 ! Virtual Keys, Standard Set
207 CONSTANT: VK_LBUTTON        HEX: 01
208 CONSTANT: VK_RBUTTON        HEX: 02
209 CONSTANT: VK_CANCEL         HEX: 03
210 CONSTANT: VK_MBUTTON        HEX: 04  ! NOT contiguous with L & RBUTTON
211 CONSTANT: VK_XBUTTON1       HEX: 05  ! NOT contiguous with L & RBUTTON
212 CONSTANT: VK_XBUTTON2       HEX: 06  ! NOT contiguous with L & RBUTTON
213 ! 0x07 : unassigned
214 CONSTANT: VK_BACK           HEX: 08
215 CONSTANT: VK_TAB            HEX: 09
216 ! 0x0A - 0x0B : reserved
217
218 CONSTANT: VK_CLEAR          HEX: 0C
219 CONSTANT: VK_RETURN         HEX: 0D
220
221 CONSTANT: VK_SHIFT          HEX: 10
222 CONSTANT: VK_CONTROL        HEX: 11
223 CONSTANT: VK_MENU           HEX: 12
224 CONSTANT: VK_PAUSE          HEX: 13
225 CONSTANT: VK_CAPITAL        HEX: 14
226
227 CONSTANT: VK_KANA           HEX: 15
228 CONSTANT: VK_HANGEUL        HEX: 15 ! old name - here for compatibility
229 CONSTANT: VK_HANGUL         HEX: 15
230 CONSTANT: VK_JUNJA          HEX: 17
231 CONSTANT: VK_FINAL          HEX: 18
232 CONSTANT: VK_HANJA          HEX: 19
233 CONSTANT: VK_KANJI          HEX: 19
234
235 CONSTANT: VK_ESCAPE         HEX: 1B
236
237 CONSTANT: VK_CONVERT        HEX: 1C
238 CONSTANT: VK_NONCONVERT     HEX: 1D
239 CONSTANT: VK_ACCEPT         HEX: 1E
240 CONSTANT: VK_MODECHANGE     HEX: 1F
241
242 CONSTANT: VK_SPACE          HEX: 20
243 CONSTANT: VK_PRIOR          HEX: 21
244 CONSTANT: VK_NEXT           HEX: 22
245 CONSTANT: VK_END            HEX: 23
246 CONSTANT: VK_HOME           HEX: 24
247 CONSTANT: VK_LEFT           HEX: 25
248 CONSTANT: VK_UP             HEX: 26
249 CONSTANT: VK_RIGHT          HEX: 27
250 CONSTANT: VK_DOWN           HEX: 28
251 CONSTANT: VK_SELECT         HEX: 29
252 CONSTANT: VK_PRINT          HEX: 2A
253 CONSTANT: VK_EXECUTE        HEX: 2B
254 CONSTANT: VK_SNAPSHOT       HEX: 2C
255 CONSTANT: VK_INSERT         HEX: 2D
256 CONSTANT: VK_DELETE         HEX: 2E
257 CONSTANT: VK_HELP           HEX: 2F
258
259 CONSTANT: VK_0 CHAR: 0
260 CONSTANT: VK_1 CHAR: 1
261 CONSTANT: VK_2 CHAR: 2
262 CONSTANT: VK_3 CHAR: 3
263 CONSTANT: VK_4 CHAR: 4
264 CONSTANT: VK_5 CHAR: 5
265 CONSTANT: VK_6 CHAR: 6
266 CONSTANT: VK_7 CHAR: 7
267 CONSTANT: VK_8 CHAR: 8
268 CONSTANT: VK_9 CHAR: 9
269
270 CONSTANT: VK_A CHAR: A
271 CONSTANT: VK_B CHAR: B
272 CONSTANT: VK_C CHAR: C
273 CONSTANT: VK_D CHAR: D
274 CONSTANT: VK_E CHAR: E
275 CONSTANT: VK_F CHAR: F
276 CONSTANT: VK_G CHAR: G
277 CONSTANT: VK_H CHAR: H
278 CONSTANT: VK_I CHAR: I
279 CONSTANT: VK_J CHAR: J
280 CONSTANT: VK_K CHAR: K
281 CONSTANT: VK_L CHAR: L
282 CONSTANT: VK_M CHAR: M
283 CONSTANT: VK_N CHAR: N
284 CONSTANT: VK_O CHAR: O
285 CONSTANT: VK_P CHAR: P
286 CONSTANT: VK_Q CHAR: Q
287 CONSTANT: VK_R CHAR: R
288 CONSTANT: VK_S CHAR: S
289 CONSTANT: VK_T CHAR: T
290 CONSTANT: VK_U CHAR: U
291 CONSTANT: VK_V CHAR: V
292 CONSTANT: VK_W CHAR: W
293 CONSTANT: VK_X CHAR: X
294 CONSTANT: VK_Y CHAR: Y
295 CONSTANT: VK_Z CHAR: Z
296
297 CONSTANT: VK_LWIN           HEX: 5B
298 CONSTANT: VK_RWIN           HEX: 5C
299 CONSTANT: VK_APPS           HEX: 5D
300
301 ! 0x5E : reserved
302
303 CONSTANT: VK_SLEEP          HEX: 5F
304
305 CONSTANT: VK_NUMPAD0        HEX: 60
306 CONSTANT: VK_NUMPAD1        HEX: 61
307 CONSTANT: VK_NUMPAD2        HEX: 62
308 CONSTANT: VK_NUMPAD3        HEX: 63
309 CONSTANT: VK_NUMPAD4        HEX: 64
310 CONSTANT: VK_NUMPAD5        HEX: 65
311 CONSTANT: VK_NUMPAD6        HEX: 66
312 CONSTANT: VK_NUMPAD7        HEX: 67
313 CONSTANT: VK_NUMPAD8        HEX: 68
314 CONSTANT: VK_NUMPAD9        HEX: 69
315 CONSTANT: VK_MULTIPLY       HEX: 6A
316 CONSTANT: VK_ADD            HEX: 6B
317 CONSTANT: VK_SEPARATOR      HEX: 6C
318 CONSTANT: VK_SUBTRACT       HEX: 6D
319 CONSTANT: VK_DECIMAL        HEX: 6E
320 CONSTANT: VK_DIVIDE         HEX: 6F
321 CONSTANT: VK_F1             HEX: 70
322 CONSTANT: VK_F2             HEX: 71
323 CONSTANT: VK_F3             HEX: 72
324 CONSTANT: VK_F4             HEX: 73
325 CONSTANT: VK_F5             HEX: 74
326 CONSTANT: VK_F6             HEX: 75
327 CONSTANT: VK_F7             HEX: 76
328 CONSTANT: VK_F8             HEX: 77
329 CONSTANT: VK_F9             HEX: 78
330 CONSTANT: VK_F10            HEX: 79
331 CONSTANT: VK_F11            HEX: 7A
332 CONSTANT: VK_F12            HEX: 7B
333 CONSTANT: VK_F13            HEX: 7C
334 CONSTANT: VK_F14            HEX: 7D
335 CONSTANT: VK_F15            HEX: 7E
336 CONSTANT: VK_F16            HEX: 7F
337 CONSTANT: VK_F17            HEX: 80
338 CONSTANT: VK_F18            HEX: 81
339 CONSTANT: VK_F19            HEX: 82
340 CONSTANT: VK_F20            HEX: 83
341 CONSTANT: VK_F21            HEX: 84
342 CONSTANT: VK_F22            HEX: 85
343 CONSTANT: VK_F23            HEX: 86
344 CONSTANT: VK_F24            HEX: 87
345
346 ! 0x88 - 0x8F : unassigned
347
348 CONSTANT: VK_NUMLOCK        HEX: 90
349 CONSTANT: VK_SCROLL         HEX: 91
350
351 ! NEC PC-9800 kbd definitions
352 CONSTANT: VK_OEM_NEC_EQUAL  HEX: 92  ! '=' key on numpad
353
354 ! Fujitsu/OASYS kbd definitions
355 CONSTANT: VK_OEM_FJ_JISHO   HEX: 92  ! 'Dictionary' key
356 CONSTANT: VK_OEM_FJ_MASSHOU HEX: 93  ! 'Unregister word' key
357 CONSTANT: VK_OEM_FJ_TOUROKU HEX: 94  ! 'Register word' key
358 CONSTANT: VK_OEM_FJ_LOYA    HEX: 95  ! 'Left OYAYUBI' key
359 CONSTANT: VK_OEM_FJ_ROYA    HEX: 96  ! 'Right OYAYUBI' key
360
361 ! 0x97 - 0x9F : unassigned
362
363 ! VK_L* & VK_R* - left and right Alt, Ctrl and Shift virtual keys.
364 ! Used only as parameters to GetAsyncKeyState() and GetKeyState().
365 ! No other API or message will distinguish left and right keys in this way.
366 CONSTANT: VK_LSHIFT         HEX: A0
367 CONSTANT: VK_RSHIFT         HEX: A1
368 CONSTANT: VK_LCONTROL       HEX: A2
369 CONSTANT: VK_RCONTROL       HEX: A3
370 CONSTANT: VK_LMENU          HEX: A4
371 CONSTANT: VK_RMENU          HEX: A5
372
373 CONSTANT: VK_BROWSER_BACK        HEX: A6
374 CONSTANT: VK_BROWSER_FORWARD     HEX: A7
375 CONSTANT: VK_BROWSER_REFRESH     HEX: A8
376 CONSTANT: VK_BROWSER_STOP        HEX: A9
377 CONSTANT: VK_BROWSER_SEARCH      HEX: AA
378 CONSTANT: VK_BROWSER_FAVORITES   HEX: AB
379 CONSTANT: VK_BROWSER_HOME        HEX: AC
380
381 CONSTANT: VK_VOLUME_MUTE         HEX: AD
382 CONSTANT: VK_VOLUME_DOWN         HEX: AE
383 CONSTANT: VK_VOLUME_UP           HEX: AF
384 CONSTANT: VK_MEDIA_NEXT_TRACK    HEX: B0
385 CONSTANT: VK_MEDIA_PREV_TRACK    HEX: B1
386 CONSTANT: VK_MEDIA_STOP          HEX: B2
387 CONSTANT: VK_MEDIA_PLAY_PAUSE    HEX: B3
388 CONSTANT: VK_LAUNCH_MAIL         HEX: B4
389 CONSTANT: VK_LAUNCH_MEDIA_SELECT HEX: B5
390 CONSTANT: VK_LAUNCH_APP1         HEX: B6
391 CONSTANT: VK_LAUNCH_APP2         HEX: B7
392
393 ! 0xB8 - 0xB9 : reserved
394
395 CONSTANT: VK_OEM_1          HEX: BA  ! ';:' for US
396 CONSTANT: VK_OEM_PLUS       HEX: BB  ! '+' any country
397 CONSTANT: VK_OEM_COMMA      HEX: BC  ! ',' any country
398 CONSTANT: VK_OEM_MINUS      HEX: BD  ! '-' any country
399 CONSTANT: VK_OEM_PERIOD     HEX: BE  ! '.' any country
400 CONSTANT: VK_OEM_2          HEX: BF  ! '/?' for US
401 CONSTANT: VK_OEM_3          HEX: C0  ! '`~' for US
402
403 ! 0xC1 - 0xD7 : reserved
404
405 ! 0xD8 - 0xDA : unassigned
406
407 CONSTANT: VK_OEM_4          HEX: DB !  '[{' for US
408 CONSTANT: VK_OEM_5          HEX: DC !  '\|' for US
409 CONSTANT: VK_OEM_6          HEX: DD !  ']}' for US
410 CONSTANT: VK_OEM_7          HEX: DE !  ''"' for US
411 CONSTANT: VK_OEM_8          HEX: DF
412
413 ! 0xE0 : reserved
414
415 ! Various extended or enhanced keyboards
416 CONSTANT: VK_OEM_AX         HEX: E1 !  'AX' key on Japanese AX kbd
417 CONSTANT: VK_OEM_102        HEX: E2 !  "<>" or "\|" on RT 102-key kbd.
418 CONSTANT: VK_ICO_HELP       HEX: E3 !  Help key on ICO
419 CONSTANT: VK_ICO_00         HEX: E4 !  00 key on ICO
420
421 CONSTANT: VK_PROCESSKEY     HEX: E5
422
423 CONSTANT: VK_ICO_CLEAR      HEX: E6
424
425 CONSTANT: VK_PACKET         HEX: E7
426
427 ! 0xE8 : unassigned
428
429 ! Nokia/Ericsson definitions
430 CONSTANT: VK_OEM_RESET      HEX: E9
431 CONSTANT: VK_OEM_JUMP       HEX: EA
432 CONSTANT: VK_OEM_PA1        HEX: EB
433 CONSTANT: VK_OEM_PA2        HEX: EC
434 CONSTANT: VK_OEM_PA3        HEX: ED
435 CONSTANT: VK_OEM_WSCTRL     HEX: EE
436 CONSTANT: VK_OEM_CUSEL      HEX: EF
437 CONSTANT: VK_OEM_ATTN       HEX: F0
438 CONSTANT: VK_OEM_FINISH     HEX: F1
439 CONSTANT: VK_OEM_COPY       HEX: F2
440 CONSTANT: VK_OEM_AUTO       HEX: F3
441 CONSTANT: VK_OEM_ENLW       HEX: F4
442 CONSTANT: VK_OEM_BACKTAB    HEX: F5
443
444 CONSTANT: VK_ATTN           HEX: F6
445 CONSTANT: VK_CRSEL          HEX: F7
446 CONSTANT: VK_EXSEL          HEX: F8
447 CONSTANT: VK_EREOF          HEX: F9
448 CONSTANT: VK_PLAY           HEX: FA
449 CONSTANT: VK_ZOOM           HEX: FB
450 CONSTANT: VK_NONAME         HEX: FC
451 CONSTANT: VK_PA1            HEX: FD
452 CONSTANT: VK_OEM_CLEAR      HEX: FE
453 ! 0xFF : reserved
454
455 ! Key State Masks for Mouse Messages
456 CONSTANT: MK_LBUTTON          HEX: 0001
457 CONSTANT: MK_RBUTTON          HEX: 0002
458 CONSTANT: MK_SHIFT            HEX: 0004
459 CONSTANT: MK_CONTROL          HEX: 0008
460 CONSTANT: MK_MBUTTON          HEX: 0010
461 CONSTANT: MK_XBUTTON1         HEX: 0020
462 CONSTANT: MK_XBUTTON2         HEX: 0040
463
464 ! Some fields are not defined for win64
465 ! Window field offsets for GetWindowLong()
466 CONSTANT: GWL_WNDPROC         -4
467 CONSTANT: GWL_HINSTANCE       -6
468 CONSTANT: GWL_HWNDPARENT      -8
469 CONSTANT: GWL_USERDATA        -21
470 CONSTANT: GWL_ID              -12
471
472 CONSTANT: GWL_STYLE           -16
473 CONSTANT: GWL_EXSTYLE         -20
474
475 CONSTANT: GWLP_WNDPROC        -4
476 CONSTANT: GWLP_HINSTANCE      -6
477 CONSTANT: GWLP_HWNDPARENT     -8
478 CONSTANT: GWLP_USERDATA       -21
479 CONSTANT: GWLP_ID             -12
480
481 ! Class field offsets for GetClassLong()
482 CONSTANT: GCL_MENUNAME        -8
483 CONSTANT: GCL_HBRBACKGROUND   -10
484 CONSTANT: GCL_HCURSOR         -12
485 CONSTANT: GCL_HICON           -14
486 CONSTANT: GCL_HMODULE         -16
487 CONSTANT: GCL_WNDPROC         -24
488 CONSTANT: GCL_HICONSM         -34
489 CONSTANT: GCL_CBWNDEXTRA      -18
490 CONSTANT: GCL_CBCLSEXTRA      -20
491 CONSTANT: GCL_STYLE           -26
492 CONSTANT: GCW_ATOM            -32
493
494 CONSTANT: GCLP_MENUNAME       -8
495 CONSTANT: GCLP_HBRBACKGROUND  -10
496 CONSTANT: GCLP_HCURSOR        -12
497 CONSTANT: GCLP_HICON          -14
498 CONSTANT: GCLP_HMODULE        -16
499 CONSTANT: GCLP_WNDPROC        -24
500 CONSTANT: GCLP_HICONSM        -34
501
502 CONSTANT: MB_ICONASTERISK    HEX: 00000040
503 CONSTANT: MB_ICONEXCLAMATION HEX: 00000030
504 CONSTANT: MB_ICONHAND        HEX: 00000010
505 CONSTANT: MB_ICONQUESTION    HEX: 00000020
506 CONSTANT: MB_OK              HEX: 00000000
507
508 ALIAS: FVIRTKEY TRUE
509 CONSTANT: FNOINVERT 2
510 CONSTANT: FSHIFT 4
511 CONSTANT: FCONTROL 8
512 CONSTANT: FALT 16
513
514 CONSTANT: MAPVK_VK_TO_VSC 0
515 CONSTANT: MAPVK_VSC_TO_VK 1
516 CONSTANT: MAPVK_VK_TO_CHAR 2
517 CONSTANT: MAPVK_VSC_TO_VK_EX 3
518 CONSTANT: MAPVK_VK_TO_VSC_EX 3
519
520 CONSTANT: TME_HOVER 1
521 CONSTANT: TME_LEAVE 2
522 CONSTANT: TME_NONCLIENT 16
523 CONSTANT: TME_QUERY HEX: 40000000
524 CONSTANT: TME_CANCEL HEX: 80000000
525 CONSTANT: HOVER_DEFAULT HEX: ffffffff
526 STRUCT: TRACKMOUSEEVENT
527     { cbSize DWORD }
528     { dwFlags DWORD }
529     { hwndTrack HWND }
530     { dwHoverTime DWORD } ;
531 TYPEDEF: TRACKMOUSEEVENT* LPTRACKMOUSEEVENT
532
533 CONSTANT: DBT_DEVICEARRIVAL HEX: 8000
534 CONSTANT: DBT_DEVICEREMOVECOMPLETE HEX: 8004
535
536 CONSTANT: DBT_DEVTYP_DEVICEINTERFACE 5
537
538 CONSTANT: DEVICE_NOTIFY_WINDOW_HANDLE 0
539 CONSTANT: DEVICE_NOTIFY_SERVICE_HANDLE 1
540
541 CONSTANT: DEVICE_NOTIFY_ALL_INTERFACE_CLASSES 4
542
543 STRUCT: DEV_BROADCAST_HDR
544     { dbch_size DWORD }
545     { dbch_devicetype DWORD }
546     { dbch_reserved DWORD } ;
547
548 STRUCT: DEV_BROADCAST_DEVICEW
549     { dbcc_size DWORD }
550     { dbcc_devicetype DWORD }
551     { dbcc_reserved DWORD }
552     { dbcc_classguid GUID }
553     { dbcc_name WCHAR[1] } ;
554
555 CONSTANT: CCHDEVICENAME 32
556
557 STRUCT: MONITORINFOEX
558     { cbSize DWORD }
559     { rcMonitor RECT }
560     { rcWork RECT }
561     { dwFlags DWORD }
562     { szDevice { TCHAR CCHDEVICENAME } } ;
563
564 TYPEDEF: MONITORINFOEX* LPMONITORINFOEX
565 TYPEDEF: MONITORINFOEX* LPMONITORINFO
566
567 CONSTANT: MONITOR_DEFAULTTONULL 0
568 CONSTANT: MONITOR_DEFAULTTOPRIMARY 1
569 CONSTANT: MONITOR_DEFAULTTONEAREST 2
570 CONSTANT: MONITORINFOF_PRIMARY 1
571 CONSTANT: SWP_NOSIZE 1
572 CONSTANT: SWP_NOMOVE 2
573 CONSTANT: SWP_NOZORDER 4
574 CONSTANT: SWP_NOREDRAW 8
575 CONSTANT: SWP_NOACTIVATE 16
576 CONSTANT: SWP_FRAMECHANGED 32
577 CONSTANT: SWP_SHOWWINDOW 64
578 CONSTANT: SWP_HIDEWINDOW 128
579 CONSTANT: SWP_NOCOPYBITS 256
580 CONSTANT: SWP_NOOWNERZORDER 512
581 CONSTANT: SWP_NOSENDCHANGING 1024
582 ALIAS: SWP_DRAWFRAME SWP_FRAMECHANGED
583 ALIAS: SWP_NOREPOSITION SWP_NOOWNERZORDER
584 CONSTANT: SWP_DEFERERASE 8192
585 CONSTANT: SWP_ASYNCWINDOWPOS 16384
586
587 CONSTANT: MF_ENABLED         HEX: 0000
588 CONSTANT: MF_GRAYED          HEX: 0001
589 CONSTANT: MF_DISABLED        HEX: 0002
590 CONSTANT: MF_STRING          HEX: 0000
591 CONSTANT: MF_BITMAP          HEX: 0004
592 CONSTANT: MF_UNCHECKED       HEX: 0000
593 CONSTANT: MF_CHECKED         HEX: 0008
594 CONSTANT: MF_POPUP           HEX: 0010
595 CONSTANT: MF_MENUBARBREAK    HEX: 0020
596 CONSTANT: MF_MENUBREAK       HEX: 0040
597 CONSTANT: MF_UNHILITE        HEX: 0000
598 CONSTANT: MF_HILITE          HEX: 0080
599 CONSTANT: MF_OWNERDRAW       HEX: 0100
600 CONSTANT: MF_USECHECKBITMAPS HEX: 0200
601 CONSTANT: MF_BYCOMMAND       HEX: 0000
602 CONSTANT: MF_BYPOSITION      HEX: 0400
603 CONSTANT: MF_SEPARATOR       HEX: 0800
604 CONSTANT: MF_DEFAULT         HEX: 1000
605 CONSTANT: MF_SYSMENU         HEX: 2000
606 CONSTANT: MF_HELP            HEX: 4000
607 CONSTANT: MF_RIGHTJUSTIFY    HEX: 4000
608 CONSTANT: MF_MOUSESELECT     HEX: 8000
609
610 CONSTANT: SPI_GETBEEP               1
611 CONSTANT: SPI_SETBEEP               2
612 CONSTANT: SPI_GETMOUSE              3
613 CONSTANT: SPI_SETMOUSE              4
614 CONSTANT: SPI_GETBORDER             5
615 CONSTANT: SPI_SETBORDER             6
616 CONSTANT: SPI_GETKEYBOARDSPEED      10
617 CONSTANT: SPI_SETKEYBOARDSPEED      11
618 CONSTANT: SPI_LANGDRIVER            12
619 CONSTANT: SPI_ICONHORIZONTALSPACING 13
620 CONSTANT: SPI_GETSCREENSAVETIMEOUT  14
621 CONSTANT: SPI_SETSCREENSAVETIMEOUT  15
622 CONSTANT: SPI_GETSCREENSAVEACTIVE   16
623 CONSTANT: SPI_SETSCREENSAVEACTIVE   17
624 CONSTANT: SPI_GETGRIDGRANULARITY    18
625 CONSTANT: SPI_SETGRIDGRANULARITY    19
626 CONSTANT: SPI_SETDESKWALLPAPER      20
627 CONSTANT: SPI_SETDESKPATTERN        21
628 CONSTANT: SPI_GETKEYBOARDDELAY      22
629 CONSTANT: SPI_SETKEYBOARDDELAY      23
630 CONSTANT: SPI_ICONVERTICALSPACING   24
631 CONSTANT: SPI_GETICONTITLEWRAP      25
632 CONSTANT: SPI_SETICONTITLEWRAP      26
633 CONSTANT: SPI_GETMENUDROPALIGNMENT  27
634 CONSTANT: SPI_SETMENUDROPALIGNMENT  28
635 CONSTANT: SPI_SETDOUBLECLKWIDTH     29
636 CONSTANT: SPI_SETDOUBLECLKHEIGHT    30
637 CONSTANT: SPI_GETICONTITLELOGFONT   31
638 CONSTANT: SPI_SETDOUBLECLICKTIME    32
639 CONSTANT: SPI_SETMOUSEBUTTONSWAP    33
640 CONSTANT: SPI_SETICONTITLELOGFONT   34
641 CONSTANT: SPI_GETFASTTASKSWITCH     35
642 CONSTANT: SPI_SETFASTTASKSWITCH     36
643 CONSTANT: SPI_SETDRAGFULLWINDOWS    37
644 CONSTANT: SPI_GETDRAGFULLWINDOWS    38
645
646 CONSTANT: SPI_GETFILTERKEYS         50
647 CONSTANT: SPI_SETFILTERKEYS         51
648 CONSTANT: SPI_GETTOGGLEKEYS         52
649 CONSTANT: SPI_SETTOGGLEKEYS         53
650 CONSTANT: SPI_GETMOUSEKEYS          54
651 CONSTANT: SPI_SETMOUSEKEYS          55
652 CONSTANT: SPI_GETSHOWSOUNDS         56
653 CONSTANT: SPI_SETSHOWSOUNDS         57
654 CONSTANT: SPI_GETSTICKYKEYS         58
655 CONSTANT: SPI_SETSTICKYKEYS         59
656 CONSTANT: SPI_GETACCESSTIMEOUT      60
657 CONSTANT: SPI_SETACCESSTIMEOUT      61
658
659 CONSTANT: SPI_GETSOUNDSENTRY        64
660 CONSTANT: SPI_SETSOUNDSENTRY        65
661
662 ! WINVER >= 0x0400
663 CONSTANT: SPI_GETNONCLIENTMETRICS   41
664 CONSTANT: SPI_SETNONCLIENTMETRICS   42
665 CONSTANT: SPI_GETMINIMIZEDMETRICS   43
666 CONSTANT: SPI_SETMINIMIZEDMETRICS   44
667 CONSTANT: SPI_GETICONMETRICS        45
668 CONSTANT: SPI_SETICONMETRICS        46
669 CONSTANT: SPI_SETWORKAREA           47
670 CONSTANT: SPI_GETWORKAREA           48
671 CONSTANT: SPI_SETPENWINDOWS         49
672
673 CONSTANT: SPI_GETSERIALKEYS         62
674 CONSTANT: SPI_SETSERIALKEYS         63
675 CONSTANT: SPI_GETHIGHCONTRAST       66
676 CONSTANT: SPI_SETHIGHCONTRAST       67
677 CONSTANT: SPI_GETKEYBOARDPREF       68
678 CONSTANT: SPI_SETKEYBOARDPREF       69
679 CONSTANT: SPI_GETSCREENREADER       70
680 CONSTANT: SPI_SETSCREENREADER       71
681 CONSTANT: SPI_GETANIMATION          72
682 CONSTANT: SPI_SETANIMATION          73
683 CONSTANT: SPI_GETFONTSMOOTHING      74
684 CONSTANT: SPI_SETFONTSMOOTHING      75
685 CONSTANT: SPI_SETDRAGWIDTH          76
686 CONSTANT: SPI_SETDRAGHEIGHT         77
687 CONSTANT: SPI_SETHANDHELD           78
688 CONSTANT: SPI_GETLOWPOWERTIMEOUT    79
689 CONSTANT: SPI_GETPOWEROFFTIMEOUT    80
690 CONSTANT: SPI_SETLOWPOWERTIMEOUT    81
691 CONSTANT: SPI_SETPOWEROFFTIMEOUT    82
692 CONSTANT: SPI_GETLOWPOWERACTIVE     83
693 CONSTANT: SPI_GETPOWEROFFACTIVE     84
694 CONSTANT: SPI_SETLOWPOWERACTIVE     85
695 CONSTANT: SPI_SETPOWEROFFACTIVE     86
696 CONSTANT: SPI_SETCURSORS            87
697 CONSTANT: SPI_SETICONS              88
698 CONSTANT: SPI_GETDEFAULTINPUTLANG   89
699 CONSTANT: SPI_SETDEFAULTINPUTLANG   90
700 CONSTANT: SPI_SETLANGTOGGLE         91
701 CONSTANT: SPI_GETWINDOWSEXTENSION   92
702 CONSTANT: SPI_SETMOUSETRAILS        93
703 CONSTANT: SPI_GETMOUSETRAILS        94
704 CONSTANT: SPI_SETSCREENSAVERRUNNING 97
705 ALIAS: SPI_SCREENSAVERRUNNING    SPI_SETSCREENSAVERRUNNING
706
707 ! WIN32_WINNT >= 0x0400 || WIN32_WINDOWS > 0x0400
708 CONSTANT: SPI_GETMOUSEHOVERWIDTH    98
709 CONSTANT: SPI_SETMOUSEHOVERWIDTH    99
710 CONSTANT: SPI_GETMOUSEHOVERHEIGHT   100
711 CONSTANT: SPI_SETMOUSEHOVERHEIGHT   101
712 CONSTANT: SPI_GETMOUSEHOVERTIME     102
713 CONSTANT: SPI_SETMOUSEHOVERTIME     103
714 CONSTANT: SPI_GETWHEELSCROLLLINES   104
715 CONSTANT: SPI_SETWHEELSCROLLLINES   105
716
717 CONSTANT: SPI_GETSHOWIMEUI          110
718 CONSTANT: SPI_SETSHOWIMEUI          111
719
720 ! WINVER >= 0x0500
721 CONSTANT: SPI_GETMOUSESPEED         112
722 CONSTANT: SPI_SETMOUSESPEED         113
723 CONSTANT: SPI_GETSCREENSAVERRUNNING 114
724
725 CONSTANT: SPI_GETACTIVEWINDOWTRACKING    HEX: 1000
726 CONSTANT: SPI_SETACTIVEWINDOWTRACKING    HEX: 1001
727 CONSTANT: SPI_GETMENUANIMATION           HEX: 1002
728 CONSTANT: SPI_SETMENUANIMATION           HEX: 1003
729 CONSTANT: SPI_GETCOMBOBOXANIMATION       HEX: 1004
730 CONSTANT: SPI_SETCOMBOBOXANIMATION       HEX: 1005
731 CONSTANT: SPI_GETLISTBOXSMOOTHSCROLLING  HEX: 1006
732 CONSTANT: SPI_SETLISTBOXSMOOTHSCROLLING  HEX: 1007
733 CONSTANT: SPI_GETGRADIENTCAPTIONS        HEX: 1008
734 CONSTANT: SPI_SETGRADIENTCAPTIONS        HEX: 1009
735 CONSTANT: SPI_GETMENUUNDERLINES          HEX: 100A
736 CONSTANT: SPI_SETMENUUNDERLINES          HEX: 100B
737 CONSTANT: SPI_GETACTIVEWNDTRKZORDER      HEX: 100C
738 CONSTANT: SPI_SETACTIVEWNDTRKZORDER      HEX: 100D
739 CONSTANT: SPI_GETHOTTRACKING             HEX: 100E
740 CONSTANT: SPI_SETHOTTRACKING             HEX: 100F
741 CONSTANT: SPI_GETFOREGROUNDLOCKTIMEOUT   HEX: 2000
742 CONSTANT: SPI_SETFOREGROUNDLOCKTIMEOUT   HEX: 2001
743 CONSTANT: SPI_GETACTIVEWNDTRKTIMEOUT     HEX: 2002
744 CONSTANT: SPI_SETACTIVEWNDTRKTIMEOUT     HEX: 2003
745 CONSTANT: SPI_GETFOREGROUNDFLASHCOUNT    HEX: 2004
746 CONSTANT: SPI_SETFOREGROUNDFLASHCOUNT    HEX: 2005
747
748 ! SystemParamInfo Flags
749 CONSTANT: SPIF_UPDATEINIFILE              1
750 CONSTANT: SPIF_SENDWININICHANGE           2
751 ALIAS: SPIF_SENDCHANGE                 SPIF_SENDWININICHANGE
752
753
754 TYPEDEF: HANDLE HRAWINPUT
755 : GET_RAWINPUT_CODE_WPARAM ( wParam -- n ) HEX: ff bitand ; inline
756
757 CONSTANT: RIM_INPUT        0
758 CONSTANT: RIM_INPUTSINK    1
759
760 CONSTANT: RIM_TYPEMOUSE    0
761 CONSTANT: RIM_TYPEKEYBOARD 1
762 CONSTANT: RIM_TYPEHID      2
763
764 STRUCT: RAWINPUTHEADER
765     { dwType  DWORD  }
766     { dwSize  DWORD  }
767     { hDevice HANDLE }
768     { wParam  WPARAM } ;
769 TYPEDEF: RAWINPUTHEADER* PRAWINPUTHEADER
770 TYPEDEF: RAWINPUTHEADER* LPRAWINPUTHEADER
771 STRUCT: RAWMOUSE_BUTTONS_USBUTTONS
772     { usButtonFlags USHORT }
773     { usButtonData  USHORT } ;
774
775 UNION-STRUCT: RAWMOUSE_BUTTONS
776     { ulButtons ULONG                      }
777     { usButtons RAWMOUSE_BUTTONS_USBUTTONS } ;
778 STRUCT: RAWMOUSE
779     { usFlags            USHORT            }
780     { uButtons           RAWMOUSE_BUTTONS  }
781     { ulRawButtons       ULONG             }
782     { lLastX             LONG              }
783     { lLastY             LONG              }
784     { ulExtraInformation ULONG             } ;
785 TYPEDEF: RAWMOUSE* PRAWMOUSE
786 TYPEDEF: RAWMOUSE* LPRAWMOUSE
787
788 CONSTANT: RI_MOUSE_LEFT_BUTTON_DOWN   HEX: 0001
789 CONSTANT: RI_MOUSE_LEFT_BUTTON_UP     HEX: 0002
790 CONSTANT: RI_MOUSE_RIGHT_BUTTON_DOWN  HEX: 0004
791 CONSTANT: RI_MOUSE_RIGHT_BUTTON_UP    HEX: 0008
792 CONSTANT: RI_MOUSE_MIDDLE_BUTTON_DOWN HEX: 0010
793 CONSTANT: RI_MOUSE_MIDDLE_BUTTON_UP   HEX: 0020
794
795 : RI_MOUSE_BUTTON_1_DOWN      ( -- n ) RI_MOUSE_LEFT_BUTTON_DOWN ; inline
796 : RI_MOUSE_BUTTON_1_UP        ( -- n ) RI_MOUSE_LEFT_BUTTON_UP ; inline
797 : RI_MOUSE_BUTTON_2_DOWN      ( -- n ) RI_MOUSE_RIGHT_BUTTON_DOWN ; inline
798 : RI_MOUSE_BUTTON_2_UP        ( -- n ) RI_MOUSE_RIGHT_BUTTON_UP ; inline
799 : RI_MOUSE_BUTTON_3_DOWN      ( -- n ) RI_MOUSE_MIDDLE_BUTTON_DOWN ; inline
800 : RI_MOUSE_BUTTON_3_UP        ( -- n ) RI_MOUSE_MIDDLE_BUTTON_UP ; inline
801
802 CONSTANT: RI_MOUSE_BUTTON_4_DOWN      HEX: 0040
803 CONSTANT: RI_MOUSE_BUTTON_4_UP        HEX: 0080
804 CONSTANT: RI_MOUSE_BUTTON_5_DOWN      HEX: 0100
805 CONSTANT: RI_MOUSE_BUTTON_5_UP        HEX: 0200
806 CONSTANT: RI_MOUSE_WHEEL              HEX: 0400
807
808 CONSTANT: MOUSE_MOVE_RELATIVE      0
809 CONSTANT: MOUSE_MOVE_ABSOLUTE      1
810 CONSTANT: MOUSE_VIRTUAL_DESKTOP    HEX: 02
811 CONSTANT: MOUSE_ATTRIBUTES_CHANGED HEX: 04
812 CONSTANT: MOUSE_MOVE_NOCOALESCE    HEX: 08
813
814 STRUCT: RAWKEYBOARD
815     { MakeCode         USHORT }
816     { Flags            USHORT }
817     { Reserved         USHORT }
818     { VKey             USHORT }
819     { Message          UINT   }
820     { ExtraInformation ULONG  } ;
821 TYPEDEF: RAWKEYBOARD* PRAWKEYBOARD
822 TYPEDEF: RAWKEYBOARD* LPRAWKEYBOARD
823
824 CONSTANT: KEYBOARD_OVERRUN_MAKE_CODE    HEX: FF
825
826 CONSTANT: RI_KEY_MAKE             0
827 CONSTANT: RI_KEY_BREAK            1
828 CONSTANT: RI_KEY_E0               2
829 CONSTANT: RI_KEY_E1               4
830 CONSTANT: RI_KEY_TERMSRV_SET_LED  8
831 CONSTANT: RI_KEY_TERMSRV_SHADOW   HEX: 10
832
833 STRUCT: RAWHID
834     { dwSizeHid DWORD   }
835     { dwCount   DWORD   }
836     { bRawData  BYTE[1] } ;
837 TYPEDEF: RAWHID* PRAWHID
838 TYPEDEF: RAWHID* LPRAWHID
839
840 UNION-STRUCT: RAWINPUT_UNION
841     { mouse    RAWMOUSE }
842     { keyboard RAWKEYBOARD }
843     { hid      RAWHID } ;
844 STRUCT: RAWINPUT
845     { header RAWINPUTHEADER }
846     { data   RAWINPUT_UNION } ;
847 TYPEDEF: RAWINPUT* PRAWINPUT
848 TYPEDEF: RAWINPUT* LPRAWINPUT
849
850 : RAWINPUT_ALIGN ( x -- y )
851     cpu x86.32 = [ 4 ] [ 8 ] if align ; inline
852 : NEXTRAWINPUTBLOCK ( struct -- next-struct )
853     dup header>> dwSize>> swap <displaced-alien> RAWINPUT_ALIGN RAWINPUT memory>struct ; inline
854
855 CONSTANT: RID_INPUT               HEX: 10000003
856 CONSTANT: RID_HEADER              HEX: 10000005
857 CONSTANT: RIDI_PREPARSEDDATA      HEX: 20000005
858 CONSTANT: RIDI_DEVICENAME         HEX: 20000007
859 CONSTANT: RIDI_DEVICEINFO         HEX: 2000000b
860
861 STRUCT: RID_DEVICE_INFO_MOUSE
862     { dwId                 DWORD }
863     { dwNumberOfButtons    DWORD }
864     { dwSampleRate         DWORD }
865     { fHasHorizontalWheel  BOOL  } ;
866 TYPEDEF: RID_DEVICE_INFO_MOUSE* PRID_DEVICE_INFO_MOUSE
867
868 STRUCT: RID_DEVICE_INFO_KEYBOARD
869     { dwType                 DWORD }
870     { dwSubType              DWORD }
871     { dwKeyboardMode         DWORD }
872     { dwNumberOfFunctionKeys DWORD }
873     { dwNumberOfIndicators   DWORD }
874     { dwNumberOfKeysTotal    DWORD } ;
875 TYPEDEF: RID_DEVICE_INFO_KEYBOARD* PRID_DEVICE_INFO_KEYBOARD
876
877 STRUCT: RID_DEVICE_INFO_HID
878     { dwVendorId      DWORD  }
879     { dwProductId     DWORD  }
880     { dwVersionNumber DWORD  }
881     { usUsagePage     USHORT }
882     { usUsage         USHORT } ;
883 TYPEDEF: RID_DEVICE_INFO_HID* PRID_DEVICE_INFO_HID
884
885 UNION-STRUCT: RID_DEVICE_INFO_UNION
886     { mouse    RID_DEVICE_INFO_MOUSE    }
887     { keyboard RID_DEVICE_INFO_KEYBOARD }
888     { hid      RID_DEVICE_INFO_HID      } ;
889 STRUCT: RID_DEVICE_INFO
890     { cbSize DWORD                 }
891     { dwType DWORD                 }
892     { data   RID_DEVICE_INFO_UNION } ;
893 TYPEDEF: RID_DEVICE_INFO* PRID_DEVICE_INFO
894 TYPEDEF: RID_DEVICE_INFO* LPRID_DEVICE_INFO
895
896 STRUCT: RAWINPUTDEVICE
897     { usUsagePage USHORT }
898     { usUsage     USHORT }
899     { dwFlags     DWORD  }
900     { hwndTarget  HWND   } ;
901 TYPEDEF: RAWINPUTDEVICE* PRAWINPUTDEVICE
902 TYPEDEF: RAWINPUTDEVICE* LPRAWINPUTDEVICE
903 TYPEDEF: RAWINPUTDEVICE* PCRAWINPUTDEVICE
904
905 CONSTANT: RIDEV_REMOVE            HEX: 00000001
906 CONSTANT: RIDEV_EXCLUDE           HEX: 00000010
907 CONSTANT: RIDEV_PAGEONLY          HEX: 00000020
908 CONSTANT: RIDEV_NOLEGACY          HEX: 00000030
909 CONSTANT: RIDEV_INPUTSINK         HEX: 00000100
910 CONSTANT: RIDEV_CAPTUREMOUSE      HEX: 00000200
911 CONSTANT: RIDEV_NOHOTKEYS         HEX: 00000200
912 CONSTANT: RIDEV_APPKEYS           HEX: 00000400
913 CONSTANT: RIDEV_EXINPUTSINK       HEX: 00001000
914 CONSTANT: RIDEV_DEVNOTIFY         HEX: 00002000
915 CONSTANT: RIDEV_EXMODEMASK        HEX: 000000F0
916
917 : RIDEV_EXMODE ( mode -- x ) RIDEV_EXMODEMASK bitand ; inline
918
919 CONSTANT: GIDC_ARRIVAL             1
920 CONSTANT: GIDC_REMOVAL             2
921
922 : GET_DEVICE_CHANGE_WPARAM ( wParam -- x ) HEX: ffff bitand ; inline
923
924 STRUCT: RAWINPUTDEVICELIST
925     { hDevice HANDLE }
926     { dwType  DWORD  } ;
927 TYPEDEF: RAWINPUTDEVICELIST* PRAWINPUTDEVICELIST
928
929 CONSTANT: CCHFORMNAME 32
930
931 CONSTANT: CDS_UPDATEREGISTRY      HEX: 00000001
932 CONSTANT: CDS_TEST                HEX: 00000002
933 CONSTANT: CDS_FULLSCREEN          HEX: 00000004
934 CONSTANT: CDS_GLOBAL              HEX: 00000008
935 CONSTANT: CDS_SET_PRIMARY         HEX: 00000010
936 CONSTANT: CDS_RESET               HEX: 40000000
937 CONSTANT: CDS_SETRECT             HEX: 20000000
938 CONSTANT: CDS_NORESET             HEX: 10000000
939
940 CONSTANT: DISP_CHANGE_SUCCESSFUL 0
941 CONSTANT: DISP_CHANGE_RESTART 1
942 CONSTANT: DISP_CHANGE_FAILED     -1
943 CONSTANT: DISP_CHANGE_BADMODE    -2
944 CONSTANT: DISP_CHANGE_NOTUPDATED -3
945 CONSTANT: DISP_CHANGE_BADFLAGS   -4
946 CONSTANT: DISP_CHANGE_BADPARAM   -5
947
948
949
950 STRUCT: DEVMODE
951     { dmDeviceName TCHAR[CCHDEVICENAME] }
952     { dmSpecVersion WORD }
953     { dmDriverVersion WORD }
954     { dmSize WORD }
955     { dmDriverExtra WORD }
956     { dmFields DWORD }
957
958     { dmOrientation short }
959     { dmPaperSize short }
960     { dmPaperLength short }
961     { dmPaperWidth short }
962     { dmScale short }
963     { dmCopies short }
964     { dmDefaultSource short }
965     { dmPrintQuality short }
966
967     { dmColor short }
968     { dmDuplex short }
969     { dmYResolution short }
970     { dmTTOption short }
971     { dmCollate short }
972     { dmFormName TCHAR[CCHFORMNAME] }
973     { dmLogPixels WORD }
974     { dmBitsPerPel DWORD }
975     { dmPelsWidth DWORD }
976     { dmPelsHeight DWORD }
977     { dmDisplayFlags DWORD }
978     { dmDisplayFrequency DWORD }
979     { dmiCMMethod DWORD }
980     { dmICMIntent DWORD }
981
982     { dmMediaType DWORD }
983     { dmDitherType DWORD }
984     { dmReserved1 DWORD }
985     { dmReserved2 DWORD }
986     { dmPanningWidth DWORD } ;
987
988 ! union { DWORD dmDisplayFlags; DWORD dmNup; } ;
989   ! union {
990     ! struct {
991       ! short dmOrientation;
992       ! short dmPaperSize;
993       ! short dmPaperLength;
994       ! short dmPaperWidth;
995       ! short dmScale;
996       ! short dmCopies;
997       ! short dmDefaultSource;
998       ! short dmPrintQuality;
999     ! } ;
1000     ! struct {
1001       ! POINTL dmPosition;
1002       ! DWORD dmDisplayOrientation;
1003       ! DWORD dmDisplayFixedOutput;
1004     ! } ;
1005   ! } ;
1006
1007 TYPEDEF: DEVMODE* PDEVMODE
1008 TYPEDEF: DEVMODE* LPDEVMODE
1009
1010 LIBRARY: user32
1011
1012 FUNCTION: HKL ActivateKeyboardLayout ( HKL hkl, UINT Flags ) ;
1013 FUNCTION: BOOL AdjustWindowRect ( LPRECT lpRect, DWORD dwStyle, BOOL bMenu ) ;
1014 FUNCTION: BOOL AdjustWindowRectEx ( LPRECT lpRect, DWORD dwStyle, BOOL bMenu, DWORD dwExStyle ) ;
1015 ! FUNCTION: AlignRects
1016 ! FUNCTION: AllowForegroundActivation
1017 ! FUNCTION: AllowSetForegroundWindow
1018 ! FUNCTION: AnimateWindow
1019
1020 FUNCTION: BOOL AnyPopup ( ) ;
1021
1022 ! FUNCTION: AppendMenuA
1023 ! FUNCTION: AppendMenuW
1024 ! FUNCTION: ArrangeIconicWindows
1025 ! FUNCTION: AttachThreadInput
1026 ! FUNCTION: BeginDeferWindowPos
1027
1028 FUNCTION: HDC BeginPaint ( HWND hwnd, LPPAINTSTRUCT lpPaint ) ;
1029
1030 ! FUNCTION: BlockInput
1031 ! FUNCTION: BringWindowToTop
1032 ! FUNCTION: BroadcastSystemMessage
1033 ! FUNCTION: BroadcastSystemMessageA
1034 ! FUNCTION: BroadcastSystemMessageExA
1035 ! FUNCTION: BroadcastSystemMessageExW
1036 ! FUNCTION: BroadcastSystemMessageW
1037 ! FUNCTION: BuildReasonArray
1038 ! FUNCTION: CalcMenuBar
1039 ! FUNCTION: CallMsgFilter
1040 ! FUNCTION: CallMsgFilterA
1041 ! FUNCTION: CallMsgFilterW
1042 ! FUNCTION: CallNextHookEx
1043 ! FUNCTION: CallWindowProcA
1044 ! FUNCTION: CallWindowProcW
1045 ! FUNCTION: CascadeChildWindows
1046 ! FUNCTION: CascadeWindows
1047 ! FUNCTION: ChangeClipboardChain
1048 FUNCTION: LONG ChangeDisplaySettingsExW ( LPCTSTR lpszDeviceName, DEVMODE *lpDevMode, HWND hwnd, DWORD dwFlags, LPVOID lParam ) ;
1049 FUNCTION: LONG ChangeDisplaySettingsW ( DEVMODE *lpDevMode, DWORD dwFlags ) ;
1050 ALIAS: ChangeDisplaySettingsEx ChangeDisplaySettingsExW
1051 ALIAS: ChangeDisplaySettings ChangeDisplaySettingsW
1052 ! FUNCTION: ChangeMenuA
1053 ! FUNCTION: ChangeMenuW
1054 ! FUNCTION: CharLowerA
1055 ! FUNCTION: CharLowerBuffA
1056 ! FUNCTION: CharLowerBuffW
1057 ! FUNCTION: CharLowerW
1058 ! FUNCTION: CharNextA
1059 ! FUNCTION: CharNextExA
1060 ! FUNCTION: CharNextW
1061 ! FUNCTION: CharPrevA
1062 ! FUNCTION: CharPrevExA
1063 ! FUNCTION: CharPrevW
1064 ! FUNCTION: CharToOemA
1065 ! FUNCTION: CharToOemBuffA
1066 ! FUNCTION: CharToOemBuffW
1067 ! FUNCTION: CharToOemW
1068 ! FUNCTION: CharUpperA
1069 ! FUNCTION: CharUpperBuffA
1070 ! FUNCTION: CharUpperBuffW
1071 ! FUNCTION: CharUpperW
1072 ! FUNCTION: CheckDlgButton
1073 ! FUNCTION: CheckMenuItem
1074 ! FUNCTION: CheckMenuRadioItem
1075 ! FUNCTION: CheckRadioButton
1076 FUNCTION: HWND ChildWindowFromPoint ( HWND hWndParent, POINT point ) ;
1077 ! FUNCTION: ChildWindowFromPointEx
1078 ! FUNCTION: ClientThreadSetup
1079 FUNCTION: BOOL ClientToScreen ( HWND hWnd, POINT* point ) ;
1080 ! FUNCTION: CliImmSetHotKey
1081 FUNCTION: int ClipCursor ( RECT* clipRect ) ;
1082 FUNCTION: BOOL CloseClipboard ( ) ;
1083 ! FUNCTION: CloseDesktop
1084 ! FUNCTION: CloseWindow
1085 ! FUNCTION: CloseWindowStation
1086 ! FUNCTION: CopyAcceleratorTableA
1087 FUNCTION: int CopyAcceleratorTableW ( HACCEL hAccelSrc, LPACCEL lpAccelDst, int cAccelEntries ) ;
1088 ALIAS: CopyAcceleratorTable CopyAcceleratorTableW
1089 ! FUNCTION: CopyIcon
1090 ! FUNCTION: CopyImage
1091 ! FUNCTION: CopyRect
1092 ! FUNCTION: CountClipboardFormats
1093 ! FUNCTION: CreateAcceleratorTableA
1094 FUNCTION: HACCEL CreateAcceleratorTableW ( LPACCEL lpaccl, int cEntries ) ;
1095 ALIAS: CreateAcceleratorTable CreateAcceleratorTableW
1096 ! FUNCTION: CreateCaret
1097 ! FUNCTION: CreateCursor
1098 ! FUNCTION: CreateDesktopA
1099 ! FUNCTION: CreateDesktopW
1100 ! FUNCTION: CreateDialogIndirectParamA
1101 ! FUNCTION: CreateDialogIndirectParamAorW
1102 ! FUNCTION: CreateDialogIndirectParamW
1103 ! FUNCTION: CreateDialogParamA
1104 ! FUNCTION: CreateDialogParamW
1105 ! FUNCTION: CreateIcon
1106 ! FUNCTION: CreateIconFromResource
1107 ! FUNCTION: CreateIconFromResourceEx
1108 ! FUNCTION: CreateIconIndirect
1109 ! FUNCTION: CreateMDIWindowA
1110 ! FUNCTION: CreateMDIWindowW
1111 ! FUNCTION: CreateMenu
1112 ! FUNCTION: CreatePopupMenu
1113 ! FUNCTION: CreateSystemThreads
1114
1115 FUNCTION: HWND CreateWindowExW (
1116                 DWORD dwExStyle,
1117                 LPCTSTR lpClassName,
1118                 LPCTSTR lpWindowName,
1119                 DWORD dwStyle,
1120                 uint X,
1121                 uint Y,
1122                 uint nWidth,
1123                 uint nHeight,
1124                 HWND hWndParent,
1125                 HMENU hMenu,
1126                 HINSTANCE hInstance,
1127                 LPVOID lpParam ) ;
1128
1129 ALIAS: CreateWindowEx CreateWindowExW
1130
1131 : CreateWindow ( a b c d e f g h i j k -- hwnd ) 0 12 -nrot CreateWindowEx ; inline
1132
1133 ! FUNCTION: CreateWindowStationA
1134 ! FUNCTION: CreateWindowStationW
1135 ! FUNCTION: CsrBroadcastSystemMessageExW
1136 ! FUNCTION: CtxInitUser32
1137 ! FUNCTION: DdeAbandonTransaction
1138 ! FUNCTION: DdeAccessData
1139 ! FUNCTION: DdeAddData
1140 ! FUNCTION: DdeClientTransaction
1141 ! FUNCTION: DdeCmpStringHandles
1142 ! FUNCTION: DdeConnect
1143 ! FUNCTION: DdeConnectList
1144 ! FUNCTION: DdeCreateDataHandle
1145 ! FUNCTION: DdeCreateStringHandleA
1146 ! FUNCTION: DdeCreateStringHandleW
1147 ! FUNCTION: DdeDisconnect
1148 ! FUNCTION: DdeDisconnectList
1149 ! FUNCTION: DdeEnableCallback
1150 ! FUNCTION: DdeFreeDataHandle
1151 ! FUNCTION: DdeFreeStringHandle
1152 ! FUNCTION: DdeGetData
1153 ! FUNCTION: DdeGetLastError
1154 ! FUNCTION: DdeGetQualityOfService
1155 ! FUNCTION: DdeImpersonateClient
1156 ! FUNCTION: DdeInitializeA
1157 ! FUNCTION: DdeInitializeW
1158 ! FUNCTION: DdeKeepStringHandle
1159 ! FUNCTION: DdeNameService
1160 ! FUNCTION: DdePostAdvise
1161 ! FUNCTION: DdeQueryConvInfo
1162 ! FUNCTION: DdeQueryNextServer
1163 ! FUNCTION: DdeQueryStringA
1164 ! FUNCTION: DdeQueryStringW
1165 ! FUNCTION: DdeReconnect
1166 ! FUNCTION: DdeSetQualityOfService
1167 ! FUNCTION: DdeSetUserHandle
1168 ! FUNCTION: DdeUnaccessData
1169 ! FUNCTION: DdeUninitialize
1170 ! FUNCTION: DefDlgProcA
1171 ! FUNCTION: DefDlgProcW
1172 ! FUNCTION: DeferWindowPos
1173 ! FUNCTION: DefFrameProcA
1174 ! FUNCTION: DefFrameProcW
1175 ! FUNCTION: DefMDIChildProcA
1176 ! FUNCTION: DefMDIChildProcW
1177 FUNCTION: LRESULT DefRawInputProc ( PRAWINPUT* paRawInput, INT nInput, UINT cbSizeHeader ) ;
1178 FUNCTION: LRESULT DefWindowProcW ( HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lParam ) ;
1179 ALIAS: DefWindowProc DefWindowProcW
1180 ! FUNCTION: DeleteMenu
1181 ! FUNCTION: DeregisterShellHookWindow
1182 FUNCTION: BOOL DestroyAcceleratorTable ( HACCEL hAccel ) ;
1183 ! FUNCTION: DestroyCaret
1184 ! FUNCTION: DestroyCursor
1185 ! FUNCTION: DestroyIcon
1186 ! FUNCTION: DestroyMenu
1187 ! FUNCTION: DestroyReasons
1188 FUNCTION: BOOL DestroyWindow ( HWND hWnd ) ;
1189 ! FUNCTION: DeviceEventWorker
1190 ! FUNCTION: DialogBoxIndirectParamA
1191 ! FUNCTION: DialogBoxIndirectParamAorW
1192 ! FUNCTION: DialogBoxIndirectParamW
1193 ! FUNCTION: DialogBoxParamA
1194 ! FUNCTION: DialogBoxParamW
1195 ! FUNCTION: DisableProcessWindowsGhosting
1196
1197 FUNCTION: LONG DispatchMessageW ( MSG* lpMsg ) ;
1198 ALIAS: DispatchMessage DispatchMessageW
1199
1200 ! FUNCTION: DisplayExitWindowsWarnings
1201 ! FUNCTION: DlgDirListA
1202 ! FUNCTION: DlgDirListComboBoxA
1203 ! FUNCTION: DlgDirListComboBoxW
1204 ! FUNCTION: DlgDirListW
1205 ! FUNCTION: DlgDirSelectComboBoxExA
1206 ! FUNCTION: DlgDirSelectComboBoxExW
1207 ! FUNCTION: DlgDirSelectExA
1208 ! FUNCTION: DlgDirSelectExW
1209 ! FUNCTION: DragDetect
1210 ! FUNCTION: DragObject
1211
1212
1213 FUNCTION: BOOL DrawAnimatedRects ( HWND hWnd, int idAni, RECT* lprcFrom, RECT* lprcTo ) ;
1214 ! FUNCTION: BOOL DrawCaption ( HWND hWnd, HDC hdc, LPRECT lprc, UINT uFlags ) ;
1215
1216 ! FUNCTION: DrawEdge
1217 ! FUNCTION: DrawFocusRect
1218 ! FUNCTION: DrawFrame
1219 ! FUNCTION: DrawFrameControl
1220
1221 FUNCTION: BOOL DrawIcon ( HDC hDC, int X, int Y, HICON hIcon ) ;
1222
1223 ! FUNCTION: DrawIconEx
1224 ! FUNCTION: DrawMenuBar
1225 ! FUNCTION: DrawMenuBarTemp
1226 ! FUNCTION: DrawStateA
1227 ! FUNCTION: DrawStateW
1228 ! FUNCTION: DrawTextA
1229 ! FUNCTION: DrawTextExA
1230 ! FUNCTION: DrawTextExW
1231 ! FUNCTION: DrawTextW
1232 ! FUNCTION: EditWndProc
1233 FUNCTION: BOOL EmptyClipboard ( ) ;
1234 FUNCTION: BOOL EnableMenuItem ( HMENU hMenu, UINT uIDEnableItem, UINT uEnable ) ;
1235 ! FUNCTION: EnableScrollBar
1236 ! FUNCTION: EnableWindow
1237 ! FUNCTION: EndDeferWindowPos
1238 ! FUNCTION: EndDialog
1239 ! FUNCTION: EndMenu
1240
1241 FUNCTION: BOOL EndPaint ( HWND hWnd, PAINTSTRUCT* lpPaint) ;
1242
1243 ! FUNCTION: EndTask
1244 ! FUNCTION: EnterReaderModeHelper
1245 ! FUNCTION: EnumChildWindows
1246 FUNCTION: UINT EnumClipboardFormats ( UINT format ) ;
1247 ! FUNCTION: EnumDesktopsA
1248 ! FUNCTION: EnumDesktopsW
1249 ! FUNCTION: EnumDesktopWindows
1250 ! FUNCTION: EnumDisplayDevicesA
1251 ! FUNCTION: EnumDisplayDevicesW
1252 ! FUNCTION: BOOL EnumDisplayMonitors ( HDC hdc, LPCRECT lprcClip, MONITORENUMPROC lpfnEnum, LPARAM dwData ) ;
1253 ! FUNCTION: EnumDisplaySettingsA
1254 ! FUNCTION: EnumDisplaySettingsExA
1255 ! FUNCTION: EnumDisplaySettingsExW
1256 FUNCTION: BOOL EnumDisplaySettingsW ( LPCTSTR lpszDeviceName, DWORD iModeNum, DEVMODE *lpDevMode ) ;
1257 ALIAS: EnumDisplaySettings EnumDisplaySettingsW
1258 ! FUNCTION: EnumPropsA
1259 ! FUNCTION: EnumPropsExA
1260 ! FUNCTION: EnumPropsExW
1261 ! FUNCTION: EnumPropsW
1262 ! FUNCTION: EnumThreadWindows
1263 ! FUNCTION: EnumWindows
1264 ! FUNCTION: EnumWindowStationsA
1265 ! FUNCTION: EnumWindowStationsW
1266 ! FUNCTION: EqualRect
1267 ! FUNCTION: ExcludeUpdateRgn
1268 ! FUNCTION: ExitWindowsEx
1269 FUNCTION: int FillRect ( HDC hDC, RECT* lprc, HBRUSH hbr ) ;
1270 FUNCTION: HWND FindWindowA ( c-string lpClassName, c-string lpWindowName ) ;
1271 FUNCTION: HWND FindWindowExA ( HWND hwndParent, HWND childAfter, c-string lpClassName, c-string lpWindowName ) ;
1272 ! FUNCTION: FindWindowExW
1273 ! FUNCTION: FindWindowW
1274 ! FUNCTION: FlashWindow
1275 ! FUNCTION: FlashWindowEx
1276 ! FUNCTION: FrameRect
1277 ! FUNCTION: FreeDDElParam
1278 ! FUNCTION: GetActiveWindow
1279 ! FUNCTION: GetAltTabInfo
1280 ! FUNCTION: GetAltTabInfoA
1281 ! FUNCTION: GetAltTabInfoW
1282 ! FUNCTION: GetAncestor
1283 ! FUNCTION: GetAppCompatFlags
1284 ! FUNCTION: GetAppCompatFlags2
1285 ! FUNCTION: GetAsyncKeyState
1286 FUNCTION: HWND GetCapture ( ) ;
1287 ! FUNCTION: GetCaretBlinkTime
1288 ! FUNCTION: GetCaretPos
1289 FUNCTION: BOOL GetClassInfoW ( HINSTANCE hInst, LPCWSTR lpszClass, LPWNDCLASS lpwcx ) ;
1290 ALIAS: GetClassInfo GetClassInfoW
1291
1292 FUNCTION: BOOL GetClassInfoExW ( HINSTANCE hInst, LPCWSTR lpszClass, LPWNDCLASSEX lpwcx ) ;
1293 ALIAS: GetClassInfoEx GetClassInfoExW
1294
1295 FUNCTION: ULONG_PTR GetClassLongW ( HWND hWnd, int nIndex ) ;
1296 ALIAS: GetClassLong GetClassLongW
1297 ALIAS: GetClassLongPtr GetClassLongW
1298
1299
1300 ! FUNCTION: GetClassNameA
1301 ! FUNCTION: GetClassNameW
1302 ! FUNCTION: GetClassWord
1303 FUNCTION: BOOL GetClientRect ( HWND hWnd, LPRECT lpRect ) ;
1304
1305 FUNCTION: HANDLE GetClipboardData ( UINT uFormat ) ;
1306
1307 ! FUNCTION: GetClipboardFormatNameA
1308 ! FUNCTION: GetClipboardFormatNameW
1309 FUNCTION: HWND GetClipboardOwner ( ) ;
1310 FUNCTION: DWORD GetClipboardSequenceNumber ( ) ;
1311 ! FUNCTION: GetClipboardViewer
1312 ! FUNCTION: GetClipCursor
1313 ! FUNCTION: GetComboBoxInfo
1314 ! FUNCTION: GetCursor
1315 ! FUNCTION: GetCursorFrameInfo
1316 ! FUNCTION: GetCursorInfo
1317 ! FUNCTION: GetCursorPos
1318 FUNCTION: HDC GetDC ( HWND hWnd ) ;
1319 FUNCTION: HDC GetDCEx ( HWND hWnd, HRGN hrgnClip, DWORD flags ) ;
1320 FUNCTION: HWND GetDesktopWindow ( ) ;
1321 ! FUNCTION: GetDialogBaseUnits
1322 ! FUNCTION: GetDlgCtrlID
1323 ! FUNCTION: GetDlgItem
1324 ! FUNCTION: GetDlgItemInt
1325 ! FUNCTION: GetDlgItemTextA
1326 ! FUNCTION: GetDlgItemTextW
1327 FUNCTION: uint GetDoubleClickTime ( ) ;
1328 FUNCTION: HWND GetFocus ( ) ;
1329 FUNCTION: HWND GetForegroundWindow ( ) ;
1330 ! FUNCTION: GetGuiResources
1331 ! FUNCTION: GetGUIThreadInfo
1332 ! FUNCTION: GetIconInfo
1333 ! FUNCTION: GetInputDesktop
1334 ! FUNCTION: GetInputState
1335 ! FUNCTION: GetInternalWindowPos
1336 ! FUNCTION: GetKBCodePage
1337 ! FUNCTION: GetKeyboardLayout
1338 ! FUNCTION: GetKeyboardLayoutList
1339 ! FUNCTION: GetKeyboardLayoutNameA
1340 ! FUNCTION: GetKeyboardLayoutNameW
1341 ! FUNCTION: GetKeyboardState
1342 ! FUNCTION: GetKeyboardType
1343 ! FUNCTION: GetKeyNameTextA
1344 ! FUNCTION: GetKeyNameTextW
1345 FUNCTION: SHORT GetKeyState ( int nVirtKey ) ;
1346 ! FUNCTION: GetLastActivePopup
1347 ! FUNCTION: GetLastInputInfo
1348 ! FUNCTION: GetLayeredWindowAttributes
1349 ! FUNCTION: GetListBoxInfo
1350 ! FUNCTION: GetMenu
1351 ! FUNCTION: GetMenuBarInfo
1352 ! FUNCTION: GetMenuCheckMarkDimensions
1353 ! FUNCTION: GetMenuContextHelpId
1354 ! FUNCTION: GetMenuDefaultItem
1355 ! FUNCTION: GetMenuInfo
1356 ! FUNCTION: GetMenuItemCount
1357 ! FUNCTION: GetMenuItemID
1358 ! FUNCTION: GetMenuItemInfoA
1359 ! FUNCTION: GetMenuItemInfoW
1360 ! FUNCTION: GetMenuItemRect
1361 ! FUNCTION: GetMenuState
1362 ! FUNCTION: GetMenuStringA
1363 ! FUNCTION: GetMenuStringW
1364
1365 FUNCTION: BOOL GetMessageW ( LPMSG lpMsg, HWND hWnd, UINT wMsgFilterMin, UINT wMsgFilterMax ) ;
1366 ALIAS: GetMessage GetMessageW
1367
1368 ! FUNCTION: GetMessageExtraInfo
1369 ! FUNCTION: GetMessagePos
1370 ! FUNCTION: GetMessageTime
1371 ! FUNCTION: GetMonitorInfoA
1372
1373 FUNCTION: BOOL GetMonitorInfoW ( HMONITOR hMonitor, LPMONITORINFO lpmi ) ;
1374 ALIAS: GetMonitorInfo GetMonitorInfoW
1375
1376 ! FUNCTION: GetMouseMovePointsEx
1377 ! FUNCTION: GetNextDlgGroupItem
1378 ! FUNCTION: GetNextDlgTabItem
1379 ! FUNCTION: GetOpenClipboardWindow
1380 FUNCTION: HWND GetParent ( HWND hWnd ) ;
1381 FUNCTION: int GetPriorityClipboardFormat ( UINT* paFormatPriorityList, int cFormats ) ;
1382 ! FUNCTION: GetProcessDefaultLayout
1383 ! FUNCTION: GetProcessWindowStation
1384 ! FUNCTION: GetProgmanWindow
1385 ! FUNCTION: GetPropA
1386 ! FUNCTION: GetPropW
1387 ! FUNCTION: GetQueueStatus
1388 FUNCTION: UINT GetRawInputBuffer ( PRAWINPUT pData, PUINT pcbSize, UINT cbSizeHeader ) ;
1389 FUNCTION: UINT GetRawInputData ( HRAWINPUT hRawInput, UINT uiCommand, LPVOID pData, PUINT pcbSize, UINT cbSizeHeader ) ;
1390 FUNCTION: UINT GetRawInputDeviceInfoA ( HANDLE hDevice, UINT uiCommand, LPVOID pData, PUINT pcbSize ) ;
1391 FUNCTION: UINT GetRawInputDeviceInfoW ( HANDLE hDevice, UINT uiCommand, LPVOID pData, PUINT pcbSize ) ;
1392 ALIAS: GetRawInputDeviceInfo GetRawInputDeviceInfoW
1393 FUNCTION: UINT GetRawInputDeviceList ( PRAWINPUTDEVICELIST pRawInputDeviceList, PUINT puiNumDevices, UINT cbSize ) ;
1394 FUNCTION: UINT GetRegisteredRawInputDevices ( PRAWINPUTDEVICE pRawInputDevices, PUINT puiNumDevices, UINT cbSize ) ;
1395 ! FUNCTION: GetReasonTitleFromReasonCode
1396 ! FUNCTION: GetScrollBarInfo
1397 ! FUNCTION: GetScrollInfo
1398 ! FUNCTION: GetScrollPos
1399 ! FUNCTION: GetScrollRange
1400 ! FUNCTION: GetShellWindow
1401 ! FUNCTION: GetSubMenu
1402 FUNCTION: COLORREF GetSysColor ( int nIndex ) ;
1403 FUNCTION: HBRUSH GetSysColorBrush ( int nIndex ) ;
1404 FUNCTION: HMENU GetSystemMenu ( HWND hWnd, BOOL bRevert ) ;
1405 ! FUNCTION: GetSystemMetrics
1406 ! FUNCTION: GetTabbedTextExtentA
1407 ! FUNCTION: GetTabbedTextExtentW
1408 ! FUNCTION: GetTaskmanWindow
1409 ! FUNCTION: GetThreadDesktop
1410 ! FUNCTION: GetTitleBarInfo
1411
1412
1413 FUNCTION: HWND GetTopWindow ( HWND hWnd ) ;
1414 ! FUNCTION: BOOL GetUpdateRect ( HWND hWnd, LPRECT lpRect, BOOL bErase ) ;
1415 FUNCTION: int GetUpdateRgn ( HWND hWnd, HRGN hRgn, BOOL bErase ) ;
1416
1417
1418 ! FUNCTION: GetUserObjectInformationA
1419 ! FUNCTION: GetUserObjectInformationW
1420 ! FUNCTION: GetUserObjectSecurity
1421 FUNCTION: HWND GetWindow ( HWND hWnd, UINT uCmd ) ;
1422 ! FUNCTION: GetWindowContextHelpId
1423 ! FUNCTION: GetWindowDC
1424 ! FUNCTION: GetWindowInfo
1425 ! FUNCTION: GetWindowLongA
1426 ! FUNCTION: GetWindowLongW
1427 FUNCTION: LONG_PTR GetWindowLongW ( HANDLE hWnd, int index ) ;
1428 ALIAS: GetWindowLong GetWindowLongW
1429
1430 FUNCTION: LONG_PTR GetWindowLongPtrW ( HWND hWnd, int nIndex ) ;
1431 ALIAS: GetWindowLongPtr GetWindowLongPtrW
1432 ! FUNCTION: GetWindowModuleFileName
1433 ! FUNCTION: GetWindowModuleFileNameA
1434 ! FUNCTION: GetWindowModuleFileNameW
1435 ! FUNCTION: GetWindowPlacement
1436 FUNCTION: BOOL GetWindowRect ( HWND hWnd, LPRECT lpRect ) ;
1437 ! FUNCTION: GetWindowRgn
1438 ! FUNCTION: GetWindowRgnBox
1439 FUNCTION: int GetWindowTextA ( HWND hWnd, char* lpString, int nMaxCount ) ;
1440 ! FUNCTION: GetWindowTextLengthA
1441 ! FUNCTION: GetWindowTextLengthW
1442 ! FUNCTION: GetWindowTextW
1443 FUNCTION: DWORD GetWindowThreadProcessId ( HWND hWnd, void* lpdwProcessId ) ;
1444 ! FUNCTION: GetWindowWord
1445 ! FUNCTION: GetWinStationInfo
1446 ! FUNCTION: GrayStringA
1447 ! FUNCTION: GrayStringW
1448 ! FUNCTION: HideCaret
1449 ! FUNCTION: HiliteMenuItem
1450 ! FUNCTION: ImpersonateDdeClientWindow
1451 ! FUNCTION: IMPGetIMEA
1452 ! FUNCTION: IMPGetIMEW
1453 ! FUNCTION: IMPQueryIMEA
1454 ! FUNCTION: IMPQueryIMEW
1455 ! FUNCTION: IMPSetIMEA
1456 ! FUNCTION: IMPSetIMEW
1457 ! FUNCTION: InflateRect
1458 ! FUNCTION: InitializeLpkHooks
1459 ! FUNCTION: InitializeWin32EntryTable
1460 ! FUNCTION: InSendMessage
1461 ! FUNCTION: InSendMessageEx
1462 ! FUNCTION: InsertMenuA
1463 ! FUNCTION: InsertMenuItemA
1464 ! FUNCTION: InsertMenuItemW
1465 ! FUNCTION: InsertMenuW
1466 ! FUNCTION: InternalGetWindowText
1467 ! FUNCTION: IntersectRect
1468 ! FUNCTION: InvalidateRect
1469 ! FUNCTION: InvalidateRgn
1470 ! FUNCTION: InvertRect
1471 ! FUNCTION: IsCharAlphaA
1472 ! FUNCTION: IsCharAlphaNumericA
1473 ! FUNCTION: IsCharAlphaNumericW
1474 ! FUNCTION: IsCharAlphaW
1475 ! FUNCTION: IsCharLowerA
1476 ! FUNCTION: IsCharLowerW
1477 ! FUNCTION: IsCharUpperA
1478 ! FUNCTION: IsCharUpperW
1479 FUNCTION: BOOL IsChild ( HWND hWndParent, HWND hWnd ) ;
1480 FUNCTION: BOOL IsClipboardFormatAvailable ( UINT format ) ;
1481 ! FUNCTION: IsDialogMessage
1482 ! FUNCTION: IsDialogMessageA
1483 ! FUNCTION: IsDialogMessageW
1484 ! FUNCTION: IsDlgButtonChecked
1485 FUNCTION: BOOL IsGUIThread ( BOOL bConvert ) ;
1486 FUNCTION: BOOL IsHungAppWindow ( HWND hWnd ) ;
1487 FUNCTION: BOOL IsIconic ( HWND hWnd ) ;
1488 FUNCTION: BOOL IsMenu ( HMENU hMenu ) ;
1489 ! FUNCTION: BOOL IsRectEmpty
1490 ! FUNCTION: BOOL IsServerSideWindow
1491 FUNCTION: BOOL IsWindow ( HWND hWnd ) ;
1492 ! FUNCTION: BOOL IsWindowEnabled
1493 ! FUNCTION: BOOL IsWindowInDestroy
1494 FUNCTION: BOOL IsWindowUnicode ( HWND hWnd ) ;
1495 FUNCTION: BOOL IsWindowVisible ( HWND hWnd ) ;
1496 ! FUNCTION: BOOL IsWinEventHookInstalled
1497 FUNCTION: BOOL IsZoomed ( HWND hWnd ) ;
1498 ! FUNCTION: keybd_event
1499 ! FUNCTION: KillSystemTimer
1500 ! FUNCTION: KillTimer
1501 ! FUNCTION: LoadAcceleratorsA
1502 FUNCTION: HACCEL LoadAcceleratorsW ( HINSTANCE hInstance, LPCTSTR lpTableName ) ;
1503 ! FUNCTION: LoadBitmapA
1504 ! FUNCTION: LoadBitmapW
1505 ! FUNCTION: LoadCursorFromFileA
1506 ! FUNCTION: LoadCursorFromFileW
1507
1508
1509 ! FUNCTION: HCURSOR LoadCursorW ( HINSTANCE hInstance, LPCWSTR lpCursorName ) ;
1510 FUNCTION: HCURSOR LoadCursorW ( HINSTANCE hInstance, ushort lpCursorName ) ;
1511 ALIAS: LoadCursor LoadCursorW
1512
1513 ! FUNCTION: HICON LoadIconA ( HINSTANCE hInstance, LPCTSTR lpIconName ) ;
1514 FUNCTION: HICON LoadIconW ( HINSTANCE hInstance, LPCTSTR lpIconName ) ;
1515 ALIAS: LoadIcon LoadIconW
1516
1517 ! FUNCTION: LoadImageA
1518 ! FUNCTION: LoadImageW
1519 ! FUNCTION: LoadKeyboardLayoutA
1520 ! FUNCTION: LoadKeyboardLayoutEx
1521 ! FUNCTION: LoadKeyboardLayoutW
1522 ! FUNCTION: LoadLocalFonts
1523 ! FUNCTION: LoadMenuA
1524 ! FUNCTION: LoadMenuIndirectA
1525 ! FUNCTION: LoadMenuIndirectW
1526 ! FUNCTION: LoadMenuW
1527 ! FUNCTION: LoadRemoteFonts
1528 ! FUNCTION: LoadStringA
1529 ! FUNCTION: LoadStringW
1530 ! FUNCTION: LockSetForegroundWindow
1531 ! FUNCTION: LockWindowStation
1532 ! FUNCTION: LockWindowUpdate
1533 ! FUNCTION: LockWorkStation
1534 ! FUNCTION: LookupIconIdFromDirectory
1535 ! FUNCTION: LookupIconIdFromDirectoryEx
1536 ! FUNCTION: MapDialogRect
1537
1538 FUNCTION: UINT MapVirtualKeyW ( UINT uCode, UINT uMapType ) ;
1539 ALIAS: MapVirtualKey MapVirtualKeyW
1540
1541 FUNCTION: UINT MapVirtualKeyExW ( UINT uCode, UINT uMapType, HKL dwhkl ) ;
1542 ALIAS: MapVirtualKeyEx MapVirtualKeyExW
1543
1544 ! FUNCTION: MapWindowPoints
1545 ! FUNCTION: MB_GetString
1546 ! FUNCTION: MBToWCSEx
1547 ! FUNCTION: MenuItemFromPoint
1548 ! FUNCTION: MenuWindowProcA
1549 ! FUNCTION: MenuWindowProcW
1550
1551 ! -1 is Simple beep
1552 FUNCTION: BOOL MessageBeep ( UINT uType ) ;
1553
1554 FUNCTION: int MessageBoxA ( 
1555                 HWND hWnd,
1556                 LPCSTR lpText,
1557                 LPCSTR lpCaption,
1558                 UINT uType ) ;
1559
1560 FUNCTION: int MessageBoxW (
1561                 HWND hWnd,
1562                 LPCWSTR lpText,
1563                 LPCWSTR lpCaption,
1564                 UINT uType) ;
1565
1566 FUNCTION: int MessageBoxExA ( HWND hWnd,
1567                 LPCSTR lpText,
1568                 LPCSTR lpCaption,
1569                 UINT uType,
1570                 WORD wLanguageId
1571                 ) ;
1572
1573 FUNCTION: int MessageBoxExW (
1574                 HWND hWnd,
1575                 LPCWSTR lpText,
1576                 LPCWSTR lpCaption,
1577                 UINT uType,
1578                 WORD wLanguageId ) ;
1579
1580 ! FUNCTION: int MessageBoxIndirectA ( MSGBOXPARAMSA* params ) ;
1581 ! FUNCTION: int MessageBoxIndirectW ( MSGBOXPARAMSW* params ) ;
1582
1583
1584 ALIAS: MessageBox MessageBoxW
1585
1586 ALIAS: MessageBoxEx MessageBoxExW
1587
1588 ! : MessageBoxIndirect
1589     ! \ MessageBoxIndirectW \ MessageBoxIndirectA unicode-exec ;
1590
1591 ! FUNCTION: MessageBoxTimeoutA ! dllexported, not in header
1592 ! FUNCTION: MessageBoxTimeoutW ! dllexported, not in header
1593
1594 ! FUNCTION: ModifyMenuA
1595 ! FUNCTION: ModifyMenuW
1596 ! FUNCTION: MonitorFromPoint
1597 ! FUNCTION: MonitorFromRect
1598 FUNCTION: HMONITOR MonitorFromWindow ( HWND hWnd, DWORD dwFlags ) ;
1599 ! FUNCTION: mouse_event
1600
1601
1602 FUNCTION: BOOL MoveWindow (
1603     HWND hWnd,
1604     int X,
1605     int Y,
1606     int nWidth,
1607     int nHeight,
1608     BOOL bRepaint ) ;
1609
1610 ! FUNCTION: MsgWaitForMultipleObjects
1611 ! FUNCTION: MsgWaitForMultipleObjectsEx
1612 ! FUNCTION: NotifyWinEvent
1613 ! FUNCTION: OemKeyScan
1614 ! FUNCTION: OemToCharA
1615 ! FUNCTION: OemToCharBuffA
1616 ! FUNCTION: OemToCharBuffW
1617 ! FUNCTION: OemToCharW
1618 ! FUNCTION: OffsetRect
1619 FUNCTION: BOOL OpenClipboard ( HWND hWndNewOwner ) ;
1620 ! FUNCTION: OpenDesktopA
1621 ! FUNCTION: OpenDesktopW
1622 ! FUNCTION: OpenIcon
1623 ! FUNCTION: OpenInputDesktop
1624 ! FUNCTION: OpenWindowStationA
1625 ! FUNCTION: OpenWindowStationW
1626 ! FUNCTION: PackDDElParam
1627 ! FUNCTION: PaintDesktop
1628 ! FUNCTION: PaintMenuBar
1629 FUNCTION: BOOL PeekMessageA ( LPMSG lpMsg, HWND hWnd, UINT wMsgFilterMin, UINT wMsgFilterMax, UINT wRemoveMsg ) ;
1630 FUNCTION: BOOL PeekMessageW ( LPMSG lpMsg, HWND hWnd, UINT wMsgFilterMin, UINT wMsgFilterMax, UINT wRemoveMsg ) ;
1631 ALIAS: PeekMessage PeekMessageW
1632
1633 ! FUNCTION: PostMessageA
1634 ! FUNCTION: PostMessageW
1635 FUNCTION: void PostQuitMessage ( int nExitCode ) ;
1636 ! FUNCTION: PostThreadMessageA
1637 ! FUNCTION: PostThreadMessageW
1638 ! FUNCTION: PrintWindow
1639 ! FUNCTION: PrivateExtractIconExA
1640 ! FUNCTION: PrivateExtractIconExW
1641 ! FUNCTION: PrivateExtractIconsA
1642 ! FUNCTION: PrivateExtractIconsW
1643 ! FUNCTION: PrivateSetDbgTag
1644 ! FUNCTION: PrivateSetRipFlags
1645 ! FUNCTION: PtInRect
1646 ! FUNCTION: QuerySendMessage
1647 ! FUNCTION: QueryUserCounters
1648 ! FUNCTION: RealChildWindowFromPoint
1649 ! FUNCTION: RealGetWindowClass
1650 ! FUNCTION: RealGetWindowClassA
1651 ! FUNCTION: RealGetWindowClassW
1652 ! FUNCTION: ReasonCodeNeedsBugID
1653 ! FUNCTION: ReasonCodeNeedsComment
1654 ! FUNCTION: RecordShutdownReason
1655 ! FUNCTION: RedrawWindow
1656
1657 FUNCTION: ATOM RegisterClassA ( WNDCLASS* lpWndClass ) ;
1658 FUNCTION: ATOM RegisterClassW ( WNDCLASS* lpWndClass ) ;
1659 FUNCTION: ATOM RegisterClassExA ( WNDCLASSEX* lpwcx ) ;
1660 FUNCTION: ATOM RegisterClassExW ( WNDCLASSEX* lpwcx ) ;
1661
1662 ALIAS: RegisterClass RegisterClassW
1663 ALIAS: RegisterClassEx RegisterClassExW
1664
1665 ! FUNCTION: RegisterClipboardFormatA
1666 ! FUNCTION: RegisterClipboardFormatW
1667 FUNCTION: HANDLE RegisterDeviceNotificationA ( HANDLE hRecipient, LPVOID NotificationFilter, DWORD Flags ) ;
1668 FUNCTION: HANDLE RegisterDeviceNotificationW ( HANDLE hRecipient, LPVOID NotificationFilter, DWORD Flags ) ;
1669 ALIAS: RegisterDeviceNotification RegisterDeviceNotificationW
1670 ! FUNCTION: RegisterHotKey
1671 ! FUNCTION: RegisterLogonProcess
1672 ! FUNCTION: RegisterMessagePumpHook
1673 FUNCTION: BOOL RegisterRawInputDevices ( PCRAWINPUTDEVICE pRawInputDevices, UINT uiNumDevices, UINT cbSize ) ;
1674 ! FUNCTION: RegisterServicesProcess
1675 ! FUNCTION: RegisterShellHookWindow
1676 ! FUNCTION: RegisterSystemThread
1677 ! FUNCTION: RegisterTasklist
1678 ! FUNCTION: RegisterUserApiHook
1679 ! FUNCTION: RegisterWindowMessageA
1680 ! FUNCTION: RegisterWindowMessageW
1681 FUNCTION: BOOL ReleaseCapture ( ) ;
1682 FUNCTION: int ReleaseDC ( HWND hWnd, HDC hDC ) ;
1683 ! FUNCTION: RemoveMenu
1684 ! FUNCTION: RemovePropA
1685 ! FUNCTION: RemovePropW
1686 ! FUNCTION: ReplyMessage
1687 ! FUNCTION: ResolveDesktopForWOW
1688 ! FUNCTION: ReuseDDElParam
1689 ! FUNCTION: ScreenToClient
1690 ! FUNCTION: ScrollChildren
1691 ! FUNCTION: ScrollDC
1692 ! FUNCTION: ScrollWindow
1693 ! FUNCTION: ScrollWindowEx
1694 ! FUNCTION: SendDlgItemMessageA
1695 ! FUNCTION: SendDlgItemMessageW
1696 ! FUNCTION: SendIMEMessageExA
1697 ! FUNCTION: SendIMEMessageExW
1698 ! FUNCTION: UINT SendInput ( UINT nInputs, LPINPUT pInputs, int cbSize ) ;
1699 FUNCTION: LRESULT SendMessageW ( HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam ) ;
1700 ALIAS: SendMessage SendMessageW
1701 ! FUNCTION: SendMessageCallbackA
1702 ! FUNCTION: SendMessageCallbackW
1703 ! FUNCTION: SendMessageTimeoutA
1704 ! FUNCTION: SendMessageTimeoutW
1705 ! FUNCTION: SendNotifyMessageA
1706 ! FUNCTION: SendNotifyMessageW
1707 ! FUNCTION: SetActiveWindow
1708 FUNCTION: HWND SetCapture ( HWND hWnd ) ;
1709 ! FUNCTION: SetCaretBlinkTime
1710 ! FUNCTION: SetCaretPos
1711
1712 FUNCTION: ULONG_PTR SetClassLongW ( HWND hWnd, int nIndex, LONG_PTR dwNewLong ) ;
1713 ALIAS: SetClassLongPtr SetClassLongW
1714 ALIAS: SetClassLong SetClassLongW
1715
1716 ! FUNCTION: SetClassWord
1717 FUNCTION: HANDLE SetClipboardData ( UINT uFormat, HANDLE hMem ) ;
1718 ! FUNCTION: SetClipboardViewer
1719 ! FUNCTION: SetConsoleReserveKeys
1720 ! FUNCTION: SetCursor
1721 ! FUNCTION: SetCursorContents
1722 ! FUNCTION: SetCursorPos
1723 ! FUNCTION: SetDebugErrorLevel
1724 ! FUNCTION: SetDeskWallpaper
1725 ! FUNCTION: SetDlgItemInt
1726 ! FUNCTION: SetDlgItemTextA
1727 ! FUNCTION: SetDlgItemTextW
1728 ! FUNCTION: SetDoubleClickTime
1729 FUNCTION: HWND SetFocus ( HWND hWnd ) ;
1730 FUNCTION: BOOL SetForegroundWindow ( HWND hWnd ) ;
1731 ! FUNCTION: SetInternalWindowPos
1732 ! FUNCTION: SetKeyboardState
1733 ! type is ignored
1734 FUNCTION: void SetLastErrorEx ( DWORD dwErrCode, DWORD dwType ) ; 
1735 : SetLastError ( errcode -- ) 0 SetLastErrorEx ; inline
1736 ! FUNCTION: SetLayeredWindowAttributes
1737 ! FUNCTION: SetLogonNotifyWindow
1738 ! FUNCTION: SetMenu
1739 ! FUNCTION: SetMenuContextHelpId
1740 ! FUNCTION: SetMenuDefaultItem
1741 ! FUNCTION: SetMenuInfo
1742 ! FUNCTION: SetMenuItemBitmaps
1743 ! FUNCTION: SetMenuItemInfoA
1744 ! FUNCTION: SetMenuItemInfoW
1745 ! FUNCTION: SetMessageExtraInfo
1746 ! FUNCTION: SetMessageQueue
1747 ! FUNCTION: SetParent
1748 ! FUNCTION: SetProcessDefaultLayout
1749 ! FUNCTION: SetProcessWindowStation
1750 ! FUNCTION: SetProgmanWindow
1751 ! FUNCTION: SetPropA
1752 ! FUNCTION: SetPropW
1753 ! FUNCTION: SetRect
1754 ! FUNCTION: SetRectEmpty
1755 ! FUNCTION: SetScrollInfo
1756 ! FUNCTION: SetScrollPos
1757 ! FUNCTION: SetScrollRange
1758 ! FUNCTION: SetShellWindow
1759 ! FUNCTION: SetShellWindowEx
1760 ! FUNCTION: SetSysColors
1761 ! FUNCTION: SetSysColorsTemp
1762 ! FUNCTION: SetSystemCursor
1763 ! FUNCTION: SetSystemMenu
1764 ! FUNCTION: SetSystemTimer
1765 ! FUNCTION: SetTaskmanWindow
1766 ! FUNCTION: SetThreadDesktop
1767 ! FUNCTION: SetTimer
1768 ! FUNCTION: SetUserObjectInformationA
1769 ! FUNCTION: SetUserObjectInformationW
1770 ! FUNCTION: SetUserObjectSecurity
1771 ! FUNCTION: SetWindowContextHelpId
1772 ! FUNCTION: SetWindowLongA
1773 ! FUNCTION: SetWindowLongW
1774 FUNCTION: LONG_PTR SetWindowLongW ( HANDLE hWnd, int index, LONG_PTR dwNewLong ) ;
1775 ALIAS: SetWindowLong SetWindowLongW
1776 ! FUNCTION: SetWindowPlacement
1777 FUNCTION: BOOL SetWindowPos ( HWND hWnd, HWND hWndInsertAfter, int X, int Y, int cx, int cy, UINT uFlags ) ;
1778
1779 FUNCTION: LONG_PTR SetWindowLongPtrW ( HWND hWnd, int nIndex, LONG_PTR dwNewLong ) ;
1780 ALIAS: SetWindowLongPtr SetWindowLongPtrW
1781
1782 : HWND_BOTTOM ( -- alien ) 1 <alien> ;
1783 : HWND_NOTOPMOST ( -- alien ) -2 <alien> ;
1784 CONSTANT: HWND_TOP f
1785 : HWND_TOPMOST ( -- alien ) -1 <alien> ;
1786
1787 ! FUNCTION: SetWindowRgn
1788 ! FUNCTION: SetWindowsHookA
1789 ! FUNCTION: SetWindowsHookExA
1790 ! FUNCTION: SetWindowsHookExW
1791 ! FUNCTION: SetWindowsHookW
1792 ! FUNCTION: SetWindowStationUser
1793 ! FUNCTION: SetWindowTextA
1794 ! FUNCTION: SetWindowTextW
1795 ! FUNCTION: SetWindowWord
1796 ! FUNCTION: SetWinEventHook
1797 ! FUNCTION: ShowCaret
1798 FUNCTION: int ShowCursor ( BOOL show ) ;
1799 ! FUNCTION: ShowOwnedPopups
1800 ! FUNCTION: ShowScrollBar
1801 ! FUNCTION: ShowStartGlass
1802
1803 FUNCTION: BOOL ShowWindow ( HWND hWnd, int nCmdShow ) ;
1804
1805 ! FUNCTION: ShowWindowAsync
1806 ! FUNCTION: SoftModalMessageBox
1807 ! FUNCTION: SubtractRect
1808 ! FUNCTION: SwapMouseButton
1809 ! FUNCTION: SwitchDesktop
1810 ! FUNCTION: SwitchToThisWindow
1811 ! FUNCTION: SystemParametersInfoA
1812
1813 FUNCTION: BOOL SystemParametersInfoW ( UINT uiAction, UINT uiParam, PVOID pvParam, UINT fWinIni ) ;
1814 ALIAS: SystemParametersInfo SystemParametersInfoW
1815
1816 ! FUNCTION: TabbedTextOutA
1817 ! FUNCTION: TabbedTextOutW
1818 ! FUNCTION: TileChildWindows
1819 ! FUNCTION: TileWindows
1820 ! FUNCTION: ToAscii
1821 ! FUNCTION: ToAsciiEx
1822 ! FUNCTION: ToUnicode
1823 ! FUNCTION: ToUnicodeEx
1824 FUNCTION: BOOL TrackMouseEvent ( LPTRACKMOUSEEVENT lpEventTrack ) ;
1825 ! FUNCTION: TrackPopupMenu
1826 ! FUNCTION: TrackPopupMenuEx
1827 ! FUNCTION: TranslateAccelerator
1828 ! FUNCTION: TranslateAcceleratorA
1829 FUNCTION: int TranslateAcceleratorW ( HWND hWnd, HACCEL hAccTable, LPMSG lpMsg ) ;
1830 ALIAS: TranslateAccelerator TranslateAcceleratorW
1831
1832 ! FUNCTION: TranslateMDISysAccel
1833 FUNCTION: BOOL TranslateMessage ( MSG* lpMsg ) ;
1834
1835 ! FUNCTION: UnhookWindowsHook
1836 ! FUNCTION: UnhookWindowsHookEx
1837 ! FUNCTION: UnhookWinEvent
1838 ! FUNCTION: UnionRect
1839 ! FUNCTION: UnloadKeyboardLayout
1840 ! FUNCTION: UnlockWindowStation
1841 ! FUNCTION: UnpackDDElParam
1842 FUNCTION: BOOL UnregisterClassW ( LPCWSTR lpClassName, HINSTANCE hInstance ) ;
1843 ALIAS: UnregisterClass UnregisterClassW
1844 FUNCTION: BOOL UnregisterDeviceNotification ( HANDLE hDevNotify ) ;
1845 ! FUNCTION: UnregisterHotKey
1846 ! FUNCTION: UnregisterMessagePumpHook
1847 ! FUNCTION: UnregisterUserApiHook
1848 ! FUNCTION: UpdateLayeredWindow
1849 ! FUNCTION: UpdatePerUserSystemParameters
1850
1851 FUNCTION: BOOL UpdateWindow ( HWND hWnd ) ;
1852
1853 ! FUNCTION: User32InitializeImmEntryTable
1854 ! FUNCTION: UserClientDllInitialize
1855 ! FUNCTION: UserHandleGrantAccess
1856 ! FUNCTION: UserLpkPSMTextOut
1857 ! FUNCTION: UserLpkTabbedTextOut
1858 ! FUNCTION: UserRealizePalette
1859 ! FUNCTION: UserRegisterWowHandlers
1860 ! FUNCTION: ValidateRect
1861 ! FUNCTION: ValidateRgn
1862 ! FUNCTION: VkKeyScanA
1863 ! FUNCTION: VkKeyScanExA
1864 ! FUNCTION: VkKeyScanExW
1865 ! FUNCTION: VkKeyScanW
1866 ! FUNCTION: VRipOutput
1867 ! FUNCTION: VTagOutput
1868 ! FUNCTION: WaitForInputIdle
1869 ! FUNCTION: WaitMessage
1870 ! FUNCTION: WCSToMBEx
1871 ! FUNCTION: Win32PoolAllocationStats
1872 ! FUNCTION: WindowFromDC
1873 ! FUNCTION: WindowFromPoint
1874 ! FUNCTION: WinHelpA
1875 ! FUNCTION: WinHelpW
1876 ! FUNCTION: WINNLSEnableIME
1877 ! FUNCTION: WINNLSGetEnableStatus
1878 ! FUNCTION: WINNLSGetIMEHotkey
1879 ! FUNCTION: wsprintfA
1880 ! FUNCTION: wsprintfW
1881 ! FUNCTION: wvsprintfA
1882 ! FUNCTION: wvsprintfW
1883
1884 : msgbox ( str -- )
1885     f swap "DebugMsg" MB_OK MessageBox drop ;