1 /* Unit test suite for window classes.
3 * Copyright 2002 Mike McCormack
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.
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.
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
24 #include "wine/test.h"
30 #define NUMCLASSWORDS 4
32 LRESULT WINAPI
ClassTest_WndProc (HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
34 return DefWindowProcW (hWnd
, msg
, wParam
, lParam
);
37 /***********************************************************************
41 BOOL
ClassTest(HINSTANCE hInstance
, BOOL global
)
44 WCHAR className
[] = {'T','e','s','t','C','l','a','s','s',0};
45 WCHAR winName
[] = {'W','i','n','C','l','a','s','s','T','e','s','t',0};
50 cls
.style
= CS_HREDRAW
| CS_VREDRAW
| (global
?CS_GLOBALCLASS
:0);
51 cls
.lpfnWndProc
= ClassTest_WndProc
;
52 cls
.cbClsExtra
= NUMCLASSWORDS
*sizeof(DWORD
);
54 cls
.hInstance
= hInstance
;
55 cls
.hIcon
= LoadIconW (0, IDI_APPLICATIONW
);
56 cls
.hCursor
= LoadCursorW (0, IDC_ARROWW
);
57 cls
.hbrBackground
= GetStockObject (WHITE_BRUSH
);
59 cls
.lpszClassName
= className
;
61 ok(RegisterClassW (&cls
) ,
62 "failed to register class");
64 ok(!RegisterClassW (&cls
),
65 "RegisterClass of the same class should fail for the second time");
68 /* these succeeds on Wine, but shouldn't cause any trouble ... */
69 ok(!GlobalFindAtomW(className
),
70 "Found class as global atom");
72 ok(!FindAtomW(className
),
73 "Found class as global atom");
77 hTestWnd
= CreateWindowW (className
, winName
,
78 WS_OVERLAPPEDWINDOW
+ WS_HSCROLL
+ WS_VSCROLL
,
79 CW_USEDEFAULT
, 0, CW_USEDEFAULT
, 0, 0,
83 "Failed to create window");
85 /* test initial values of valid classwords */
86 for(i
=0; i
<NUMCLASSWORDS
; i
++)
89 ok(!GetClassLongW(hTestWnd
,i
*sizeof (DWORD
)),
90 "GetClassLongW initial value nonzero!");
92 "GetClassLongW failed!");
97 * GetClassLongW(hTestWnd, NUMCLASSWORDS*sizeof(DWORD))
98 * does not fail on Win 98, though MSDN says it should
101 GetClassLongW(hTestWnd
, NUMCLASSWORDS
*sizeof(DWORD
));
103 "GetClassLongW() with invalid offset did not fail");
106 /* set values of valid class words */
107 for(i
=0; i
<NUMCLASSWORDS
; i
++)
110 ok(!SetClassLongW(hTestWnd
,i
*sizeof(DWORD
),i
+1),
111 "GetClassLongW(%ld) initial value nonzero!",i
*sizeof(DWORD
));
113 "SetClassLongW(%ld) failed!",i
*sizeof(DWORD
));
116 /* test values of valid classwords that we set */
117 for(i
=0; i
<NUMCLASSWORDS
; i
++)
120 ok( (i
+1) == GetClassLongW(hTestWnd
,i
*sizeof (DWORD
)),
121 "GetClassLongW value doesn't match what was set!");
123 "GetClassLongW failed!");
126 /* check GetClassName */
127 i
= GetClassNameW(hTestWnd
, str
, sizeof str
);
128 ok(i
== lstrlenW(className
),
129 "GetClassName returned incorrect length");
130 ok(!lstrcmpW(className
,str
),
131 "GetClassName returned incorrect name for this window's class");
133 /* check GetClassInfo with our hInstance */
134 if(GetClassInfoW(hInstance
, str
, &wc
))
136 ok(wc
.cbClsExtra
== cls
.cbClsExtra
,
137 "cbClsExtra did not match");
138 ok(wc
.cbWndExtra
== cls
.cbWndExtra
,
139 "cbWndExtra did not match");
140 ok(wc
.hbrBackground
== cls
.hbrBackground
,
141 "hbrBackground did not match");
142 ok(wc
.hCursor
== cls
.hCursor
,
143 "hCursor did not match");
144 ok(wc
.hInstance
== cls
.hInstance
,
145 "hInstance did not match");
148 ok(FALSE
,"GetClassInfo (hinstance) failed!");
150 /* check GetClassInfo with zero hInstance */
153 if(GetClassInfoW(0, str
, &wc
))
155 ok(wc
.cbClsExtra
== cls
.cbClsExtra
,
156 "cbClsExtra did not match %x!=%x",wc
.cbClsExtra
,cls
.cbClsExtra
);
157 ok(wc
.cbWndExtra
== cls
.cbWndExtra
,
158 "cbWndExtra did not match %x!=%x",wc
.cbWndExtra
,cls
.cbWndExtra
);
159 ok(wc
.hbrBackground
== cls
.hbrBackground
,
160 "hbrBackground did not match %x!=%x",wc
.hbrBackground
,cls
.hbrBackground
);
161 ok(wc
.hCursor
== cls
.hCursor
,
162 "hCursor did not match %x!=%x",wc
.hCursor
,cls
.hCursor
);
164 "hInstance not zero for global class %x",wc
.hInstance
);
167 ok(FALSE
,"GetClassInfo (0) failed for global class!");
171 ok(!GetClassInfoW(0, str
, &wc
),
172 "GetClassInfo (0) succeeded for local class!");
175 ok(!UnregisterClassW(className
, hInstance
),
176 "Unregister class succeeded with window existing");
178 ok(DestroyWindow(hTestWnd
),
179 "DestroyWindow() failed!");
181 ok(UnregisterClassW(className
, hInstance
),
182 "UnregisterClass() failed");
189 HANDLE hInstance
= GetModuleHandleA( NULL
);
191 ClassTest(hInstance
,FALSE
);
192 ClassTest(hInstance
,TRUE
);