[winetests]
[reactos.git] / rostests / winetests / user32 / dialog.c
1 /* Unit test suite for the dialog functions.
2 *
3 * Copyright 2004 Bill Medland
4 *
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
9 *
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
14 *
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
18 *
19 *
20 *
21 * This test suite currently works by building a quite complex hierarchy of
22 * objects in a variety of styles and then performs a limited number of tests
23 * for the previous and next dialog group or tab items.
24 *
25 * The test specifically does not test all possibilities at this time since
26 * there are several cases where the Windows behaviour is rather strange and
27 * significant work would be required to get the Wine code to duplicate the
28 * strangeness, especially since most are in situations that would not
29 * normally be met.
30 */
31
32 #include <assert.h>
33 #include <stdio.h>
34 #include <stdarg.h>
35
36 #include "wine/test.h"
37 #include "windef.h"
38 #include "winbase.h"
39 #include "wingdi.h"
40 #include "winuser.h"
41
42 #define MAXHWNDS 1024
43 static HWND hwnd [MAXHWNDS];
44 static unsigned int numwnds=1; /* 0 is reserved for null */
45
46 /* Global handles */
47 static HINSTANCE g_hinst; /* This application's HINSTANCE */
48 static HWND g_hwndMain, g_hwndButton1, g_hwndButton2, g_hwndButtonCancel;
49 static HWND g_hwndTestDlg, g_hwndTestDlgBut1, g_hwndTestDlgBut2, g_hwndTestDlgEdit;
50 static HWND g_hwndInitialFocusT1, g_hwndInitialFocusT2, g_hwndInitialFocusGroupBox;
51
52 static LONG g_styleInitialFocusT1, g_styleInitialFocusT2;
53 static BOOL g_bInitialFocusInitDlgResult;
54
55 static int g_terminated;
56
57 typedef struct {
58 INT_PTR id;
59 int parent;
60 DWORD style;
61 DWORD exstyle;
62 } h_entry;
63
64 static const h_entry hierarchy [] = {
65 /* 0 is reserved for the null window */
66 { 1, 0, WS_OVERLAPPEDWINDOW | WS_CLIPSIBLINGS, WS_EX_WINDOWEDGE},
67 { 20, 1, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
68 { 2, 1, WS_CHILD | WS_VISIBLE, WS_EX_CONTROLPARENT},
69 { 60, 2, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
70 /* What happens with groups when the parent is disabled */
71 { 8, 2, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_TABSTOP, WS_EX_CONTROLPARENT},
72 { 85, 8, WS_CHILD | WS_VISIBLE | WS_TABSTOP | WS_GROUP, 0},
73 { 9, 8, WS_CHILD, WS_EX_CONTROLPARENT},
74 { 86, 9, WS_CHILD | WS_VISIBLE, 0},
75 { 87, 9, WS_CHILD | WS_VISIBLE, 0},
76 { 31, 8, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
77 { 10, 2, WS_CHILD | WS_VISIBLE, WS_EX_CONTROLPARENT},
78 { 88, 10, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
79 { 11, 10, WS_CHILD, WS_EX_CONTROLPARENT},
80 { 89, 11, WS_CHILD | WS_VISIBLE, 0},
81 { 32, 11, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
82 { 90, 11, WS_CHILD | WS_VISIBLE, 0},
83 { 33, 10, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
84 { 21, 2, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
85 { 61, 2, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
86 { 3, 1, WS_CHILD | WS_VISIBLE | DS_CONTROL, 0},
87 { 22, 3, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
88 { 62, 3, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
89 { 7, 3, WS_CHILD | WS_VISIBLE, WS_EX_CONTROLPARENT},
90 { 4, 7, WS_CHILD | WS_VISIBLE | DS_CONTROL, 0},
91 { 83, 4, WS_CHILD | WS_VISIBLE, 0},
92 { 5, 4, WS_CHILD | WS_VISIBLE | DS_CONTROL, 0},
93 /* A couple of controls around the main dialog */
94 { 29, 5, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
95 { 81, 5, WS_CHILD | WS_VISIBLE, 0},
96 /* The main dialog with lots of controls */
97 { 6, 5, WS_CHILD | WS_VISIBLE, WS_EX_CONTROLPARENT},
98 /* At the start of a dialog */
99 /* Disabled controls are skipped */
100 { 63, 6, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_TABSTOP, 0},
101 /* Invisible controls are skipped */
102 { 64, 6, WS_CHILD | WS_TABSTOP, 0},
103 /* Invisible disabled controls are skipped */
104 { 65, 6, WS_CHILD | WS_DISABLED | WS_TABSTOP, 0},
105 /* Non-tabstop controls are skipped for tabs but not for groups */
106 { 66, 6, WS_CHILD | WS_VISIBLE, 0},
107 /* End of first group, with no tabstops in it */
108 { 23, 6, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
109 /* At last a tabstop */
110 { 67, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
111 /* A group that is totally disabled or invisible */
112 { 24, 6, WS_CHILD | WS_DISABLED | WS_GROUP, 0},
113 { 68, 6, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_TABSTOP, 0},
114 { 69, 6, WS_CHILD | WS_TABSTOP, 0},
115 /* A valid group in the middle of the dialog (not the first nor last group*/
116 { 25, 6, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
117 /* A non-tabstop item will be skipped for tabs */
118 { 70, 6, WS_CHILD | WS_VISIBLE, 0},
119 /* A disabled item will be skipped for tabs and groups */
120 { 71, 6, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_TABSTOP, 0},
121 /* A valid item will be found for tabs and groups */
122 { 72, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
123 /* A disabled item to skip when looking for the next group item */
124 { 73, 6, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_TABSTOP, 0},
125 /* The next group begins with an enabled visible label */
126 { 26, 6, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
127 { 74, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
128 { 75, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
129 /* That group is terminated by a disabled label */
130 { 27, 6, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_GROUP, 0},
131 { 76, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
132 { 77, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
133 /* That group is terminated by an invisible label */
134 { 28, 6, WS_CHILD | WS_GROUP, 0},
135 /* The end of the dialog with item for loop and recursion testing */
136 { 78, 6, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
137 /* No tabstop so skipped for prev tab, but found for prev group */
138 { 79, 6, WS_CHILD | WS_VISIBLE, 0},
139 { 80, 6, WS_CHILD | WS_VISIBLE | WS_DISABLED | WS_TABSTOP, 0},
140 /* A couple of controls after the main dialog */
141 { 82, 5, WS_CHILD | WS_VISIBLE, 0},
142 { 30, 5, WS_CHILD | WS_VISIBLE | WS_GROUP, 0},
143 /* And around them */
144 { 84, 4, WS_CHILD | WS_VISIBLE | WS_TABSTOP, 0},
145 {0, 0, 0, 0}
146 };
147
148 static BOOL CreateWindows (HINSTANCE hinst)
149 {
150 const h_entry *p = hierarchy;
151
152 while (p->id != 0)
153 {
154 DWORD style, exstyle;
155 char ctrlname[9];
156
157 /* Basically assert that the hierarchy is valid and track the
158 * maximum control number
159 */
160 if (p->id >= numwnds)
161 {
162 if (p->id >= sizeof(hwnd)/sizeof(hwnd[0]))
163 {
164 trace ("Control %ld is out of range\n", p->id);
165 return FALSE;
166 }
167 else
168 numwnds = p->id+1;
169 }
170 if (p->id <= 0)
171 {
172 trace ("Control %ld is out of range\n", p->id);
173 return FALSE;
174 }
175 if (hwnd[p->id] != 0)
176 {
177 trace ("Control %ld is used more than once\n", p->id);
178 return FALSE;
179 }
180
181 /* Create the control */
182 sprintf (ctrlname, "ctrl%4.4ld", p->id);
183 hwnd[p->id] = CreateWindowEx (p->exstyle, TEXT(p->parent ? "static" : "GetNextDlgItemWindowClass"), TEXT(ctrlname), p->style, 10, 10, 10, 10, hwnd[p->parent], p->parent ? (HMENU) (2000 + p->id) : 0, hinst, 0);
184 if (!hwnd[p->id])
185 {
186 trace ("Failed to create control %ld\n", p->id);
187 return FALSE;
188 }
189
190 /* Check that the styles are as we specified (except the main one
191 * which is quite frequently messed up). If this keeps breaking then
192 * we could mask out the bits that don't concern us.
193 */
194 if (p->parent)
195 {
196 style = GetWindowLong (hwnd[p->id], GWL_STYLE);
197 exstyle = GetWindowLong (hwnd[p->id], GWL_EXSTYLE);
198 if (style != p->style || exstyle != p->exstyle)
199 {
200 trace ("Style mismatch at %ld: %8.8x %8.8x cf %8.8x %8.8x\n", p->id, style, exstyle, p->style, p->exstyle);
201 }
202 }
203 p++;
204 }
205
206 return TRUE;
207 }
208
209 /* Form the lParam of a WM_KEYDOWN message */
210 static DWORD KeyDownData (int repeat, int scancode, int extended, int wasdown)
211 {
212 return ((repeat & 0x0000FFFF) | ((scancode & 0x00FF) >> 16) |
213 (extended ? 0x01000000 : 0) | (wasdown ? 0x40000000 : 0));
214 }
215
216 /* Form a WM_KEYDOWN VK_TAB message to the specified window */
217 static void FormTabMsg (MSG *pMsg, HWND hwnd)
218 {
219 pMsg->hwnd = hwnd;
220 pMsg->message = WM_KEYDOWN;
221 pMsg->wParam = VK_TAB;
222 pMsg->lParam = KeyDownData (1, 0x0F, 0, 0);
223 /* pMsg->time is not set. It shouldn't be needed */
224 /* pMsg->pt is ignored */
225 }
226
227 /* Form a WM_KEYDOWN VK_RETURN message to the specified window */
228 static void FormEnterMsg (MSG *pMsg, HWND hwnd)
229 {
230 pMsg->hwnd = hwnd;
231 pMsg->message = WM_KEYDOWN;
232 pMsg->wParam = VK_RETURN;
233 pMsg->lParam = KeyDownData (1, 0x1C, 0, 0);
234 /* pMsg->time is not set. It shouldn't be needed */
235 /* pMsg->pt is ignored */
236 }
237
238 /***********************************************************************
239 *
240 * The actual tests
241 */
242
243 typedef struct
244 {
245 int isok; /* or is it todo */
246 int test;
247 int dlg;
248 int ctl;
249 int tab;
250 int prev;
251 int res;
252 } test_record;
253
254 static int id (HWND h)
255 {
256 unsigned int i;
257 for (i = 0; i < numwnds; i++)
258 if (hwnd[i] == h)
259 return i;
260 return -1;
261 }
262
263 /* Tests
264 *
265 * Tests 1-8 test the hCtl argument of null or the dialog itself.
266 *
267 * 1. Prev Group of null is null
268 * 2. Prev Tab of null is null
269 * 3. Prev Group of hDlg in hDlg is null
270 * 4. Prev Tab of hDlg in hDlg is null
271 * 5. Next Group of null is first visible enabled child
272 * Check it skips invisible, disabled and both.
273 * 6. Next Tab of null is first visible enabled tabstop
274 * Check it skips invisible, disabled, nontabstop, and in combination.
275 * 7. Next Group of hDlg in hDlg is as of null
276 * 8. Next Tab of hDlg in hDlg is as of null
277 *
278 * Tests 9-14 test descent
279 *
280 * 9. DS_CONTROL does not result in descending the hierarchy for Tab Next
281 * 10. DS_CONTROL does not result in descending the hierarchy for Group Next
282 * 11. WS_EX_CONTROLPARENT results in descending the hierarchy for Tab Next
283 * 12. WS_EX_CONTROLPARENT results in descending the hierarchy for Group Next
284 * 13. WS_EX_CONTROLPARENT results in descending the hierarchy for Tab Prev
285 * 14. WS_EX_CONTROLPARENT results in descending the hierarchy for Group Prev
286 *
287 * Tests 15-24 are the basic Prev/Next Group tests
288 *
289 * 15. Next Group of a visible enabled non-group control is the next visible
290 * enabled non-group control, if there is one before the next group
291 * 16. Next Group of a visible enabled non-group control wraps around to the
292 * beginning of the group on finding a control that starts another group.
293 * Note that the group is in the middle of the dialog.
294 * 17. As 16 except note that the next group is started with a disabled
295 * visible control.
296 * 18. As 16 except note that the next group is started with an invisible
297 * enabled control.
298 * 19. Next Group wraps around the controls of the dialog
299 * 20. Next Group is the same even if the initial control is disabled.
300 * 21. Next Group is the same even if the initial control is invisible.
301 * 22. Next Group is the same even if the initial control has the group style
302 * 23. Next Group returns the initial control if there is no visible enabled
303 * control in the group. (Initial control disabled and not group style).
304 * 24. Prev version of test 16.
305 * Prev Group of a visible enabled non-group control wraps around to the
306 * beginning of the group on finding a control that starts the group.
307 * Note that the group is in the middle of the dialog.
308 *
309 * In tests 25 to 28 the control is sitting under dialogs which do not have
310 * the WS_EX_CONTROLPARENT style and so cannot be reached from the top of
311 * the dialog.
312 *
313 * 25. Next Group of an inaccessible control is as if it were accessible
314 * 26. Prev Group of an inaccessible control begins searching at the highest
315 * level ancestor that did not permit recursion down the hierarchy
316 * 27. Next Tab of an inaccessible control is as if it were accessible
317 * 28. Prev Tab of an inaccessible control begins searching at the highest
318 * level ancestor that did not permit recursion down the hierarchy.
319 *
320 * Tests 29- are the basic Tab tests
321 *
322 * 29. Next Tab of a control is the next visible enabled control with the
323 * Tabstop style (N.B. skips disabled, invisible and non-tabstop)
324 * 30. Prev Tab of a control is the previous visible enabled control with the
325 * Tabstop style (N.B. skips disabled, invisible and non-tabstop)
326 * 31. Next Tab test with at least two layers of descent and finding the
327 * result not at the first control.
328 * 32. Next Tab test with at least two layers of descent with the descent and
329 * control at the start of each level.
330 * 33. Prev Tab test with at least two layers of descent and finding the
331 * result not at the last control.
332 * 34. Prev Tab test with at least two layers of descent with the descent and
333 * control at the end of each level.
334 *
335 * 35. Passing NULL may result in the first child being the one returned.
336 * (group test)
337 * 36. Passing NULL may result in the first child being the one returned.
338 * (tab test)
339 */
340
341 static void GetNextDlgItemTest (void)
342 {
343 static test_record test [] =
344 {
345 /* isok test dlg ctl tab prev res */
346
347 { 1, 1, 6, 0, 0, 1, 0},
348 { 1, 2, 6, 0, 1, 1, 0},
349 { 1, 3, 6, 6, 0, 1, 0},
350 { 1, 4, 6, 6, 1, 1, 0},
351 { 1, 5, 6, 0, 0, 0, 66},
352 { 1, 6, 6, 0, 1, 0, 67},
353 { 1, 7, 6, 6, 0, 0, 66},
354 { 1, 8, 6, 6, 1, 0, 67},
355
356 { 1, 9, 4, 83, 1, 0, 84},
357 { 1, 10, 4, 83, 0, 0, 5},
358 { 1, 11, 5, 81, 1, 0, 67},
359 { 1, 12, 5, 81, 0, 0, 66},
360 { 1, 13, 5, 82, 1, 1, 78},
361
362 { 1, 14, 5, 82, 0, 1, 79},
363 { 1, 15, 6, 70, 0, 0, 72},
364 { 1, 16, 6, 72, 0, 0, 25},
365 { 1, 17, 6, 75, 0, 0, 26},
366 { 1, 18, 6, 77, 0, 0, 76},
367 { 1, 19, 6, 79, 0, 0, 66},
368 { 1, 20, 6, 71, 0, 0, 72},
369 { 1, 21, 6, 64, 0, 0, 66},
370
371 { 1, 22, 6, 25, 0, 0, 70},
372 { 1, 23, 6, 68, 0, 0, 68},
373 { 1, 24, 6, 25, 0, 1, 72},
374 { 1, 25, 1, 70, 0, 0, 72},
375 /*{ 0, 26, 1, 70, 0, 1, 3}, Crashes Win95*/
376 { 1, 27, 1, 70, 1, 0, 72},
377 /*{ 0, 28, 1, 70, 1, 1, 61}, Crashes Win95*/
378
379 { 1, 29, 6, 67, 1, 0, 72},
380 { 1, 30, 6, 72, 1, 1, 67},
381
382 { 1, 35, 2, 0, 0, 0, 60},
383 { 1, 36, 2, 0, 1, 0, 60},
384
385 { 0, 0, 0, 0, 0, 0, 0} /* End of test */
386 };
387 const test_record *p = test;
388
389 ok (CreateWindows (g_hinst), "Could not create test windows\n");
390
391 while (p->dlg)
392 {
393 HWND a;
394 a = (p->tab ? GetNextDlgTabItem : GetNextDlgGroupItem) (hwnd[p->dlg], hwnd[p->ctl], p->prev);
395 if (p->isok)
396 {
397 ok (a == hwnd[p->res], "Test %d: %s %s item of %d in %d was %d instead of %d\n", p->test, p->prev ? "Prev" : "Next", p->tab ? "Tab" : "Group", p->ctl, p->dlg, id(a), p->res);
398 }
399 else
400 {
401 todo_wine
402 {
403 ok (a == hwnd[p->res], "Test %d: %s %s item of %d in %d was actually %d matching expected %d\n", p->test, p->prev ? "Prev" : "Next", p->tab ? "Tab" : "Group", p->ctl, p->dlg, id(a), p->res);
404 }
405 }
406 p++;
407 }
408 }
409
410 /*
411 * OnMainWindowCreate
412 */
413 static BOOL OnMainWindowCreate (HWND hwnd, LPCREATESTRUCT lpcs)
414 {
415 g_hwndButton1 = CreateWindow (TEXT("button"), TEXT("Button &1"),
416 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_DEFPUSHBUTTON | BS_TEXT,
417 10, 10, 80, 80, hwnd, (HMENU)100, g_hinst, 0);
418 if (!g_hwndButton1) return FALSE;
419
420 g_hwndButton2 = CreateWindow (TEXT("button"), TEXT("Button &2"),
421 WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON | BS_TEXT,
422 110, 10, 80, 80, hwnd, (HMENU)200, g_hinst, 0);
423 if (!g_hwndButton2) return FALSE;
424
425 g_hwndButtonCancel = CreateWindow (TEXT("button"), TEXT("Cancel"),
426 WS_CHILD | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON | BS_TEXT,
427 210, 10, 80, 80, hwnd, (HMENU)IDCANCEL, g_hinst, 0);
428 if (!g_hwndButtonCancel) return FALSE;
429
430 return TRUE;
431 }
432
433
434 /*
435 * OnTestDlgCreate
436 */
437
438 static BOOL OnTestDlgCreate (HWND hwnd, LPCREATESTRUCT lpcs)
439 {
440 g_hwndTestDlgEdit = CreateWindowEx ( WS_EX_LEFT | WS_EX_LTRREADING |
441 WS_EX_RIGHTSCROLLBAR | WS_EX_NOPARENTNOTIFY | WS_EX_CLIENTEDGE,
442 TEXT("Edit"), TEXT("Edit"),
443 WS_CHILDWINDOW | WS_VISIBLE | WS_TABSTOP | ES_LEFT | ES_AUTOHSCROLL,
444 16,33,184,24, hwnd, (HMENU)101, g_hinst, 0);
445 if (!g_hwndTestDlgEdit) return FALSE;
446
447 g_hwndTestDlgBut1 = CreateWindowEx ( WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR
448 | WS_EX_NOPARENTNOTIFY,
449 TEXT("button"), TEXT("Button &1"),
450 WS_CHILDWINDOW | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON | BS_TEXT,
451 204,33,30,24, hwnd, (HMENU)201, g_hinst, 0);
452 if (!g_hwndTestDlgBut1) return FALSE;
453
454 g_hwndTestDlgBut2 = CreateWindowEx ( WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR
455 | WS_EX_NOPARENTNOTIFY, TEXT("button"),
456 TEXT("Button &2"),
457 WS_CHILDWINDOW | WS_VISIBLE | WS_TABSTOP | BS_PUSHBUTTON | BS_TEXT,
458 90,102,80,24, hwnd, (HMENU)IDCANCEL, g_hinst, 0);
459 if (!g_hwndTestDlgBut2) return FALSE;
460
461 return TRUE;
462 }
463
464 static LRESULT CALLBACK main_window_procA (HWND hwnd, UINT uiMsg, WPARAM wParam,
465 LPARAM lParam)
466 {
467 switch (uiMsg)
468 {
469 /* Add blank case statements for these to ensure we don't use them
470 * by mistake.
471 */
472 case DM_GETDEFID: break;
473 case DM_SETDEFID: break;
474
475 case WM_CREATE:
476 return (OnMainWindowCreate (hwnd,
477 (LPCREATESTRUCTA) lParam) ? 0 : (LRESULT) -1);
478 case WM_COMMAND:
479 if (wParam == IDCANCEL)
480 {
481 g_terminated = TRUE;
482 return 0;
483 }
484 break;
485 }
486
487 return DefWindowProcA (hwnd, uiMsg, wParam, lParam);
488 }
489
490 static LRESULT CALLBACK disabled_test_proc (HWND hwnd, UINT uiMsg,
491 WPARAM wParam, LPARAM lParam)
492 {
493 switch (uiMsg)
494 {
495 case WM_INITDIALOG:
496 {
497 DWORD dw;
498 HWND hwndOk;
499
500 dw = SendMessage(hwnd, DM_GETDEFID, 0, 0);
501 assert(DC_HASDEFID == HIWORD(dw));
502 hwndOk = GetDlgItem(hwnd, LOWORD(dw));
503 assert(hwndOk);
504 EnableWindow(hwndOk, FALSE);
505
506 PostMessage(hwnd, WM_KEYDOWN, VK_RETURN, 0);
507 PostMessage(hwnd, WM_COMMAND, IDCANCEL, 0);
508 break;
509 }
510 case WM_COMMAND:
511 if (wParam == IDOK)
512 {
513 g_terminated = TRUE;
514 EndDialog(hwnd, 0);
515 return 0;
516 }
517 else if (wParam == IDCANCEL)
518 {
519 EndDialog(hwnd, 0);
520 return 0;
521 }
522 break;
523 }
524
525 return DefWindowProcA (hwnd, uiMsg, wParam, lParam);
526 }
527
528 static LRESULT CALLBACK testDlgWinProc (HWND hwnd, UINT uiMsg, WPARAM wParam,
529 LPARAM lParam)
530 {
531 switch (uiMsg)
532 {
533 /* Add blank case statements for these to ensure we don't use them
534 * by mistake.
535 */
536 case DM_GETDEFID: break;
537 case DM_SETDEFID: break;
538
539 case WM_CREATE:
540 return (OnTestDlgCreate (hwnd,
541 (LPCREATESTRUCTA) lParam) ? 0 : (LRESULT) -1);
542 }
543
544 return DefDlgProcA (hwnd, uiMsg, wParam, lParam);
545 }
546
547 static BOOL RegisterWindowClasses (void)
548 {
549 WNDCLASSA cls;
550
551 cls.style = 0;
552 cls.lpfnWndProc = DefWindowProcA;
553 cls.cbClsExtra = 0;
554 cls.cbWndExtra = 0;
555 cls.hInstance = g_hinst;
556 cls.hIcon = NULL;
557 cls.hCursor = LoadCursorA (NULL, IDC_ARROW);
558 cls.hbrBackground = (HBRUSH)(COLOR_WINDOW + 1);
559 cls.lpszMenuName = NULL;
560 cls.lpszClassName = "GetNextDlgItemWindowClass";
561
562 if (!RegisterClassA (&cls)) return FALSE;
563
564 cls.lpfnWndProc = main_window_procA;
565 cls.lpszClassName = "IsDialogMessageWindowClass";
566
567 if (!RegisterClassA (&cls)) return FALSE;
568
569 GetClassInfoA(0, "#32770", &cls);
570 cls.lpfnWndProc = testDlgWinProc;
571 cls.lpszClassName = "WM_NEXTDLGCTLWndClass";
572 if (!RegisterClassA (&cls)) return FALSE;
573
574 return TRUE;
575 }
576
577 static void WM_NEXTDLGCTLTest(void)
578 {
579 DWORD dwVal;
580
581 g_hwndTestDlg = CreateWindowEx( WS_EX_LEFT | WS_EX_LTRREADING | WS_EX_RIGHTSCROLLBAR
582 | WS_EX_DLGMODALFRAME | WS_EX_WINDOWEDGE | WS_EX_CONTROLPARENT | WS_EX_APPWINDOW,
583 "WM_NEXTDLGCTLWndClass",
584 "WM_NEXTDLGCTL Message test window",
585 WS_POPUPWINDOW | WS_CLIPSIBLINGS | WS_DLGFRAME | WS_OVERLAPPED |
586 WS_MINIMIZEBOX | WS_MAXIMIZEBOX | DS_3DLOOK | DS_SETFONT | DS_MODALFRAME,
587 0, 0, 235, 135,
588 NULL, NULL, g_hinst, 0);
589
590 assert (g_hwndTestDlg);
591 assert (g_hwndTestDlgBut1);
592 assert (g_hwndTestDlgBut2);
593 assert (g_hwndTestDlgEdit);
594
595 /*
596 * Test message DM_SETDEFID
597 */
598
599 DefDlgProcA( g_hwndTestDlg, DM_SETDEFID, IDCANCEL, 0 );
600 DefDlgProcA( g_hwndTestDlgBut1, BM_SETSTYLE, BS_DEFPUSHBUTTON, FALSE );
601 dwVal = DefDlgProcA(g_hwndTestDlg, DM_GETDEFID, 0, 0);
602
603 ok ( IDCANCEL == (LOWORD(dwVal)), "Did not set default ID\n" );
604
605 /*
606 * Check whether message WM_NEXTDLGCTL is changing the focus to next control and if
607 * the destination control is a button, style of the button should be changed to
608 * BS_DEFPUSHBUTTON with out making it default.
609 */
610
611 /*
612 * Keep the focus on Edit control.
613 */
614
615 if ( SetFocus( g_hwndTestDlgEdit ) )
616 {
617 ok ((GetFocus() == g_hwndTestDlgEdit), "Focus didn't set on Edit control\n");
618
619 /*
620 * Test message WM_NEXTDLGCTL
621 */
622 DefDlgProcA( g_hwndTestDlg, WM_NEXTDLGCTL, 0, 0 );
623 ok ((GetFocus() == g_hwndTestDlgBut1), "Focus didn't move to first button\n");
624
625 /*
626 * Check whether the default button ID got changed by sending message "WM_NEXTDLGCTL"
627 */
628 dwVal = DefDlgProcA(g_hwndTestDlg, DM_GETDEFID, 0, 0);
629 ok ( IDCANCEL == (LOWORD(dwVal)), "WM_NEXTDLGCTL changed default button\n");
630
631 /*
632 * Check whether the style of the button which got the focus, changed to BS_DEFPUSHBUTTON and
633 * the style of default button changed to BS_PUSHBUTTON.
634 */
635 if ( IDCANCEL == (LOWORD(dwVal)) )
636 {
637 ok ( ((GetWindowLong( g_hwndTestDlgBut1, GWL_STYLE)) & BS_DEFPUSHBUTTON),
638 "Button1 style not set to BS_DEFPUSHBUTTON\n" );
639
640 ok ( !((GetWindowLong( g_hwndTestDlgBut2, GWL_STYLE)) & BS_DEFPUSHBUTTON),
641 "Button2's style not chaged to BS_PUSHBUTTON\n" );
642 }
643
644 /*
645 * Move focus to Button2 using "WM_NEXTDLGCTL"
646 */
647 DefDlgProcA( g_hwndTestDlg, WM_NEXTDLGCTL, 0, 0 );
648 ok ((GetFocus() == g_hwndTestDlgBut2), "Focus didn't move to second button\n");
649
650 /*
651 * Check whether the default button ID got changed by sending message "WM_NEXTDLGCTL"
652 */
653 dwVal = DefDlgProcA(g_hwndTestDlg, DM_GETDEFID, 0, 0);
654 ok ( IDCANCEL == (LOWORD(dwVal)), "WM_NEXTDLGCTL changed default button\n");
655
656 /*
657 * Check whether the style of the button which got the focus, changed to BS_DEFPUSHBUTTON and
658 * the style of button which lost the focus changed to BS_PUSHBUTTON.
659 */
660 if ( IDCANCEL == (LOWORD(dwVal)) )
661 {
662 ok ( ((GetWindowLong( g_hwndTestDlgBut2, GWL_STYLE)) & BS_DEFPUSHBUTTON),
663 "Button2 style not set to BS_DEFPUSHBUTTON\n" );
664
665 ok ( !((GetWindowLong( g_hwndTestDlgBut1, GWL_STYLE)) & BS_DEFPUSHBUTTON),
666 "Button1's style not chaged to BS_PUSHBUTTON\n" );
667 }
668
669 /*
670 * Move focus to Edit control using "WM_NEXTDLGCTL"
671 */
672 DefDlgProcA( g_hwndTestDlg, WM_NEXTDLGCTL, 0, 0 );
673 ok ((GetFocus() == g_hwndTestDlgEdit), "Focus didn't move to Edit control\n");
674
675 /*
676 * Check whether the default button ID got changed by sending message "WM_NEXTDLGCTL"
677 */
678 dwVal = DefDlgProcA(g_hwndTestDlg, DM_GETDEFID, 0, 0);
679 ok ( IDCANCEL == (LOWORD(dwVal)), "WM_NEXTDLGCTL changed default button\n");
680 }
681 DestroyWindow(g_hwndTestDlg);
682 }
683
684 static void IsDialogMessageWTest (void)
685 {
686 MSG msg;
687
688 g_hwndMain = CreateWindow ("IsDialogMessageWindowClass", "IsDialogMessageWindowClass",
689 WS_OVERLAPPEDWINDOW,
690 CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT,
691 NULL, NULL, g_hinst, 0);
692
693 assert (g_hwndMain);
694 assert (g_hwndButton1);
695 assert (g_hwndButtonCancel);
696
697 /* The focus should initially be nowhere. The first TAB should take it
698 * to the first button. The second TAB should take it to the Cancel
699 * button.
700 */
701 FormTabMsg (&msg, g_hwndMain);
702 ok (IsDialogMessage (g_hwndMain, &msg), "Did not handle first TAB\n");
703 ok ((GetFocus() == g_hwndButton1), "Focus did not move to first button\n");
704 FormTabMsg (&msg, g_hwndButton1);
705 ok (IsDialogMessage (g_hwndMain, &msg), "Did not handle second TAB\n");
706 ok ((GetFocus() == g_hwndButtonCancel),
707 "Focus did not move to cancel button\n");
708 FormEnterMsg (&msg, g_hwndButtonCancel);
709 ok (IsDialogMessage (g_hwndMain, &msg), "Did not handle the ENTER\n");
710 ok (g_terminated, "ENTER did not terminate\n");
711 }
712
713
714 static INT_PTR CALLBACK delayFocusDlgWinProc (HWND hDlg, UINT uiMsg, WPARAM wParam,
715 LPARAM lParam)
716 {
717 switch (uiMsg)
718 {
719 case WM_INITDIALOG:
720 g_hwndMain = hDlg;
721 g_hwndInitialFocusGroupBox = GetDlgItem(hDlg,100);
722 g_hwndButton1 = GetDlgItem(hDlg,200);
723 g_hwndButton2 = GetDlgItem(hDlg,201);
724 g_hwndButtonCancel = GetDlgItem(hDlg,IDCANCEL);
725 g_styleInitialFocusT1 = GetWindowLong(g_hwndInitialFocusGroupBox, GWL_STYLE);
726
727 /* Initially check the second radio button */
728 SendMessage(g_hwndButton1, BM_SETCHECK, BST_UNCHECKED, 0);
729 SendMessage(g_hwndButton2, BM_SETCHECK, BST_CHECKED , 0);
730 /* Continue testing after dialog initialization */
731 PostMessage(hDlg, WM_USER, 0, 0);
732 return g_bInitialFocusInitDlgResult;
733
734 case WM_COMMAND:
735 if (LOWORD(wParam) == IDCANCEL)
736 {
737 EndDialog(hDlg, LOWORD(wParam));
738 return TRUE;
739 }
740 return FALSE;
741
742 case WM_USER:
743 g_styleInitialFocusT2 = GetWindowLong(hDlg, GWL_STYLE);
744 g_hwndInitialFocusT1 = GetFocus();
745 SetFocus(hDlg);
746 g_hwndInitialFocusT2 = GetFocus();
747 PostMessage(hDlg, WM_COMMAND, IDCANCEL, 0);
748 return TRUE;
749 }
750
751 return FALSE;
752 }
753
754 static INT_PTR CALLBACK focusDlgWinProc (HWND hDlg, UINT uiMsg, WPARAM wParam,
755 LPARAM lParam)
756 {
757 switch (uiMsg)
758 {
759 case WM_INITDIALOG:
760 return TRUE;
761
762 case WM_COMMAND:
763 if (LOWORD(wParam) == IDCANCEL)
764 {
765 EndDialog(hDlg, LOWORD(wParam));
766 return TRUE;
767 }
768 else if (LOWORD(wParam) == 200)
769 {
770 if (HIWORD(wParam) == EN_SETFOCUS)
771 g_hwndInitialFocusT1 = (HWND)lParam;
772 }
773 return FALSE;
774 }
775
776 return FALSE;
777 }
778
779 /* Helper for InitialFocusTest */
780 static const char * GetHwndString(HWND hw)
781 {
782 if (hw == NULL)
783 return "a null handle";
784 if (hw == g_hwndMain)
785 return "the dialog handle";
786 if (hw == g_hwndInitialFocusGroupBox)
787 return "the group box control";
788 if (hw == g_hwndButton1)
789 return "the first button";
790 if (hw == g_hwndButton2)
791 return "the second button";
792 if (hw == g_hwndButtonCancel)
793 return "the cancel button";
794
795 return "unknown handle";
796 }
797
798 static void InitialFocusTest (void)
799 {
800 /* Test 1:
801 * This test intentionally returns FALSE in response to WM_INITDIALOG
802 * without setting focus to a control. This is not allowed according to
803 * MSDN, but it is exactly what MFC's CFormView does.
804 *
805 * Since the WM_INITDIALOG handler returns FALSE without setting the focus,
806 * the focus should initially be NULL. Later, when we manually set focus to
807 * the dialog, the default handler should set focus to the first control that
808 * is "visible, not disabled, and has the WS_TABSTOP style" (MSDN). Because the
809 * second radio button has been checked, it should be the first control
810 * that meets these criteria and should receive the focus.
811 */
812
813 g_bInitialFocusInitDlgResult = FALSE;
814 g_hwndInitialFocusT1 = (HWND) -1;
815 g_hwndInitialFocusT2 = (HWND) -1;
816 g_styleInitialFocusT1 = -1;
817 g_styleInitialFocusT2 = -1;
818
819 DialogBoxA(g_hinst, "RADIO_TEST_DIALOG", NULL, delayFocusDlgWinProc);
820
821 ok (((g_styleInitialFocusT1 & WS_TABSTOP) == 0),
822 "Error in wrc - Detected WS_TABSTOP as default style for GROUPBOX\n");
823
824 ok (((g_styleInitialFocusT2 & WS_VISIBLE) == 0),
825 "Modal dialogs should not be shown until the message queue first goes empty\n");
826
827 ok ((g_hwndInitialFocusT1 == NULL),
828 "Error in initial focus when WM_INITDIALOG returned FALSE: "
829 "Expected NULL focus, got %s (%p).\n",
830 GetHwndString(g_hwndInitialFocusT1), g_hwndInitialFocusT1);
831
832 ok ((g_hwndInitialFocusT2 == g_hwndButton2),
833 "Error after first SetFocus() when WM_INITDIALOG returned FALSE: "
834 "Expected the second button (%p), got %s (%p).\n",
835 g_hwndButton2, GetHwndString(g_hwndInitialFocusT2),
836 g_hwndInitialFocusT2);
837
838 /* Test 2:
839 * This is the same as above, except WM_INITDIALOG is made to return TRUE.
840 * This should cause the focus to go to the second radio button right away
841 * and stay there (until the user indicates otherwise).
842 */
843
844 g_bInitialFocusInitDlgResult = TRUE;
845 g_hwndInitialFocusT1 = (HWND) -1;
846 g_hwndInitialFocusT2 = (HWND) -1;
847 g_styleInitialFocusT1 = -1;
848 g_styleInitialFocusT2 = -1;
849
850 DialogBoxA(g_hinst, "RADIO_TEST_DIALOG", NULL, delayFocusDlgWinProc);
851
852 ok ((g_hwndInitialFocusT1 == g_hwndButton2),
853 "Error in initial focus when WM_INITDIALOG returned TRUE: "
854 "Expected the second button (%p), got %s (%p).\n",
855 g_hwndButton2, GetHwndString(g_hwndInitialFocusT2),
856 g_hwndInitialFocusT2);
857
858 ok ((g_hwndInitialFocusT2 == g_hwndButton2),
859 "Error after first SetFocus() when WM_INITDIALOG returned TRUE: "
860 "Expected the second button (%p), got %s (%p).\n",
861 g_hwndButton2, GetHwndString(g_hwndInitialFocusT2),
862 g_hwndInitialFocusT2);
863
864 /* Test 3:
865 * If the dialog has DS_CONTROL and it's not visible then we shouldn't change focus */
866 {
867 HWND hDlg;
868 HRSRC hResource;
869 HANDLE hTemplate;
870 DLGTEMPLATE* pTemplate;
871
872 hResource = FindResourceA(g_hinst,"FOCUS_TEST_DIALOG", RT_DIALOG);
873 hTemplate = LoadResource(g_hinst, hResource);
874 pTemplate = LockResource(hTemplate);
875
876 g_hwndInitialFocusT1 = 0;
877 hDlg = CreateDialogIndirectParamA(g_hinst, pTemplate, NULL, focusDlgWinProc, 0);
878 ok (hDlg != 0, "Failed to create test dialog.\n");
879
880 ok ((g_hwndInitialFocusT1 == 0),
881 "Focus should not be set for an invisible DS_CONTROL dialog %p.\n", g_hwndInitialFocusT1);
882
883 DestroyWindow(hDlg);
884 }
885 }
886
887 static void test_GetDlgItemText(void)
888 {
889 char string[64];
890 BOOL ret;
891
892 strcpy(string, "Overwrite Me");
893 ret = GetDlgItemTextA(NULL, 0, string, sizeof(string)/sizeof(string[0]));
894 ok(!ret, "GetDlgItemText(NULL) shouldn't have succeeded\n");
895
896 ok(string[0] == '\0' || broken(!strcmp(string, "Overwrite Me")),
897 "string retrieved using GetDlgItemText should have been NULL terminated\n");
898 }
899
900 static INT_PTR CALLBACK DestroyDlgWinProc (HWND hDlg, UINT uiMsg,
901 WPARAM wParam, LPARAM lParam)
902 {
903 if (uiMsg == WM_INITDIALOG)
904 {
905 DestroyWindow(hDlg);
906 return TRUE;
907 }
908 return FALSE;
909 }
910
911 static INT_PTR CALLBACK DestroyOnCloseDlgWinProc (HWND hDlg, UINT uiMsg,
912 WPARAM wParam, LPARAM lParam)
913 {
914 switch (uiMsg)
915 {
916 case WM_INITDIALOG:
917 PostMessage(hDlg, WM_CLOSE, 0, 0);
918 return TRUE;
919 case WM_CLOSE:
920 DestroyWindow(hDlg);
921 return TRUE;
922 case WM_DESTROY:
923 PostQuitMessage(0);
924 return TRUE;
925 }
926 return FALSE;
927 }
928
929
930 static INT_PTR CALLBACK TestDefButtonDlgProc (HWND hDlg, UINT uiMsg,
931 WPARAM wParam, LPARAM lParam)
932 {
933 switch (uiMsg)
934 {
935 case WM_INITDIALOG:
936 EndDialog(hDlg, LOWORD(SendMessage(hDlg, DM_GETDEFID, 0, 0)));
937 return TRUE;
938 }
939 return FALSE;
940 }
941
942 static void test_DialogBoxParamA(void)
943 {
944 INT_PTR ret;
945 HWND hwnd_invalid = (HWND)0x4444;
946
947 SetLastError(0xdeadbeef);
948 ret = DialogBoxParamA(GetModuleHandle(NULL), "IDD_DIALOG" , hwnd_invalid, 0 , 0);
949 ok(0 == ret || broken(ret == -1), "DialogBoxParamA returned %ld, expected 0\n", ret);
950 ok(ERROR_INVALID_WINDOW_HANDLE == GetLastError() ||
951 broken(GetLastError() == 0xdeadbeef),
952 "got %d, expected ERROR_INVALID_WINDOW_HANDLE\n",GetLastError());
953
954 /* Test a dialog which destroys itself on WM_INITDIALOG. */
955 SetLastError(0xdeadbeef);
956 ret = DialogBoxParamA(GetModuleHandle(NULL), "IDD_DIALOG", 0, DestroyDlgWinProc, 0);
957 ok(-1 == ret, "DialogBoxParamA returned %ld, expected -1\n", ret);
958 ok(ERROR_INVALID_WINDOW_HANDLE == GetLastError() ||
959 GetLastError() == ERROR_SUCCESS ||
960 broken(GetLastError() == 0xdeadbeef),
961 "got %d, expected ERROR_INVALID_WINDOW_HANDLE\n",GetLastError());
962
963 /* Test a dialog which destroys itself on WM_CLOSE. */
964 ret = DialogBoxParamA(GetModuleHandle(NULL), "IDD_DIALOG", 0, DestroyOnCloseDlgWinProc, 0);
965 ok(0 == ret, "DialogBoxParamA returned %ld, expected 0\n", ret);
966
967 SetLastError(0xdeadbeef);
968 ret = DialogBoxParamA(GetModuleHandle(NULL), "RESOURCE_INVALID" , 0, 0, 0);
969 ok(-1 == ret, "DialogBoxParamA returned %ld, expected -1\n", ret);
970 ok(ERROR_RESOURCE_NAME_NOT_FOUND == GetLastError() ||
971 broken(GetLastError() == 0xdeadbeef),
972 "got %d, expected ERROR_RESOURCE_NAME_NOT_FOUND\n",GetLastError());
973
974 SetLastError(0xdeadbeef);
975 ret = DefDlgProcA(0, WM_ERASEBKGND, 0, 0);
976 ok(ret == 0, "DefDlgProcA returned %ld, expected 0\n", ret);
977 ok(GetLastError() == ERROR_INVALID_WINDOW_HANDLE ||
978 broken(GetLastError() == 0xdeadbeef),
979 "got %d, expected ERROR_INVALID_WINDOW_HANDLE\n", GetLastError());
980
981 ret = DialogBoxParamA(GetModuleHandle(NULL), "TEST_EMPTY_DIALOG", 0, TestDefButtonDlgProc, 0);
982 ok(ret == IDOK, "Expected IDOK\n");
983 }
984
985 static void test_DisabledDialogTest(void)
986 {
987 g_terminated = FALSE;
988 DialogBoxParam(g_hinst, "IDD_DIALOG", NULL, (DLGPROC)disabled_test_proc, 0);
989 ok(FALSE == g_terminated, "dialog with disabled ok button has been terminated\n");
990 }
991
992 static INT_PTR CALLBACK messageBoxFontDlgWinProc (HWND hDlg, UINT uiMsg, WPARAM wParam,
993 LPARAM lParam)
994 {
995 return (uiMsg == WM_INITDIALOG);
996 }
997
998 static void test_MessageBoxFontTest(void)
999 {
1000 /* This dialog template defines a dialog template which got 0x7fff as its
1001 * font size and omits the other font members. On WinNT, passing such a
1002 * dialog template to CreateDialogIndirectParamW will result in a dialog
1003 * being created which uses the message box font. We test that here.
1004 */
1005
1006 static unsigned char dlgTemplate[] =
1007 {
1008 /* Dialog header */
1009 0x01,0x00, /* Version */
1010 0xff,0xff, /* Extended template marker */
1011 0x00,0x00,0x00,0x00, /* Context Help ID */
1012 0x00,0x00,0x00,0x00, /* Extended style */
1013 0xc0,0x00,0xc8,0x80, /* Style (WS_SYSMENU|WS_CAPTION|WS_POPUP|DS_SETFONT|DS_MODALFRAME) */
1014 0x01,0x00, /* Control count */
1015 0x00,0x00, /* X */
1016 0x00,0x00, /* Y */
1017 0x80,0x00, /* Width */
1018 0x80,0x00, /* Height */
1019 0x00,0x00, /* Menu name */
1020 0x00,0x00, /* Class name */
1021 'T',0x00,'e',0x00, /* Caption (unicode) */
1022 's',0x00,'t',0x00,
1023 0x00,0x00,
1024 0xff,0x7f, /* Font height (0x7fff = message box font) */
1025
1026 /* Control #1 */
1027 0x00,0x00, /* Align to DWORD (header is 42 bytes) */
1028 0x00,0x00,0x00,0x00, /* Context Help ID */
1029 0x00,0x00,0x00,0x00, /* Extended style */
1030 0x00,0x00,0x00,0x50, /* Style (WS_CHILD|WS_VISIBLE) */
1031 0x00,0x00, /* X */
1032 0x00,0x00, /* Y */
1033 0x80,0x00, /* Width */
1034 0x80,0x00, /* Height */
1035 0x00,0x01,0x00,0x00, /* Control ID (256) */
1036 0xff,0xff,0x82,0x00, /* Class (Static) */
1037 'W',0x00,'I',0x00, /* Caption (unicode) */
1038 'N',0x00,'E',0x00,
1039 ' ',0x00,'d',0x00,
1040 'i',0x00,'a',0x00,
1041 'l',0x00,'o',0x00,
1042 'g',0x00,' ',0x00,
1043 't',0x00,'e',0x00,
1044 's',0x00,'t',0x00,
1045 '.',0x00,0x00,0x00,
1046 0x00,0x00, /* Size of extended data */
1047
1048 0x00,0x00 /* Align to DWORD */
1049 };
1050
1051 HWND hDlg;
1052 HFONT hFont;
1053 LOGFONTW lfStaticFont;
1054 NONCLIENTMETRICSW ncMetrics;
1055
1056 /* Check if the dialog can be created from the template. On Win9x, this should fail
1057 * because we are calling the W function which is not implemented, but that's what
1058 * we want, because passing such a template to CreateDialogIndirectParamA would crash
1059 * anyway.
1060 */
1061 hDlg = CreateDialogIndirectParamW(g_hinst, (LPCDLGTEMPLATE)dlgTemplate, NULL, messageBoxFontDlgWinProc, 0);
1062 if (!hDlg)
1063 {
1064 win_skip("dialog wasn't created\n");
1065 return;
1066 }
1067
1068 hFont = (HFONT) SendDlgItemMessageW(hDlg, 256, WM_GETFONT, 0, 0);
1069 if (!hFont)
1070 {
1071 skip("dialog uses system font\n");
1072 DestroyWindow(hDlg);
1073 return;
1074 }
1075 GetObjectW(hFont, sizeof(LOGFONTW), &lfStaticFont);
1076
1077 ncMetrics.cbSize = sizeof(NONCLIENTMETRICSW);
1078 SystemParametersInfoW(SPI_GETNONCLIENTMETRICS, 0, &ncMetrics, 0);
1079 ok( !memcmp(&lfStaticFont, &ncMetrics.lfMessageFont, FIELD_OFFSET(LOGFONTW, lfFaceName)) &&
1080 !lstrcmpW(lfStaticFont.lfFaceName, ncMetrics.lfMessageFont.lfFaceName),
1081 "dialog doesn't use message box font\n");
1082 DestroyWindow(hDlg);
1083 }
1084
1085 static void test_SaveRestoreFocus(void)
1086 {
1087 HWND hDlg;
1088 HRSRC hResource;
1089 HANDLE hTemplate;
1090 DLGTEMPLATE* pTemplate;
1091 LONG_PTR foundId;
1092 HWND foundHwnd;
1093
1094 /* create the dialog */
1095 hResource = FindResourceA(g_hinst, "MULTI_EDIT_DIALOG", RT_DIALOG);
1096 hTemplate = LoadResource(g_hinst, hResource);
1097 pTemplate = LockResource(hTemplate);
1098
1099 hDlg = CreateDialogIndirectParamA(g_hinst, pTemplate, NULL, messageBoxFontDlgWinProc, 0);
1100 ok (hDlg != 0, "Failed to create test dialog.\n");
1101
1102 foundId = GetWindowLongPtr(GetFocus(), GWLP_ID);
1103 ok (foundId == 1000, "First edit box should have gained focus on dialog creation. Expected: %d, Found: %ld\n", 1000, foundId);
1104
1105 /* de- then reactivate the dialog */
1106 SendMessage(hDlg, WM_ACTIVATE, MAKEWPARAM(WA_INACTIVE, 0), 0);
1107 SendMessage(hDlg, WM_ACTIVATE, MAKEWPARAM(WA_ACTIVE, 0), 0);
1108
1109 foundId = GetWindowLongPtr(GetFocus(), GWLP_ID);
1110 ok (foundId == 1000, "First edit box should have regained focus after dialog reactivation. Expected: %d, Found: %ld\n", 1000, foundId);
1111
1112 /* select the next tabbable item */
1113 SetFocus(GetNextDlgTabItem(hDlg, GetFocus(), FALSE));
1114
1115 foundId = GetWindowLongPtr(GetFocus(), GWLP_ID);
1116 ok (foundId == 1001, "Second edit box should have gained focus. Expected: %d, Found: %ld\n", 1001, foundId);
1117
1118 /* de- then reactivate the dialog */
1119 SendMessage(hDlg, WM_ACTIVATE, MAKEWPARAM(WA_INACTIVE, 0), 0);
1120 SendMessage(hDlg, WM_ACTIVATE, MAKEWPARAM(WA_ACTIVE, 0), 0);
1121
1122 foundId = GetWindowLongPtr(GetFocus(), GWLP_ID);
1123 ok (foundId == 1001, "Second edit box should have gained focus after dialog reactivation. Expected: %d, Found: %ld\n", 1001, foundId);
1124
1125 /* disable the 2nd box */
1126 EnableWindow(GetFocus(), FALSE);
1127
1128 foundHwnd = GetFocus();
1129 ok (foundHwnd == NULL, "Second edit box should have lost focus after being disabled. Expected: %p, Found: %p\n", NULL, foundHwnd);
1130
1131 /* de- then reactivate the dialog */
1132 SendMessage(hDlg, WM_ACTIVATE, MAKEWPARAM(WA_INACTIVE, 0), 0);
1133 SendMessage(hDlg, WM_ACTIVATE, MAKEWPARAM(WA_ACTIVE, 0), 0);
1134
1135 foundHwnd = GetFocus();
1136 ok (foundHwnd == NULL, "No controls should have gained focus after dialog reactivation. Expected: %p, Found: %p\n", NULL, foundHwnd);
1137
1138 /* clean up */
1139 DestroyWindow(hDlg);
1140 }
1141
1142 START_TEST(dialog)
1143 {
1144 g_hinst = GetModuleHandleA (0);
1145
1146 if (!RegisterWindowClasses()) assert(0);
1147
1148 GetNextDlgItemTest();
1149 IsDialogMessageWTest();
1150 WM_NEXTDLGCTLTest();
1151 InitialFocusTest();
1152 test_GetDlgItemText();
1153 test_DialogBoxParamA();
1154 test_DisabledDialogTest();
1155 test_MessageBoxFontTest();
1156 test_SaveRestoreFocus();
1157 }