comctl32/tests: Check the styles of the wizard and property sheet dialogs.

This commit is contained in:
Francois Gouget 2011-09-08 00:33:29 +02:00 committed by Alexandre Julliard
parent aec5976fb2
commit 325275304c
1 changed files with 14 additions and 0 deletions

View File

@ -107,6 +107,7 @@ static void test_title(void)
PROPSHEETPAGEA psp;
PROPSHEETHEADERA psh;
HWND hdlg;
DWORD style;
memset(&psp, 0, sizeof(psp));
psp.dwSize = sizeof(psp);
@ -131,6 +132,12 @@ static void test_title(void)
hdlg = (HWND)PropertySheetA(&psh);
ok(hdlg != INVALID_HANDLE_VALUE, "got invalid handle value %p\n", hdlg);
style = GetWindowLong(hdlg, GWL_STYLE);
todo_wine
ok(style == (WS_POPUP|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CAPTION|WS_SYSMENU|
DS_CONTEXTHELP|DS_MODALFRAME|DS_SETFONT|DS_3DLOOK),
"got unexpected style: %x\n", style);
DestroyWindow(hdlg);
}
@ -276,6 +283,7 @@ static void test_wiznavigation(void)
PROPSHEETHEADERA psh;
HWND hdlg, control;
LONG_PTR controlID;
DWORD style;
LRESULT defidres;
BOOL hwndtoindex_supported = TRUE;
const INT nextID = 12324;
@ -321,6 +329,12 @@ static void test_wiznavigation(void)
ok(active_page == 0, "Active page should be 0. Is: %d\n", active_page);
style = GetWindowLong(hdlg, GWL_STYLE) & ~(DS_CONTEXTHELP|WS_SYSMENU);
todo_wine
ok(style == (WS_POPUP|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CAPTION|
DS_MODALFRAME|DS_SETFONT|DS_3DLOOK),
"got unexpected style: %x\n", style);
control = GetFocus();
controlID = GetWindowLongPtr(control, GWLP_ID);
ok(controlID == nextID, "Focus should have been set to the Next button. Expected: %d, Found: %ld\n", nextID, controlID);