source: trunk/src/user32/win32wbase.cpp@ 3513

Last change on this file since 3513 was 3513, checked in by sandervl, 25 years ago

Get/SetForegroundWindow fixes/changes
File size: 107.3 KB
Line 
1/* $Id: win32wbase.cpp,v 1.186 2000-05-10 13:14:43 sandervl Exp $ */
2/*
3 * Win32 Window Base Class for OS/2
4 *
5 * Copyright 1998-2000 Sander van Leeuwen (sandervl@xs4all.nl)
6 * Copyright 1999 Daniela Engert (dani@ngrt.de)
7 * Copyright 1999-2000 Christoph Bratschi (cbratschi@datacomm.ch)
8 *
9 * Parts based on Wine Windows code (windows\win.c)
10 * Corel version: corel20000212
11 *
12 * Copyright 1993, 1994, 1996 Alexandre Julliard
13 * 1995 Alex Korobka
14 *
15 * TODO: Not thread/process safe
16 *
17 * NOTE: Client rectangle always relative to frame window; window rectangle in screen coordinates
18 *
19 * Project Odin Software License can be found in LICENSE.TXT
20 *
21 */
22#include <os2win.h>
23#include <win.h>
24#include <stdlib.h>
25#include <string.h>
26#include <stdarg.h>
27#include <assert.h>
28#include <misc.h>
29#include <heapstring.h>
30#include <win32wbase.h>
31#include <winres.h>
32#include "wndmsg.h"
33#include "oslibwin.h"
34#include "oslibmsg.h"
35#include "oslibutil.h"
36#include "oslibgdi.h"
37#include "oslibres.h"
38#include "oslibdos.h"
39#include "syscolor.h"
40#include "win32wndhandle.h"
41#include "dc.h"
42#include "pmframe.h"
43#include "win32wdesktop.h"
44#include "pmwindow.h"
45#include "controls.h"
46#include <wprocess.h>
47#include <win\hook.h>
48#include <menu.h>
49#define INCL_TIMERWIN32
50#include "timer.h"
51
52#define DBG_LOCALLOG DBG_win32wbase
53#include "dbglocal.h"
54
55/* bits in the dwKeyData */
56#define KEYDATA_ALT 0x2000
57#define KEYDATA_PREVSTATE 0x4000
58
59void PrintWindowStyle(DWORD dwStyle, DWORD dwExStyle);
60
61static fDestroyAll = FALSE;
62//For quick lookup of current process id
63static ULONG currentProcessId = -1;
64
65//******************************************************************************
66//******************************************************************************
67Win32BaseWindow::Win32BaseWindow(DWORD objType) : GenericObject(&windows, objType)
68{
69 Init();
70}
71//******************************************************************************
72//******************************************************************************
73Win32BaseWindow::Win32BaseWindow(CREATESTRUCTA *lpCreateStructA, ATOM classAtom, BOOL isUnicode)
74 : GenericObject(&windows, OBJTYPE_WINDOW), ChildWindow()
75{
76 Init();
77 this->isUnicode = isUnicode;
78 CreateWindowExA(lpCreateStructA, classAtom);
79}
80//******************************************************************************
81//******************************************************************************
82void Win32BaseWindow::Init()
83{
84 isUnicode = FALSE;
85 fFirstShow = TRUE;
86 fIsDialog = FALSE;
87 fIsModalDialogOwner = FALSE;
88 OS2HwndModalDialog = 0;
89 fInternalMsg = FALSE;
90 fNoSizeMsg = FALSE;
91 fIsDestroyed = FALSE;
92 fDestroyWindowCalled = FALSE;
93 fCreated = FALSE;
94 fTaskList = FALSE;
95 fParentDC = FALSE;
96 fComingToTop = FALSE;
97
98 windowNameA = NULL;
99 windowNameW = NULL;
100 wndNameLength = 0;
101
102 userWindowLong = NULL;;
103 nrUserWindowLong = 0;
104
105 magic = WIN32PM_MAGIC;
106 OS2Hwnd = 0;
107 OS2HwndFrame = 0;
108 hSysMenu = 0;
109 Win32Hwnd = 0;
110
111 if(HwAllocateWindowHandle(&Win32Hwnd, (ULONG)this) == FALSE)
112 {
113 dprintf(("Win32BaseWindow::Init HwAllocateWindowHandle failed!!"));
114 DebugInt3();
115 }
116
117 posx = posy = 0;
118 width = height = 0;
119
120 dwExStyle = 0;
121 dwStyle = 0;
122 win32wndproc = 0;
123 hInstance = 0;
124 dwIDMenu = 0; //0xFFFFFFFF; //default -1
125 userData = 0;
126 contextHelpId = 0;
127 hotkey = 0;
128
129 pOldFrameProc = NULL;
130
131 hwndLinkAfter = HWND_BOTTOM;
132 flags = 0;
133 lastHitTestVal = HTOS_NORMAL;
134 owner = NULL;
135 windowClass = 0;
136
137 hIcon = 0;
138 hIconSm = 0;
139
140 EraseBkgndFlag = TRUE;
141
142 horzScrollInfo = NULL;
143 vertScrollInfo = NULL;
144
145 propertyList = NULL;
146
147 ownDC = 0;
148 hWindowRegion = 0;
149 hClipRegion = 0;
150
151 if(currentProcessId == -1)
152 {
153 currentProcessId = GetCurrentProcessId();
154 }
155 dwThreadId = GetCurrentThreadId();
156 dwProcessId = currentProcessId;
157}
158//******************************************************************************
159//todo get rid of resources (menu, icon etc)
160//******************************************************************************
161Win32BaseWindow::~Win32BaseWindow()
162{
163 OSLibWinSetVisibleRegionNotify(OS2HwndFrame, FALSE);
164 OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32WNDPTR, 0);
165 OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32PM_MAGIC, 0);
166
167 if(!fDestroyAll && getParent() && getParent()->getFirstChild() == this && getNextChild() == NULL)
168 {
169 //if we're the last child that's being destroyed and our
170 //parent window was also destroyed, then we delete the parent object
171 if(getParent()->IsWindowDestroyed())
172 {
173 dprintf(("Last Child (%x) destroyed, get rid of our parent window (%x)", getWindowHandle(), getParent()->getWindowHandle()));
174 delete getParent();
175 setParent(NULL); //or else we'll crash in the dtor of the ChildWindow class
176 }
177 }
178 else
179 if(fDestroyAll) {
180 dprintf(("Destroying window %x %s", getWindowHandle(), windowNameA));
181 setParent(NULL); //or else we'll crash in the dtor of the ChildWindow class
182 }
183
184 if(isOwnDC())
185 releaseOwnDC(ownDC);
186
187 if(Win32Hwnd)
188 HwFreeWindowHandle(Win32Hwnd);
189
190 if(userWindowLong)
191 free(userWindowLong);
192
193 if(windowNameA) {
194 free(windowNameA);
195 windowNameA = NULL;
196 }
197 if(windowNameW) {
198 free(windowNameW);
199 windowNameW = NULL;
200 }
201 if(vertScrollInfo) {
202 free(vertScrollInfo);
203 vertScrollInfo = NULL;
204 }
205 if(horzScrollInfo) {
206 free(horzScrollInfo);
207 horzScrollInfo = NULL;
208 }
209 if(propertyList) {
210 removeWindowProps();
211 }
212}
213//******************************************************************************
214//******************************************************************************
215void Win32BaseWindow::DestroyAll()
216{
217 fDestroyAll = TRUE;
218 GenericObject::DestroyAll(windows);
219}
220//******************************************************************************
221//******************************************************************************
222BOOL Win32BaseWindow::isChild()
223{
224 return ((dwStyle & WS_CHILD) != 0);
225}
226//******************************************************************************
227//******************************************************************************
228BOOL Win32BaseWindow::IsWindowUnicode()
229{
230 dprintf2(("IsWindowUnicode %x %d", getWindowHandle(), WINPROC_GetProcType(getWindowProc()) == WIN_PROC_32W));
231 return (WINPROC_GetProcType(getWindowProc()) == WIN_PROC_32W);
232}
233//******************************************************************************
234//******************************************************************************
235BOOL Win32BaseWindow::CreateWindowExA(CREATESTRUCTA *cs, ATOM classAtom)
236{
237 char buffer[256];
238
239#ifdef DEBUG
240 PrintWindowStyle(cs->style, cs->dwExStyle);
241#endif
242
243 sw = SW_SHOW;
244 SetLastError(0);
245
246 /* Find the parent window */
247 if (cs->hwndParent)
248 {
249 Win32BaseWindow *window = GetWindowFromHandle(cs->hwndParent);
250 if(!window) {
251 dprintf(("Bad parent %04x\n", cs->hwndParent ));
252 SetLastError(ERROR_INVALID_PARAMETER);
253 return FALSE;
254 }
255 /* Make sure parent is valid */
256 if (!window->IsWindow() )
257 {
258 dprintf(("Bad parent %04x\n", cs->hwndParent ));
259 SetLastError(ERROR_INVALID_PARAMETER);
260 return FALSE;
261 }
262 /* Windows does this for overlapped windows
263 * (I don't know about other styles.) */
264 if (cs->hwndParent == GetDesktopWindow() && (!(cs->style & WS_CHILD) || (cs->style & WS_POPUP)))
265 {
266 cs->hwndParent = 0;
267 }
268 }
269 else
270 if ((cs->style & WS_CHILD) && !(cs->style & WS_POPUP)) {
271 dprintf(("No parent for child window\n" ));
272 SetLastError(ERROR_INVALID_PARAMETER);
273 return FALSE; /* WS_CHILD needs a parent, but WS_POPUP doesn't */
274 }
275
276 /* Find the window class */
277 windowClass = Win32WndClass::FindClass(cs->hInstance, (LPSTR)classAtom);
278 if (!windowClass)
279 {
280 GlobalGetAtomNameA( classAtom, buffer, sizeof(buffer) );
281 dprintf(("Bad class '%s'\n", buffer ));
282 SetLastError(ERROR_INVALID_PARAMETER);
283 return 0;
284 }
285#ifdef DEBUG
286 if(HIWORD(cs->lpszClass))
287 {
288 char *astring;
289
290 if(isUnicode) astring = UnicodeToAsciiString((LPWSTR)cs->lpszClass);
291 else astring = (char *)cs->lpszClass;
292
293 dprintf(("Window class %s", astring));
294 if(isUnicode) FreeAsciiString(astring);
295 }
296 else dprintf(("Window class %x", cs->lpszClass));
297#endif
298
299 /* Fix the lpszClass field: from existing programs, it seems ok to call a CreateWindowXXX
300 * with an atom as the class name, put some programs expect to have a *REAL* string in
301 * lpszClass when the CREATESTRUCT is sent with WM_CREATE
302 */
303 if (!HIWORD(cs->lpszClass) ) {
304 if (isUnicode) {
305 GlobalGetAtomNameW( classAtom, (LPWSTR)buffer, sizeof(buffer) );
306 }
307 else {
308 GlobalGetAtomNameA( classAtom, buffer, sizeof(buffer) );
309 }
310 cs->lpszClass = buffer;
311 }
312
313 /* Fix the coordinates */
314 fXDefault = FALSE;
315 fCXDefault = FALSE;
316 if ((cs->x == CW_USEDEFAULT) || (cs->x == CW_USEDEFAULT16))
317 {
318 /* Never believe Microsoft's documentation... CreateWindowEx doc says
319 * that if an overlapped window is created with WS_VISIBLE style bit
320 * set and the x parameter is set to CW_USEDEFAULT, the system ignores
321 * the y parameter. However, disassembling NT implementation (WIN32K.SYS)
322 * reveals that
323 *
324 * 1) not only if checks for CW_USEDEFAULT but also for CW_USEDEFAULT16
325 * 2) it does not ignore the y parameter as the docs claim; instead, it
326 * uses it as second parameter to ShowWindow() unless y is either
327 * CW_USEDEFAULT or CW_USEDEFAULT16.
328 *
329 * The fact that we didn't do 2) caused bogus windows pop up when wine
330 * was running apps that were using this obscure feature. Example -
331 * calc.exe that comes with Win98 (only Win98, it's different from
332 * the one that comes with Win95 and NT)
333 */
334 if ((cs->y != CW_USEDEFAULT) && (cs->y != CW_USEDEFAULT16)) sw = cs->y;
335
336 /* We have saved cs->y, now we can trash it */
337 cs->x = 0;
338 cs->y = 0;
339 fXDefault = TRUE;
340 }
341 if ((cs->cx == CW_USEDEFAULT) || (cs->cx == CW_USEDEFAULT16))
342 {
343 cs->cx = 600; /* FIXME */
344 cs->cy = 400;
345 fCXDefault = TRUE;
346 }
347 if (cs->style & (WS_POPUP | WS_CHILD))
348 {
349 fXDefault = FALSE;
350 if (fCXDefault)
351 {
352 fCXDefault = FALSE;
353 cs->cx = cs->cy = 0;
354 }
355 }
356 if (fXDefault && !fCXDefault) fXDefault = FALSE; //CB: only x positioning doesn't work (calc.exe,cdrlabel.exe)
357
358 if (cs->x < 0) cs->x = 0;
359 if (cs->y < 0) cs->y = 0;
360
361 //Allocate window words
362 nrUserWindowLong = windowClass->getExtraWndWords();
363 if(nrUserWindowLong) {
364 userWindowLong = (ULONG *)_smalloc(nrUserWindowLong);
365 memset(userWindowLong, 0, nrUserWindowLong);
366 }
367
368 if ((cs->style & WS_CHILD) && cs->hwndParent)
369 {
370 SetParent(cs->hwndParent);
371 owner = GetWindowFromHandle(cs->hwndParent);
372 if(owner == NULL)
373 {
374 dprintf(("HwGetWindowHandleData couldn't find owner window %x!!!", cs->hwndParent));
375 SetLastError(ERROR_INVALID_WINDOW_HANDLE);
376 return FALSE;
377 }
378 //SvL: Shell positioning shouldn't be done for child windows! (breaks Notes)
379 fXDefault = fCXDefault = FALSE;
380 }
381 else
382 {
383 SetParent(0);
384 if (!cs->hwndParent || (cs->hwndParent == windowDesktop->getWindowHandle())) {
385 owner = NULL;
386 }
387 else
388 {
389 owner = GetWindowFromHandle(cs->hwndParent)->GetTopParent();
390 if(owner == NULL)
391 {
392 dprintf(("HwGetWindowHandleData couldn't find owner window %x!!!", cs->hwndParent));
393 SetLastError(ERROR_INVALID_WINDOW_HANDLE);
394 return FALSE;
395 }
396 }
397 }
398
399 WINPROC_SetProc((HWINDOWPROC *)&win32wndproc, windowClass->getWindowProc(), WINPROC_GetProcType(windowClass->getWindowProc()), WIN_PROC_WINDOW);
400 hInstance = cs->hInstance;
401 dwStyle = cs->style & ~WS_VISIBLE;
402 dwExStyle = cs->dwExStyle;
403
404 hwndLinkAfter = HWND_TOP;
405 if(CONTROLS_IsControl(this, BUTTON_CONTROL) && ((dwStyle & 0x0f) == BS_GROUPBOX))
406 {
407 hwndLinkAfter = HWND_BOTTOM;
408 dwStyle |= WS_CLIPSIBLINGS;
409 }
410 else
411 if(CONTROLS_IsControl(this, STATIC_CONTROL) && !(dwStyle & WS_GROUP)) {
412 dwStyle |= WS_CLIPSIBLINGS;
413 }
414
415 /* Increment class window counter */
416 windowClass->IncreaseWindowCount();
417
418 if (HOOK_IsHooked( WH_CBT ))
419 {
420 CBT_CREATEWNDA cbtc;
421 LRESULT ret;
422
423 cbtc.lpcs = cs;
424 cbtc.hwndInsertAfter = hwndLinkAfter;
425 ret = HOOK_CallHooksA(WH_CBT, HCBT_CREATEWND, getWindowHandle(), (LPARAM)&cbtc);
426 if(ret)
427 {
428 dprintf(("CBT-hook returned 0!!"));
429 SetLastError(ERROR_CAN_NOT_COMPLETE); //todo: wrong error
430 return FALSE;
431 }
432 }
433
434 /* Correct the window style */
435 if (!(cs->style & WS_CHILD))
436 {
437 dwStyle |= WS_CLIPSIBLINGS;
438 if (!(cs->style & WS_POPUP))
439 {
440 dwStyle |= WS_CAPTION;
441 flags |= WIN_NEED_SIZE;
442 }
443 }
444 if (cs->dwExStyle & WS_EX_DLGMODALFRAME) dwStyle &= ~WS_THICKFRAME;
445
446 if (cs->style & WS_HSCROLL)
447 {
448 horzScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
449 horzScrollInfo->MinVal = horzScrollInfo->CurVal = horzScrollInfo->Page = 0;
450 horzScrollInfo->MaxVal = 100;
451 horzScrollInfo->flags = ESB_ENABLE_BOTH;
452 }
453
454 if (cs->style & WS_VSCROLL)
455 {
456 vertScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
457 vertScrollInfo->MinVal = vertScrollInfo->CurVal = vertScrollInfo->Page = 0;
458 vertScrollInfo->MaxVal = 100;
459 vertScrollInfo->flags = ESB_ENABLE_BOTH;
460 }
461
462 if(HIWORD(cs->lpszName))
463 {
464 if (!isUnicode)
465 {
466 wndNameLength = strlen(cs->lpszName);
467 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
468 strcpy(windowNameA,cs->lpszName);
469 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
470 lstrcpyAtoW(windowNameW,windowNameA);
471 windowNameA[wndNameLength] = 0;
472 windowNameW[wndNameLength] = 0;
473 }
474 else
475 {
476 wndNameLength = lstrlenW((LPWSTR)cs->lpszName);
477 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
478 lstrcpyWtoA(windowNameA,(LPWSTR)cs->lpszName);
479 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
480 lstrcpyW(windowNameW,(LPWSTR)cs->lpszName);
481 windowNameA[wndNameLength] = 0;
482 windowNameW[wndNameLength] = 0;
483 }
484 }
485
486 //copy pointer of CREATESTRUCT for usage in MsgCreate method
487 tmpcs = cs;
488
489 //Store our window object pointer in thread local memory, so PMWINDOW.CPP can retrieve it
490 THDB *thdb = GetThreadTHDB();
491
492 if(thdb == NULL) {
493 dprintf(("Window creation failed - thdb == NULL")); //this is VERY bad
494 ExitProcess(666);
495 return FALSE;
496 }
497
498 thdb->newWindow = (ULONG)this;
499
500 DWORD dwOSWinStyle;
501
502 OSLibWinConvertStyle(dwStyle,dwExStyle,&dwOSWinStyle);
503#if 0
504 if(((dwStyle & (WS_CAPTION|WS_POPUP)) == WS_CAPTION) && (getParent() == NULL || getParent() == windowDesktop)) {
505 fTaskList = TRUE;
506 }
507#else
508 if (((dwStyle & (WS_CAPTION | WS_SYSMENU | 0xC0000000)) == (WS_CAPTION | WS_SYSMENU))) fTaskList = TRUE;
509#endif
510
511 OS2Hwnd = OSLibWinCreateWindow((getParent()) ? getParent()->getOS2WindowHandle() : OSLIB_HWND_DESKTOP,
512 dwOSWinStyle,(char *)windowNameA,
513 (owner) ? owner->getOS2WindowHandle() : OSLIB_HWND_DESKTOP,
514 (hwndLinkAfter == HWND_BOTTOM) ? TRUE : FALSE,
515 &OS2HwndFrame, 0, fTaskList,fXDefault | fCXDefault,windowClass->getStyle() & CS_SAVEBITS);
516 if(OS2Hwnd == 0) {
517 dprintf(("Window creation failed!!"));
518 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
519 return FALSE;
520 }
521 OSLibWinSetVisibleRegionNotify(OS2HwndFrame, TRUE);
522
523 SetLastError(0);
524 return TRUE;
525}
526//******************************************************************************
527//******************************************************************************
528BOOL Win32BaseWindow::MsgCreate(HWND hwndFrame, HWND hwndClient)
529{
530 CREATESTRUCTA *cs = tmpcs; //pointer to CREATESTRUCT used in CreateWindowExA method
531 POINT maxSize, maxPos, minTrack, maxTrack;
532
533 OS2Hwnd = hwndClient;
534 OS2HwndFrame = hwndFrame;
535
536 fNoSizeMsg = TRUE;
537
538 if(OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32WNDPTR, (ULONG)this) == FALSE) {
539 dprintf(("WM_CREATE: WinSetWindowULong %X failed!!", OS2Hwnd));
540 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
541 return FALSE;
542 }
543 if(OSLibWinSetWindowULong(OS2Hwnd, OFFSET_WIN32PM_MAGIC, WIN32PM_MAGIC) == FALSE) {
544 dprintf(("WM_CREATE: WinSetWindowULong2 %X failed!!", OS2Hwnd));
545 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
546 return FALSE;
547 }
548
549//SvL: This completely messes up MS Word 97 (no button bar, no menu)
550#if 0
551 //adjust CW_USEDEFAULT position
552 if (fXDefault | fCXDefault)
553 {
554 RECT rect;
555
556 //SvL: Returns invalid rectangle (not the expected shell default size)
557 OSLibWinQueryWindowRect(OS2HwndFrame,&rect,RELATIVE_TO_SCREEN);
558 if (getParent()) mapWin32Rect(OSLIB_HWND_DESKTOP,getParent()->getOS2WindowHandle(),&rect);
559 if (fXDefault)
560 {
561 cs->x = rect.left;
562 cs->y = rect.top;
563 if (!fCXDefault)
564 {
565 //CB: todo: adjust pos to screen rect
566 }
567 }
568 if (fCXDefault)
569 {
570 cs->cx = rect.right-rect.left;
571 cs->cy = rect.bottom-rect.top;
572 }
573 }
574#endif
575
576 OSLibWinSetOwner(OS2Hwnd, OS2HwndFrame);
577
578 fakeWinBase.hwndThis = OS2Hwnd;
579 fakeWinBase.pWindowClass = windowClass;
580
581 //Set icon from window or class
582 if (hIcon)
583 OSLibWinSetIcon(OS2HwndFrame,hIcon);
584 else if (windowClass->getIcon())
585 OSLibWinSetIcon(OS2HwndFrame,windowClass->getIcon());
586
587 /* Get class or window DC if needed */
588 if(windowClass->getStyle() & CS_OWNDC) {
589 dprintf(("Class with CS_OWNDC style"));
590 ownDC = GetDC(getWindowHandle()); //TODO: or GetWindowDC???
591 }
592 else
593 if (windowClass->getStyle() & CS_PARENTDC) {
594 dprintf(("WARNING: Class with CS_PARENTDC style!"));
595 fParentDC = TRUE;
596 ownDC = 0;
597 }
598 else
599 if (windowClass->getStyle() & CS_CLASSDC) {
600 dprintf(("WARNING: Class with CS_CLASSDC style!"));
601 ownDC = 0;
602 }
603 /* Set the window menu */
604 if ((dwStyle & (WS_CAPTION | WS_CHILD)) == WS_CAPTION )
605 {
606 if (cs->hMenu) {
607 ::SetMenu(getWindowHandle(), cs->hMenu);
608 }
609 else {
610 if (windowClass->getMenuNameA()) {
611 cs->hMenu = LoadMenuA(windowClass->getInstance(),windowClass->getMenuNameA());
612#if 0 //CB: hack for treeview test cases bug
613if (!cs->hMenu) cs->hMenu = LoadMenuA(windowClass->getInstance(),"MYAPP");
614#endif
615 if (cs->hMenu) ::SetMenu(getWindowHandle(), cs->hMenu );
616 }
617 }
618 }
619 else
620 {
621 setWindowId((DWORD)cs->hMenu);
622 }
623 hSysMenu = (dwStyle & WS_SYSMENU) ? MENU_GetSysMenu(Win32Hwnd,0):0;
624
625 // Subclass frame
626 pOldFrameProc = FrameSubclassFrameWindow(this);
627
628 /* Send the WM_GETMINMAXINFO message and fix the size if needed */
629 if ((cs->style & WS_THICKFRAME) || !(cs->style & (WS_POPUP | WS_CHILD)))
630 {
631 GetMinMaxInfo(&maxSize, &maxPos, &minTrack, &maxTrack);
632 if (maxSize.x < cs->cx) cs->cx = maxSize.x;
633 if (maxSize.y < cs->cy) cs->cy = maxSize.y;
634 if (cs->cx < minTrack.x) cs->cx = minTrack.x;
635 if (cs->cy < minTrack.y) cs->cy = minTrack.y;
636 }
637
638 if(cs->style & WS_CHILD)
639 {
640 if(cs->cx < 0) cs->cx = 0;
641 if(cs->cy < 0) cs->cy = 0;
642 }
643 else
644 {
645 if (cs->cx <= 0) cs->cx = 1;
646 if (cs->cy <= 0) cs->cy = 1;
647 }
648
649 //preset rects
650 rectWindow.left = cs->x;
651 rectWindow.right = cs->x+cs->cx;
652 rectWindow.top = cs->y;
653 rectWindow.bottom = cs->y+cs->cy;
654 rectClient = rectWindow; //dummy client rect
655 OffsetRect(&rectClient, -rectClient.left, -rectClient.top);
656
657 if (getParent()) mapWin32Rect(getParent()->getOS2WindowHandle(),OSLIB_HWND_DESKTOP,&rectWindow);
658 /* Send the WM_CREATE message
659 * Perhaps we shouldn't allow width/height changes as well.
660 * See p327 in "Internals".
661 */
662 maxPos.x = rectWindow.left; maxPos.y = rectWindow.top;
663
664 //Note: Solitaire crashes when receiving WM_SIZE messages before WM_CREATE
665 fCreated = TRUE;
666
667 if (SendInternalMessageA(WM_NCCREATE,0,(LPARAM)cs))
668 {
669 RECT tmpRect;
670
671 //CB: recheck flags
672 if (cs->style & (WS_POPUP | WS_CHILD))
673 {
674 fXDefault = FALSE;
675 if (fCXDefault)
676 {
677 fCXDefault = FALSE;
678 cs->cx = cs->cy = 0;
679 }
680 }
681 //update rect
682 rectWindow.left = cs->x;
683 rectWindow.right = cs->x+cs->cx;
684 rectWindow.top = cs->y;
685 rectWindow.bottom = cs->y+cs->cy;
686 tmpRect = rectWindow;
687 if (getParent()) mapWin32Rect(getParent()->getOS2WindowHandle(),OSLIB_HWND_DESKTOP,&rectWindow);
688 OffsetRect(&rectWindow, maxPos.x - rectWindow.left, maxPos.y - rectWindow.top);
689
690 rectClient = rectWindow;
691 OffsetRect(&rectClient, -rectClient.left, -rectClient.top);
692
693 //set the window size and update the client
694 SetWindowPos(hwndLinkAfter, tmpRect.left, tmpRect.top, tmpRect.right-tmpRect.left, tmpRect.bottom-tmpRect.top,SWP_NOACTIVATE | SWP_NOREDRAW | SWP_FRAMECHANGED);
695 fNoSizeMsg = FALSE;
696 if (cs->style & WS_VISIBLE) dwStyle |= WS_VISIBLE; //program could change position in WM_CREATE
697 if( (SendInternalMessageA(WM_CREATE, 0, (LPARAM)cs )) != -1 )
698 {
699 if(!(flags & WIN_NEED_SIZE))
700 {
701 SendInternalMessageA(WM_SIZE, SIZE_RESTORED,
702 MAKELONG(rectClient.right-rectClient.left,
703 rectClient.bottom-rectClient.top));
704
705 SendInternalMessageA(WM_MOVE,0,MAKELONG(rectClient.left,rectClient.top));
706 }
707
708 if( (getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY) )
709 {
710 /* Notify the parent window only */
711 SendInternalMessageA(WM_PARENTNOTIFY, MAKEWPARAM(WM_CREATE, getWindowId()), (LPARAM)getWindowHandle());
712 if(!::IsWindow(getWindowHandle()))
713 {
714 dprintf(("Createwindow: WM_PARENTNOTIFY destroyed window"));
715 goto end;
716 }
717 }
718
719 if (cs->style & WS_VISIBLE) ShowWindow(sw);
720
721 /* Call WH_SHELL hook */
722 if (!(getStyle() & WS_CHILD) && !owner)
723 HOOK_CallHooksA(WH_SHELL, HSHELL_WINDOWCREATED, getWindowHandle(), 0 );
724
725 SetLastError(0);
726 return TRUE;
727 }
728 }
729 dprintf(("Window creation FAILED (NCCREATE cancelled creation)"));
730 SetLastError(ERROR_OUTOFMEMORY); //TODO: Better error
731end:
732 return FALSE;
733}
734//******************************************************************************
735//******************************************************************************
736ULONG Win32BaseWindow::MsgQuit()
737{
738 return SendInternalMessageA(WM_QUIT, 0, 0);
739}
740//******************************************************************************
741//******************************************************************************
742ULONG Win32BaseWindow::MsgClose()
743{
744 return SendInternalMessageA(WM_CLOSE,0,0);
745}
746//******************************************************************************
747//******************************************************************************
748ULONG Win32BaseWindow::MsgDestroy()
749{
750 ULONG rc;
751 Win32BaseWindow *child;
752 HWND hwnd = getWindowHandle();
753
754 fIsDestroyed = TRUE;
755
756 if(fDestroyWindowCalled == FALSE)
757 {//this window was destroyed because DestroyWindow was called for it's parent
758 //so: send a WM_PARENTNOTIFY now as that hasn't happened yet
759 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY))
760 {
761 if(getParent())
762 {
763 /* Notify the parent window only */
764 getParent()->SendMessageA(WM_PARENTNOTIFY, MAKEWPARAM(WM_DESTROY, getWindowId()), (LPARAM)getWindowHandle());
765 }
766 else DebugInt3();
767 }
768 }
769 SendInternalMessageA(WM_DESTROY, 0, 0);
770 if(::IsWindow(hwnd) == FALSE) {
771 //object already destroyed, so return immediately
772 return 1;
773 }
774 SendInternalMessageA(WM_NCDESTROY, 0, 0);
775
776 TIMER_KillTimerFromWindow(OS2Hwnd);
777
778 if(getFirstChild() == NULL) {
779 delete this;
780 }
781 return 1;
782}
783//******************************************************************************
784//******************************************************************************
785ULONG Win32BaseWindow::MsgEnable(BOOL fEnable)
786{
787 if(fEnable) {
788 dwStyle &= ~WS_DISABLED;
789 }
790 else dwStyle |= WS_DISABLED;
791
792 return SendInternalMessageA(WM_ENABLE, fEnable, 0);
793}
794//******************************************************************************
795//TODO: SW_PARENTCLOSING/OPENING flag (lParam)
796//******************************************************************************
797ULONG Win32BaseWindow::MsgShow(BOOL fShow)
798{
799 if(fNoSizeMsg || fDestroyWindowCalled) {
800 return 1;
801 }
802
803 if(fShow) {
804 setStyle(getStyle() | WS_VISIBLE);
805 }
806 else setStyle(getStyle() & ~WS_VISIBLE);
807
808 return SendInternalMessageA(WM_SHOWWINDOW, fShow, 0);
809}
810//******************************************************************************
811//******************************************************************************
812ULONG Win32BaseWindow::MsgPosChanging(LPARAM lp)
813{
814 //SvL: Notes crashes when switching views (calls DestroyWindow -> PM sends
815 // a WM_WINDOWPOSCHANGED msg -> crash)
816 if(fNoSizeMsg || fDestroyWindowCalled)
817 return 0;
818
819 return SendInternalMessageA(WM_WINDOWPOSCHANGING, 0, lp);
820}
821//******************************************************************************
822//******************************************************************************
823ULONG Win32BaseWindow::MsgPosChanged(LPARAM lp)
824{
825 //SvL: Notes crashes when switching views (calls DestroyWindow -> PM sends
826 // a WM_WINDOWPOSCHANGED msg -> crash)
827 if(fNoSizeMsg || fDestroyWindowCalled)
828 return 1;
829
830 return SendInternalMessageA(WM_WINDOWPOSCHANGED, 0, lp);
831}
832//******************************************************************************
833//******************************************************************************
834#if 0
835ULONG Win32BaseWindow::MsgMinMax()
836{
837
838}
839#endif
840//******************************************************************************
841//******************************************************************************
842ULONG Win32BaseWindow::MsgScroll(ULONG msg, ULONG scrollCode, ULONG scrollPos)
843{
844 //According to the SDK docs, the scrollbar handle (lParam) is 0 when the standard
845 //window scrollbars send these messages
846 return SendInternalMessageA(msg, MAKELONG(scrollCode, scrollPos), 0);
847}
848//******************************************************************************
849//******************************************************************************
850ULONG Win32BaseWindow::MsgHitTest(MSG *msg)
851{
852 lastHitTestVal = DispatchMessageA(msg);
853
854 dprintf2(("MsgHitTest %x (%d,%d) (%d,%d) (%d,%d) returned %x", getWindowHandle(), LOWORD(msg->lParam), HIWORD(msg->lParam), rectWindow.left, rectWindow.right, rectWindow.top, rectWindow.bottom, lastHitTestVal));
855
856 if (lastHitTestVal == HTTRANSPARENT)
857 return HTOS_TRANSPARENT;
858 else
859 return HTOS_NORMAL;
860}
861//******************************************************************************
862//******************************************************************************
863ULONG Win32BaseWindow::MsgActivate(BOOL fActivate, BOOL fMinimized, HWND hwnd, HWND hwndOS2Win)
864{
865 ULONG rc, procidhwnd = -1, threadidhwnd = 0;
866
867 //SvL: Don't send WM_(NC)ACTIVATE messages when the window is being destroyed
868 if(fDestroyWindowCalled) {
869 return 0;
870 }
871
872 //According to SDK docs, if app returns FALSE & window is being deactivated,
873 //default processing is cancelled
874 //TODO: According to Wine we should proceed anyway if window is sysmodal
875#if 0
876 if(SendInternalMessageA(WM_NCACTIVATE, fActivate, 0) == FALSE && !fActivate)
877 {
878 return 0;
879 }
880#endif
881 /* child windows get WM_CHILDACTIVATE message */
882 if((getStyle() & (WS_CHILD | WS_POPUP)) == WS_CHILD )
883 {
884 SendInternalMessageA(WM_CHILDACTIVATE, 0, 0L);
885 return 0;
886 }
887
888 rc = SendInternalMessageA(WM_ACTIVATE, MAKELONG((fActivate) ? WA_ACTIVE : WA_INACTIVE, fMinimized), hwnd);
889
890 if(hwndOS2Win) {
891 threadidhwnd = O32_GetWindowThreadProcessId(hwndOS2Win, &procidhwnd);
892 }
893
894 if(fActivate) {
895 SendInternalMessageA(WM_ACTIVATEAPP, 1, dwThreadId); //activate; specify window thread id
896 }
897 else SendInternalMessageA(WM_ACTIVATEAPP, 0, threadidhwnd); //deactivate; specify thread id of other process
898 return rc;
899}
900//******************************************************************************
901//******************************************************************************
902ULONG Win32BaseWindow::DispatchMsgA(MSG *msg)
903{
904 return SendInternalMessageA(msg->message, msg->wParam, msg->lParam);
905}
906//******************************************************************************
907//******************************************************************************
908ULONG Win32BaseWindow::DispatchMsgW(MSG *msg)
909{
910 return SendInternalMessageW(msg->message, msg->wParam, msg->lParam);
911}
912//******************************************************************************
913//******************************************************************************
914ULONG Win32BaseWindow::MsgSetFocus(HWND hwnd)
915{
916 //SvL: Don't send WM_(NC)ACTIVATE messages when the window is being destroyed
917 if(fDestroyWindowCalled) {
918 return 0;
919 }
920
921 return SendInternalMessageA(WM_SETFOCUS, hwnd, 0);
922}
923//******************************************************************************
924//******************************************************************************
925ULONG Win32BaseWindow::MsgKillFocus(HWND hwnd)
926{
927 //SvL: Don't send WM_(NC)ACTIVATE messages when the window is being destroyed
928 if(fDestroyWindowCalled) {
929 return 0;
930 }
931 return SendInternalMessageA(WM_KILLFOCUS, hwnd, 0);
932}
933//******************************************************************************
934//******************************************************************************
935ULONG Win32BaseWindow::MsgButton(MSG *msg)
936{
937 BOOL fClick = FALSE;
938
939// dprintf(("MsgButton at (%d,%d)", msg->pt.x, msg->pt.y));
940 switch(msg->message) {
941 case WM_LBUTTONDBLCLK:
942 case WM_RBUTTONDBLCLK:
943 case WM_MBUTTONDBLCLK:
944 if (!(windowClass && windowClass->getClassLongA(GCL_STYLE) & CS_DBLCLKS))
945 {
946 msg->message = msg->message - (WM_LBUTTONDBLCLK - WM_LBUTTONDOWN); //dblclick -> down
947 MsgButton(msg);
948 msg->message++; //button-up
949 return MsgButton(msg);
950 }
951 break;
952 case WM_NCLBUTTONDBLCLK:
953 case WM_NCRBUTTONDBLCLK:
954 case WM_NCMBUTTONDBLCLK:
955 //Docs say CS_DBLCLKS style doesn't matter for non-client double clicks
956 fClick = TRUE;
957 break;
958
959 case WM_LBUTTONDOWN:
960 case WM_RBUTTONDOWN:
961 case WM_MBUTTONDOWN:
962 case WM_NCLBUTTONDOWN:
963 case WM_NCRBUTTONDOWN:
964 case WM_NCMBUTTONDOWN:
965 fClick = TRUE;
966 break;
967 }
968
969 if(fClick)
970 {
971 HWND hwndTop;
972
973 /* Activate the window if needed */
974 hwndTop = (GetTopParent()) ? GetTopParent()->getWindowHandle() : 0;
975
976 HWND hwndActive = GetActiveWindow();
977 if (hwndTop && (getWindowHandle() != hwndActive))
978 {
979 LONG ret = SendInternalMessageA(WM_MOUSEACTIVATE, hwndTop,
980 MAKELONG( lastHitTestVal, msg->message) );
981
982#if 0
983 if ((ret == MA_ACTIVATEANDEAT) || (ret == MA_NOACTIVATEANDEAT))
984 eatMsg = TRUE;
985#endif
986 if(((ret == MA_ACTIVATE) || (ret == MA_ACTIVATEANDEAT))
987 && (hwndTop != GetForegroundWindow()) )
988 {
989 Win32BaseWindow *win32top = Win32BaseWindow::GetWindowFromHandle(hwndTop);
990
991 //SvL: Calling OSLibSetActiveWindow(hwndTop); causes focus problems
992 if (win32top) OSLibWinSetFocus(win32top->getOS2FrameWindowHandle());
993 }
994 }
995 }
996
997 SendInternalMessageA(WM_SETCURSOR, getWindowHandle(), MAKELONG(lastHitTestVal, msg->message));
998
999 return SendInternalMessageA(msg->message, msg->wParam, msg->lParam);
1000}
1001//******************************************************************************
1002//******************************************************************************
1003ULONG Win32BaseWindow::MsgPaint(ULONG tmp1, BOOL select)
1004{
1005 if (select && IsWindowIconic())
1006 return SendInternalMessageA(WM_PAINTICON, 1, 0);
1007 else
1008 return SendInternalMessageA(WM_PAINT, 0, 0);
1009}
1010//******************************************************************************
1011//TODO: Is the clipper region of the window DC equal to the invalidated rectangle?
1012// (or are we simply erasing too much here)
1013//******************************************************************************
1014ULONG Win32BaseWindow::MsgEraseBackGround(HDC hdc)
1015{
1016 ULONG rc;
1017 HDC hdcErase = hdc;
1018
1019 if (hdcErase == 0)
1020 hdcErase = O32_GetDC(OS2Hwnd);
1021
1022 if(IsWindowIconic())
1023 rc = SendInternalMessageA(WM_ICONERASEBKGND, hdcErase, 0);
1024 else
1025 rc = SendInternalMessageA(WM_ERASEBKGND, hdcErase, 0);
1026 if (hdc == 0)
1027 O32_ReleaseDC(OS2Hwnd, hdcErase);
1028 return (rc);
1029}
1030//******************************************************************************
1031//******************************************************************************
1032ULONG Win32BaseWindow::MsgMouseMove(MSG *msg)
1033{
1034 //TODO: hiword should be 0 if window enters menu mode (SDK docs)
1035 SendInternalMessageA(WM_SETCURSOR, Win32Hwnd, MAKELONG(lastHitTestVal, msg->message));
1036
1037 //translated message == WM_(NC)MOUSEMOVE
1038 return SendInternalMessageA(msg->message, msg->wParam, msg->lParam);
1039}
1040//******************************************************************************
1041//******************************************************************************
1042ULONG Win32BaseWindow::MsgChar(MSG *msg)
1043{
1044 return DispatchMsgA(msg);
1045}
1046//******************************************************************************
1047//******************************************************************************
1048ULONG Win32BaseWindow::MsgNCPaint()
1049{
1050 RECT rect;
1051
1052 if (GetOS2UpdateRect(OS2HwndFrame,&rect))
1053 {
1054 HRGN hrgn;
1055 ULONG rc;
1056 RECT client = rectClient;
1057
1058//// mapWin32Rect(getParent() ? getParent()->getOS2WindowHandle():OSLIB_HWND_DESKTOP,OS2HwndFrame,&client);
1059 if ((rect.left >= client.left) && (rect.left < client.right) &&
1060 (rect.right >= client.left) && (rect.right < client.right) &&
1061 (rect.top >= client.top) && (rect.top < client.bottom) &&
1062 (rect.bottom >= client.top) && (rect.bottom < client.bottom))
1063 {
1064 return 0;
1065 }
1066
1067 dprintf(("MsgNCPaint (%d,%d)(%d,%d)", rect.left, rect.top, rect.right, rect.bottom));
1068 hrgn = CreateRectRgnIndirect(&rect);
1069 if (!hrgn) return 0;
1070
1071 rc = SendInternalMessageA(WM_NCPAINT,hrgn,0);
1072
1073 DeleteObject(hrgn);
1074
1075 return rc;
1076 }
1077 else return 0;
1078}
1079//******************************************************************************
1080//Called when either the frame's size or position has changed (lpWndPos != NULL)
1081//or when the frame layout has changed (i.e. scrollbars added/removed) (lpWndPos == NULL)
1082//******************************************************************************
1083ULONG Win32BaseWindow::MsgFormatFrame(WINDOWPOS *lpWndPos)
1084{
1085 RECT oldWindowRect = rectWindow, client = rectClient, newWindowRect;
1086 WINDOWPOS wndPos;
1087 ULONG rc;
1088
1089 if(lpWndPos)
1090 {
1091 POINT point;
1092
1093 //set new window rectangle
1094 point.x = lpWndPos->x;
1095 point.y = lpWndPos->y;
1096 if (getParent()) ClientToScreen(getParent()->getWindowHandle(),&point);
1097
1098 setWindowRect(point.x,point.y,point.x+lpWndPos->cx,point.y+lpWndPos->cy);
1099 newWindowRect = rectWindow;
1100 }
1101 else {
1102 wndPos.hwnd = getWindowHandle();
1103 wndPos.hwndInsertAfter = 0;
1104 newWindowRect= rectWindow;
1105 if (getParent()) {
1106 mapWin32Rect(OSLIB_HWND_DESKTOP,getParent()->getOS2WindowHandle(),&newWindowRect);
1107 }
1108 wndPos.x = newWindowRect.left;
1109 wndPos.y = newWindowRect.top;
1110 wndPos.cx = newWindowRect.right - newWindowRect.left;
1111 wndPos.cy = newWindowRect.bottom - newWindowRect.top;
1112 wndPos.flags = SWP_FRAMECHANGED;
1113 lpWndPos = &wndPos;
1114
1115 if (getParent()) {
1116 newWindowRect= rectWindow; //reset; was modified
1117 }
1118 }
1119
1120 rc = SendNCCalcSize(TRUE, &newWindowRect, &oldWindowRect, &client, lpWndPos, &rectClient);
1121
1122 dprintf(("MsgFormatFrame: old client rect (%d,%d)(%d,%d), new client (%d,%d)(%d,%d)", client.left, client.top, client.right, client.bottom, rectClient.left, rectClient.top, rectClient.right, rectClient.bottom));
1123 return rc;
1124}
1125//******************************************************************************
1126//******************************************************************************
1127ULONG Win32BaseWindow::MsgSetText(LPSTR lpsz, LONG cch)
1128{
1129 return SendInternalMessageA(WM_SETTEXT, 0, (LPARAM)lpsz);
1130}
1131//******************************************************************************
1132//******************************************************************************
1133ULONG Win32BaseWindow::MsgGetTextLength()
1134{
1135 return SendInternalMessageA(WM_GETTEXTLENGTH, 0, 0);
1136}
1137//******************************************************************************
1138//******************************************************************************
1139void Win32BaseWindow::MsgGetText(char *wndtext, ULONG textlength)
1140{
1141 SendInternalMessageA(WM_GETTEXT, textlength, (LPARAM)wndtext);
1142}
1143//******************************************************************************
1144//******************************************************************************
1145BOOL Win32BaseWindow::isMDIClient()
1146{
1147 return FALSE;
1148}
1149//******************************************************************************
1150//******************************************************************************
1151BOOL Win32BaseWindow::isMDIChild()
1152{
1153 return FALSE;
1154}
1155//******************************************************************************
1156//TODO: Not complete
1157//******************************************************************************
1158BOOL Win32BaseWindow::isFrameWindow()
1159{
1160// if(isMDIChild() || IsDialog() || (getParent() == NULL || getParent() == windowDesktop) && ((dwStyle & WS_CAPTION) == WS_CAPTION))
1161 if((dwStyle & WS_CAPTION) == WS_CAPTION || dwStyle & (WS_VSCROLL|WS_HSCROLL))
1162 return TRUE;
1163
1164 return FALSE;
1165}
1166//******************************************************************************
1167//******************************************************************************
1168BOOL Win32BaseWindow::IsWindowIconic()
1169{
1170 return ((getStyle() & WS_MINIMIZE) && windowClass->getIcon());
1171}
1172//******************************************************************************
1173//******************************************************************************
1174SCROLLBAR_INFO *Win32BaseWindow::getScrollInfo(int nBar)
1175{
1176 switch(nBar)
1177 {
1178 case SB_HORZ:
1179 if (!horzScrollInfo)
1180 {
1181 horzScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
1182 if (!horzScrollInfo) break;
1183 horzScrollInfo->MinVal = horzScrollInfo->CurVal = horzScrollInfo->Page = 0;
1184 horzScrollInfo->MaxVal = 100;
1185 horzScrollInfo->flags = ESB_ENABLE_BOTH;
1186 }
1187 return horzScrollInfo;
1188
1189 case SB_VERT:
1190 if (!vertScrollInfo)
1191 {
1192 vertScrollInfo = (SCROLLBAR_INFO*)malloc(sizeof(SCROLLBAR_INFO));
1193 if (!vertScrollInfo) break;
1194 vertScrollInfo->MinVal = vertScrollInfo->CurVal = vertScrollInfo->Page = 0;
1195 vertScrollInfo->MaxVal = 100;
1196 vertScrollInfo->flags = ESB_ENABLE_BOTH;
1197 }
1198 return vertScrollInfo;
1199 }
1200
1201 return NULL;
1202}
1203//******************************************************************************
1204//******************************************************************************
1205LRESULT Win32BaseWindow::DefWndControlColor(UINT ctlType, HDC hdc)
1206{
1207 //SvL: Set background color to default button color (not window (white))
1208 if(ctlType == CTLCOLOR_BTN)
1209 {
1210 SetBkColor(hdc, GetSysColor(COLOR_BTNFACE));
1211 SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT));
1212 return GetSysColorBrush(COLOR_BTNFACE);
1213 }
1214 //SvL: Set background color to default dialog color if window is dialog
1215 if((ctlType == CTLCOLOR_DLG || ctlType == CTLCOLOR_STATIC) && IsDialog()) {
1216 SetBkColor(hdc, GetSysColor(COLOR_BTNFACE));
1217 SetTextColor(hdc, GetSysColor(COLOR_WINDOWTEXT));
1218 return GetSysColorBrush(COLOR_BTNFACE);
1219 }
1220
1221 if( ctlType == CTLCOLOR_SCROLLBAR)
1222 {
1223 HBRUSH hb = GetSysColorBrush(COLOR_SCROLLBAR);
1224 COLORREF bk = GetSysColor(COLOR_3DHILIGHT);
1225 SetTextColor( hdc, GetSysColor(COLOR_3DFACE));
1226 SetBkColor( hdc, bk);
1227
1228 /* if COLOR_WINDOW happens to be the same as COLOR_3DHILIGHT
1229 * we better use 0x55aa bitmap brush to make scrollbar's background
1230 * look different from the window background.
1231 */
1232 if (bk == GetSysColor(COLOR_WINDOW)) {
1233 return GetPattern55AABrush();
1234 }
1235
1236 UnrealizeObject( hb );
1237 return (LRESULT)hb;
1238 }
1239
1240 SetTextColor( hdc, GetSysColor(COLOR_WINDOWTEXT));
1241
1242 if ((ctlType == CTLCOLOR_EDIT) || (ctlType == CTLCOLOR_LISTBOX))
1243 {
1244 SetBkColor( hdc, GetSysColor(COLOR_WINDOW) );
1245 }
1246 else
1247 {
1248 SetBkColor( hdc, GetSysColor(COLOR_3DFACE) );
1249 return (LRESULT)GetSysColorBrush(COLOR_3DFACE);
1250 }
1251 return (LRESULT)GetSysColorBrush(COLOR_WINDOW);
1252}
1253//******************************************************************************
1254//******************************************************************************
1255LRESULT Win32BaseWindow::DefWndPrint(HDC hdc,ULONG uFlags)
1256{
1257 /*
1258 * Visibility flag.
1259 */
1260 if ( (uFlags & PRF_CHECKVISIBLE) &&
1261 !IsWindowVisible() )
1262 return 0;
1263
1264 /*
1265 * Unimplemented flags.
1266 */
1267 if ( (uFlags & PRF_CHILDREN) ||
1268 (uFlags & PRF_OWNED) ||
1269 (uFlags & PRF_NONCLIENT) )
1270 {
1271 dprintf(("WM_PRINT message with unsupported flags\n"));
1272 }
1273
1274 /*
1275 * Background
1276 */
1277 if ( uFlags & PRF_ERASEBKGND)
1278 SendInternalMessageA(WM_ERASEBKGND, (WPARAM)hdc, 0);
1279
1280 /*
1281 * Client area
1282 */
1283 if ( uFlags & PRF_CLIENT)
1284 SendInternalMessageA(WM_PRINTCLIENT, (WPARAM)hdc, PRF_CLIENT);
1285
1286
1287 return 0;
1288}
1289//******************************************************************************
1290//******************************************************************************
1291LRESULT Win32BaseWindow::DefWindowProcA(UINT Msg, WPARAM wParam, LPARAM lParam)
1292{
1293 switch(Msg)
1294 {
1295 case WM_CLOSE:
1296 dprintf(("DefWindowProcA: WM_CLOSE %x", getWindowHandle()));
1297 DestroyWindow();
1298 return 0;
1299
1300 case WM_GETTEXTLENGTH:
1301 return wndNameLength;
1302
1303 case WM_GETTEXT:
1304 if (!lParam || !wParam) return 0;
1305 if (!windowNameA) ((LPSTR)lParam)[0] = 0;
1306 else lstrcpynA((LPSTR)lParam, windowNameA, wParam);
1307 return min(wndNameLength, wParam);
1308
1309 case WM_SETTEXT:
1310 {
1311 LPCSTR lpsz = (LPCSTR)lParam;
1312
1313 if(windowNameA) free(windowNameA);
1314 if(windowNameW) free(windowNameW);
1315 if (lParam)
1316 {
1317 wndNameLength = strlen(lpsz);
1318 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
1319 strcpy(windowNameA, lpsz);
1320 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
1321 lstrcpyAtoW(windowNameW, windowNameA);
1322 }
1323 else
1324 {
1325 windowNameA = NULL;
1326 windowNameW = NULL;
1327 wndNameLength = 0;
1328 }
1329 dprintf(("WM_SETTEXT of %x to %s\n", Win32Hwnd, lParam));
1330 if ((dwStyle & WS_CAPTION) == WS_CAPTION)
1331 {
1332// HandleNCPaint((HRGN)1);
1333 OSLibWinSetWindowText(OS2HwndFrame,(LPSTR)windowNameA);
1334 }
1335
1336 return TRUE;
1337 }
1338
1339 case WM_SETREDRAW:
1340 {
1341 if (wParam)
1342 {
1343 setStyle(getStyle() | WS_VISIBLE);
1344 OSLibWinEnableWindowUpdate(OS2HwndFrame,TRUE);
1345 }
1346 else
1347 {
1348 if (getStyle() & WS_VISIBLE)
1349 {
1350 setStyle(getStyle() & ~WS_VISIBLE);
1351 OSLibWinEnableWindowUpdate(OS2HwndFrame,FALSE);
1352 }
1353 }
1354 return 0;
1355 }
1356
1357 case WM_CTLCOLORMSGBOX:
1358 case WM_CTLCOLOREDIT:
1359 case WM_CTLCOLORLISTBOX:
1360 case WM_CTLCOLORBTN:
1361 case WM_CTLCOLORDLG:
1362 case WM_CTLCOLORSTATIC:
1363 case WM_CTLCOLORSCROLLBAR:
1364 return DefWndControlColor(Msg - WM_CTLCOLORMSGBOX, (HDC)wParam);
1365
1366 case WM_CTLCOLOR:
1367 return DefWndControlColor(HIWORD(lParam), (HDC)wParam);
1368
1369 case WM_VKEYTOITEM:
1370 case WM_CHARTOITEM:
1371 return -1;
1372
1373 case WM_PARENTNOTIFY:
1374 return 0;
1375
1376 case WM_MOUSEACTIVATE:
1377 {
1378 dprintf(("DefWndProc: WM_MOUSEACTIVATE for %x Msg %s", Win32Hwnd, GetMsgText(HIWORD(lParam))));
1379 if(getStyle() & WS_CHILD && !(getExStyle() & WS_EX_NOPARENTNOTIFY) )
1380 {
1381 if(getParent()) {
1382 LRESULT rc = getParent()->SendInternalMessageA(WM_MOUSEACTIVATE, wParam, lParam );
1383 if(rc) return rc;
1384 }
1385 }
1386 return (LOWORD(lParam) == HTCAPTION) ? MA_NOACTIVATE : MA_ACTIVATE;
1387 }
1388
1389 case WM_ACTIVATE:
1390 return 0;
1391
1392 case WM_SETCURSOR:
1393 {
1394 dprintf(("DefWndProc: WM_SETCURSOR for %x Msg %s", Win32Hwnd, GetMsgText(HIWORD(lParam))));
1395 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY))
1396 {
1397 if(getParent()) {
1398 LRESULT rc = getParent()->SendInternalMessageA(WM_SETCURSOR, wParam, lParam);
1399 if(rc) return rc;
1400 }
1401 }
1402 if (wParam == Win32Hwnd)
1403 {
1404 HCURSOR hCursor;
1405
1406 switch(LOWORD(lParam))
1407 {
1408 case HTCLIENT:
1409 hCursor = windowClass ? windowClass->getCursor():LoadCursorA(0,IDC_ARROWA);
1410 break;
1411
1412 case HTLEFT:
1413 case HTRIGHT:
1414 hCursor = LoadCursorA(0,IDC_SIZEWEA);
1415 break;
1416
1417 case HTTOP:
1418 case HTBOTTOM:
1419 hCursor = LoadCursorA(0,IDC_SIZENSA);
1420 break;
1421
1422 case HTTOPLEFT:
1423 case HTBOTTOMRIGHT:
1424 hCursor = LoadCursorA(0,IDC_SIZENWSEA);
1425 break;
1426
1427 case HTTOPRIGHT:
1428 case HTBOTTOMLEFT:
1429 hCursor = LoadCursorA(0,IDC_SIZENESWA);
1430 break;
1431
1432 default:
1433 hCursor = LoadCursorA(0,IDC_ARROWA);
1434 break;
1435 }
1436
1437 if (hCursor)
1438 {
1439 SetCursor(hCursor);
1440 return 1;
1441 }
1442 else return 0;
1443 }
1444 else return 0;
1445 }
1446
1447 case WM_MOUSEMOVE:
1448 return 0;
1449
1450 case WM_WINDOWPOSCHANGED:
1451 {
1452 PWINDOWPOS wpos = (PWINDOWPOS)lParam;
1453 WPARAM wp = SIZE_RESTORED;
1454
1455 if (!(wpos->flags & SWP_NOMOVE) && !(wpos->flags & SWP_NOCLIENTMOVE))
1456 {
1457 SendInternalMessageA(WM_MOVE, 0, MAKELONG(rectClient.left,rectClient.top));
1458 }
1459 if (!(wpos->flags & SWP_NOSIZE) && !(wpos->flags & SWP_NOCLIENTSIZE))
1460 {
1461 if (dwStyle & WS_MAXIMIZE) wp = SIZE_MAXIMIZED;
1462 else
1463 if (dwStyle & WS_MINIMIZE) wp = SIZE_MINIMIZED;
1464
1465 SendInternalMessageA(WM_SIZE, wp, MAKELONG(rectClient.right - rectClient.left,
1466 rectClient.bottom - rectClient.top));
1467 }
1468 return 0;
1469 }
1470 case WM_WINDOWPOSCHANGING:
1471 return HandleWindowPosChanging((WINDOWPOS *)lParam);
1472
1473 case WM_ERASEBKGND:
1474 case WM_ICONERASEBKGND:
1475 {
1476 RECT rect;
1477 int rc;
1478
1479 if (!windowClass || !windowClass->getBackgroundBrush()) return 0;
1480
1481 rc = GetClipBox( (HDC)wParam, &rect );
1482 if ((rc == SIMPLEREGION) || (rc == COMPLEXREGION))
1483 {
1484 HBRUSH hBrush = windowClass->getBackgroundBrush();
1485
1486 if (hBrush <= (HBRUSH)(SYSCOLOR_GetLastColor()+1))
1487 hBrush = GetSysColorBrush(hBrush-1);
1488
1489 FillRect( (HDC)wParam, &rect, hBrush);
1490 }
1491 return 1;
1492 }
1493
1494 case WM_PRINT:
1495 return DefWndPrint(wParam,lParam);
1496
1497 case WM_PAINTICON:
1498 case WM_PAINT:
1499 {
1500 PAINTSTRUCT ps;
1501 HDC hdc = BeginPaint(getWindowHandle(), &ps );
1502 if( hdc )
1503 {
1504 if( (getStyle() & WS_MINIMIZE) && (getWindowClass()->getIcon() && hIcon))
1505 {
1506 int x = (rectWindow.right - rectWindow.left - GetSystemMetrics(SM_CXICON))/2;
1507 int y = (rectWindow.bottom - rectWindow.top - GetSystemMetrics(SM_CYICON))/2;
1508 dprintf(("Painting class icon: vis rect=(%i,%i - %i,%i)\n", ps.rcPaint.left, ps.rcPaint.top, ps.rcPaint.right, ps.rcPaint.bottom ));
1509 DrawIcon(hdc, x, y, hIcon ? hIcon:getWindowClass()->getIcon() );
1510 }
1511 EndPaint(getWindowHandle(), &ps );
1512 }
1513 return 0;
1514 }
1515
1516 case WM_GETDLGCODE:
1517 return 0;
1518
1519 case WM_NCPAINT:
1520 return HandleNCPaint((HRGN)wParam);
1521
1522 case WM_NCACTIVATE:
1523 return HandleNCActivate(wParam);
1524
1525 case WM_NCCREATE:
1526 return(TRUE);
1527
1528 case WM_NCDESTROY:
1529 return 0;
1530
1531 case WM_NCCALCSIZE:
1532 return HandleNCCalcSize((BOOL)wParam,(RECT*)lParam);
1533
1534 case WM_NCLBUTTONDOWN:
1535 return HandleNCLButtonDown(wParam,lParam);
1536
1537 case WM_LBUTTONDBLCLK:
1538 case WM_NCLBUTTONDBLCLK:
1539 return HandleNCLButtonDblClk(wParam,lParam);
1540
1541 case WM_NCRBUTTONDOWN:
1542 case WM_NCRBUTTONDBLCLK:
1543 case WM_NCMBUTTONDOWN:
1544 case WM_NCMBUTTONDBLCLK:
1545 if (lastHitTestVal == HTERROR) MessageBeep(MB_ICONEXCLAMATION);
1546 return 0;
1547
1548 case WM_NCRBUTTONUP:
1549 return HandleNCRButtonUp(wParam,lParam);
1550
1551 case WM_NCMBUTTONUP:
1552 return 0;
1553
1554 case WM_NCHITTEST:
1555 {
1556 POINT point;
1557 LRESULT retvalue;
1558
1559 point.x = (SHORT)LOWORD(lParam);
1560 point.y = (SHORT)HIWORD(lParam);
1561
1562 retvalue = HandleNCHitTest(point);
1563#if 0 //CB: let the Corel people fix the bugs first
1564 if(retvalue == HTMENU)
1565 MENU_TrackMouseMenuBar_MouseMove(Win32Hwnd,point,TRUE);
1566 else
1567 MENU_TrackMouseMenuBar_MouseMove(Win32Hwnd,point,FALSE);
1568#endif
1569 return retvalue;
1570 }
1571
1572 case WM_SYSCOMMAND:
1573 {
1574 POINT point;
1575
1576 point.x = LOWORD(lParam);
1577 point.y = HIWORD(lParam);
1578 return HandleSysCommand(wParam,&point);
1579 }
1580
1581 case WM_SYSKEYDOWN:
1582 if(wParam == VK_F4) /* try to close the window */
1583 {
1584 Win32BaseWindow *window = GetTopParent();
1585 if(window && !(window->getClass()->getStyle() & CS_NOCLOSE))
1586 PostMessageA(getWindowHandle(), WM_SYSCOMMAND, SC_CLOSE, 0);
1587 }
1588
1589 Win32BaseWindow *siblingWindow;
1590 HWND sibling;
1591 char nameBuffer [40], mnemonic;
1592 int nameLength;
1593
1594 GetWindowTextA (nameBuffer, 40);
1595
1596 // search all sibling to see it this key is their mnemonic
1597 sibling = GetWindow (GW_HWNDFIRST);
1598 while (sibling != 0) {
1599 siblingWindow = GetWindowFromHandle (sibling);
1600 nameLength = siblingWindow->GetWindowTextA (nameBuffer, 40);
1601
1602 // find the siblings mnemonic
1603 mnemonic = '\0';
1604 for (int i=0 ; i<nameLength ; i++) {
1605 if (nameBuffer [i] == '&') {
1606 mnemonic = nameBuffer [i+1];
1607 if ((mnemonic >= 'a') && (mnemonic <= 'z'))
1608 mnemonic -= 32; // make it uppercase
1609 break; // stop searching
1610 }
1611 }
1612
1613 // key matches siblings mnemonic, send mouseclick
1614 if (mnemonic == (char) wParam) {
1615 siblingWindow->SendInternalMessageA (BM_CLICK, 0, 0);
1616 }
1617
1618 sibling = siblingWindow->GetNextWindow (GW_HWNDNEXT);
1619 }
1620
1621 return 0;
1622
1623#if 0 //CB: todo: MSDN docu: Windown handles these messages and not WM_SYSCHAR (the code below doesn't work)
1624 case WM_KEYDOWN:
1625 case WM_KEYUP:
1626 case WM_SYSKEYDOWN:
1627 case WM_SYSKEYUP:
1628#endif
1629
1630 case WM_SYSCHAR:
1631 {
1632 int iMenuSysKey = 0;
1633 if (wParam == VK_RETURN && (getStyle() & WS_MINIMIZE))
1634 {
1635 PostMessageA(getWindowHandle(), WM_SYSCOMMAND,
1636 (WPARAM)SC_RESTORE, 0L );
1637 break;
1638 }
1639 if((HIWORD(lParam) & KEYDATA_ALT) && wParam)
1640 {
1641 if (wParam == VK_TAB || wParam == VK_ESCAPE)
1642 break;
1643 if (wParam == VK_SPACE && (getStyle() & WS_CHILD)) {
1644 getParent()->SendMessageA(Msg, wParam, lParam );
1645 }
1646 else SendMessageA(WM_SYSCOMMAND, (WPARAM)SC_KEYMENU, (LPARAM)(DWORD)wParam );
1647 }
1648 else /* check for Ctrl-Esc */
1649 if (wParam != VK_ESCAPE) MessageBeep(0);
1650 break;
1651 }
1652
1653 case WM_SETHOTKEY:
1654 hotkey = wParam;
1655 return 1; //CB: always successful
1656
1657 case WM_GETHOTKEY:
1658 return hotkey;
1659
1660 case WM_CONTEXTMENU:
1661 if ((dwStyle & WS_CHILD) && getParent())
1662 getParent()->SendInternalMessageA(WM_CONTEXTMENU,wParam,lParam);
1663 return 0;
1664
1665 case WM_SHOWWINDOW:
1666 if (!lParam) return 0; /* sent from ShowWindow */
1667 if (!(dwStyle & WS_POPUP) || !owner) return 0;
1668 if ((dwStyle & WS_VISIBLE) && wParam) return 0;
1669 else if (!(dwStyle & WS_VISIBLE) && !wParam) return 0;
1670 ShowWindow(wParam ? SW_SHOW:SW_HIDE);
1671 return 0;
1672
1673 case WM_CANCELMODE:
1674 if (getParent() == windowDesktop) EndMenu();
1675 if (GetCapture() == Win32Hwnd) ReleaseCapture();
1676 return 0;
1677
1678 case WM_DROPOBJECT:
1679 return DRAG_FILE;
1680
1681 case WM_QUERYDROPOBJECT:
1682 return (dwExStyle & WS_EX_ACCEPTFILES) ? 1:0;
1683
1684 case WM_QUERYDRAGICON:
1685 {
1686 HICON hDragIcon = windowClass->getCursor();
1687 UINT len;
1688
1689 if(hDragIcon) return (LRESULT)hDragIcon;
1690 for(len = 1; len < 64; len++)
1691 {
1692 hDragIcon = LoadIconA(hInstance,MAKEINTRESOURCEA(len));
1693 if(hDragIcon)
1694 return (LRESULT)hDragIcon;
1695 }
1696 return (LRESULT)LoadIconA(0,IDI_APPLICATIONA);
1697 }
1698
1699 case WM_QUERYOPEN:
1700 case WM_QUERYENDSESSION:
1701 return 1;
1702
1703 case WM_NOTIFYFORMAT:
1704 return IsWindowUnicode() ? NFR_UNICODE:NFR_ANSI;
1705
1706 case WM_SETICON:
1707 case WM_GETICON:
1708 {
1709 LRESULT result = 0;
1710
1711 /* Set the appropriate icon members in the window structure. */
1712 if (wParam == ICON_SMALL)
1713 {
1714 result = hIconSm;
1715 if (Msg == WM_SETICON)
1716 hIconSm = (HICON)lParam;
1717 }
1718 else
1719 {
1720 result = hIcon;
1721 if (Msg == WM_SETICON)
1722 {
1723 hIcon = (HICON)lParam;
1724 if ((dwStyle & WS_CAPTION) == WS_CAPTION)
1725 OSLibWinSetIcon(OS2HwndFrame,hIcon);
1726 }
1727 }
1728 if ((Msg == WM_SETICON) && ((dwStyle & WS_CAPTION) == WS_CAPTION))
1729 HandleNCPaint((HRGN)1);
1730
1731 return result;
1732 }
1733
1734 case WM_HELP:
1735 if (getParent()) getParent()->SendInternalMessageA(Msg,wParam,lParam);
1736 break;
1737
1738 case WM_NOTIFY:
1739 return 0; //comctl32 controls expect this
1740
1741 default:
1742 return 0;
1743 }
1744 return 0;
1745}
1746//******************************************************************************
1747//******************************************************************************
1748LRESULT Win32BaseWindow::DefWindowProcW(UINT Msg, WPARAM wParam, LPARAM lParam)
1749{
1750 switch(Msg)
1751 {
1752 case WM_GETTEXTLENGTH:
1753 return wndNameLength;
1754
1755 case WM_GETTEXT:
1756 if (!lParam || !wParam) return 0;
1757 if (!windowNameW) ((LPWSTR)lParam)[0] = 0;
1758 else lstrcpynW((LPWSTR)lParam,windowNameW,wParam);
1759 return min(wndNameLength,wParam);
1760
1761 case WM_SETTEXT:
1762 {
1763 LPWSTR lpsz = (LPWSTR)lParam;
1764
1765 if(windowNameA) free(windowNameA);
1766 if(windowNameW) free(windowNameW);
1767 if (lParam)
1768 {
1769 wndNameLength = lstrlenW(lpsz);
1770 windowNameA = (LPSTR)_smalloc(wndNameLength+1);
1771 lstrcpyWtoA(windowNameA,lpsz);
1772 windowNameW = (LPWSTR)_smalloc((wndNameLength+1)*sizeof(WCHAR));
1773 lstrcpyW(windowNameW,lpsz);
1774 }
1775 else
1776 {
1777 windowNameA = NULL;
1778 windowNameW = NULL;
1779 wndNameLength = 0;
1780 }
1781 dprintf(("WM_SETTEXT of %x\n",Win32Hwnd));
1782 if ((dwStyle & WS_CAPTION) == WS_CAPTION)
1783 {
1784 HandleNCPaint((HRGN)1);
1785 OSLibWinSetWindowText(OS2HwndFrame,(LPSTR)windowNameA);
1786 }
1787
1788 return TRUE;
1789 }
1790
1791 default:
1792 return DefWindowProcA(Msg, wParam, lParam);
1793 }
1794}
1795//******************************************************************************
1796//******************************************************************************
1797LRESULT Win32BaseWindow::SendMessageA(ULONG Msg, WPARAM wParam, LPARAM lParam)
1798{
1799 //if the destination window is created by this process & thread, call window proc directly
1800 if(dwProcessId == currentProcessId && dwThreadId == GetCurrentThreadId()) {
1801 return SendInternalMessageA(Msg, wParam, lParam);
1802 }
1803 //otherwise use WinSendMsg to send it to the right process/thread
1804 dprintf(("SendMessages (inter-process) %x %x %x %x", getWindowHandle(), Msg, wParam, lParam));
1805 return OSLibSendMessage(getOS2WindowHandle(), Msg, wParam, lParam, FALSE);
1806}
1807//******************************************************************************
1808//******************************************************************************
1809LRESULT Win32BaseWindow::SendMessageW(ULONG Msg, WPARAM wParam, LPARAM lParam)
1810{
1811 //if the destination window is created by this process & thread, call window proc directly
1812 if(dwProcessId == currentProcessId && dwThreadId == GetCurrentThreadId()) {
1813 return SendInternalMessageW(Msg, wParam, lParam);
1814 }
1815 //otherwise use WinSendMsg to send it to the right process/thread
1816 return OSLibSendMessage(getOS2WindowHandle(), Msg, wParam, lParam, TRUE);
1817}
1818//******************************************************************************
1819//Called as a result of an OS/2 message or called from a class method
1820//******************************************************************************
1821LRESULT Win32BaseWindow::SendInternalMessageA(ULONG Msg, WPARAM wParam, LPARAM lParam)
1822{
1823 LRESULT rc;
1824 BOOL fInternalMsgBackup = fInternalMsg;
1825
1826 DebugPrintMessage(getWindowHandle(), Msg, wParam, lParam, FALSE, TRUE);
1827
1828 CallWindowHookProc(WH_CALLWNDPROC, Msg, wParam, lParam, FALSE);
1829
1830 fInternalMsg = TRUE;
1831 switch(Msg)
1832 {
1833 case WM_CREATE:
1834 {
1835 if(CallWindowProcA(win32wndproc, getWindowHandle(), WM_CREATE, 0, lParam) == -1) {
1836 dprintf(("WM_CREATE returned -1\n"));
1837 rc = -1; //don't create window
1838 break;
1839 }
1840 rc = 0;
1841 break;
1842 }
1843 case WM_LBUTTONDOWN:
1844 case WM_MBUTTONDOWN:
1845 case WM_RBUTTONDOWN:
1846 {
1847 if (getParent())
1848 {
1849 POINTS pt = MAKEPOINTS(lParam);
1850 POINT point;
1851
1852 point.x = pt.x;
1853 point.y = pt.y;
1854 mapWin32Point(OS2Hwnd,getParent()->getOS2WindowHandle(),(OSLIBPOINT*)&point);
1855 NotifyParent(Msg,wParam,MAKELPARAM(point.x,point.y));
1856 }
1857 rc = win32wndproc(getWindowHandle(), Msg, wParam, lParam);
1858 break;
1859 }
1860
1861 case WM_DESTROY:
1862 rc = win32wndproc(getWindowHandle(), WM_DESTROY, 0, 0);
1863 break;
1864
1865 default:
1866 rc = CallWindowProcA(win32wndproc, getWindowHandle(), Msg, wParam, lParam);
1867 break;
1868 }
1869 fInternalMsg = fInternalMsgBackup;
1870 return rc;
1871}
1872//******************************************************************************
1873//Called as a result of an OS/2 message or called from a class method
1874//******************************************************************************
1875LRESULT Win32BaseWindow::SendInternalMessageW(ULONG Msg, WPARAM wParam, LPARAM lParam)
1876{
1877 LRESULT rc;
1878 BOOL fInternalMsgBackup = fInternalMsg;
1879
1880 DebugPrintMessage(getWindowHandle(), Msg, wParam, lParam, TRUE, TRUE);
1881
1882 CallWindowHookProc(WH_CALLWNDPROC, Msg, wParam, lParam, TRUE);
1883
1884 fInternalMsg = TRUE;
1885 switch(Msg)
1886 {
1887 case WM_CREATE:
1888 {
1889 if(CallWindowProcW(win32wndproc, getWindowHandle(), WM_CREATE, 0, lParam) == -1) {
1890 dprintf(("WM_CREATE returned -1\n"));
1891 rc = -1; //don't create window
1892 break;
1893 }
1894 rc = 0;
1895 break;
1896 }
1897 case WM_LBUTTONDOWN:
1898 case WM_MBUTTONDOWN:
1899 case WM_RBUTTONDOWN:
1900 NotifyParent(Msg, wParam, lParam);
1901 rc = win32wndproc(getWindowHandle(), Msg, wParam, lParam);
1902 break;
1903
1904 case WM_DESTROY:
1905 rc = win32wndproc(getWindowHandle(), WM_DESTROY, 0, 0);
1906 break;
1907 default:
1908 rc = CallWindowProcW(win32wndproc, getWindowHandle(), Msg, wParam, lParam);
1909 break;
1910 }
1911 fInternalMsg = fInternalMsgBackup;
1912 return rc;
1913}
1914//******************************************************************************
1915//******************************************************************************
1916void Win32BaseWindow::CallWindowHookProc(ULONG hooktype, ULONG Msg, WPARAM wParam, LPARAM lParam, BOOL fUnicode)
1917{
1918 CWPSTRUCT cwp;
1919
1920 cwp.lParam = lParam;
1921 cwp.wParam = wParam;
1922 cwp.message = Msg;
1923 cwp.hwnd = getWindowHandle();
1924
1925 switch(hooktype) {
1926 case WH_CALLWNDPROC:
1927 if(fUnicode) {
1928 HOOK_CallHooksW(WH_CALLWNDPROC, HC_ACTION, 1, (LPARAM)&cwp);
1929 }
1930 else HOOK_CallHooksA(WH_CALLWNDPROC, HC_ACTION, 1, (LPARAM)&cwp);
1931 break;
1932 }
1933}
1934//******************************************************************************
1935//TODO: Do this more efficiently
1936//******************************************************************************
1937LRESULT Win32BaseWindow::BroadcastMessageA(int type, UINT msg, WPARAM wParam, LPARAM lParam)
1938{
1939 Win32BaseWindow *window;
1940 HWND hwnd = WNDHANDLE_MAGIC_HIGHWORD;
1941
1942 dprintf(("BroadCastMessageA %x %x %x", msg, wParam, lParam, GetFS()));
1943
1944 for(int i=0;i<MAX_WINDOW_HANDLES;i++) {
1945 window = GetWindowFromHandle(hwnd++);
1946 if(window) {
1947 if ((window->getStyle() & WS_POPUP) || ((window->getStyle() & WS_CAPTION) == WS_CAPTION))
1948 {
1949
1950 if(type == BROADCAST_SEND) {
1951 window->SendInternalMessageA(msg, wParam, lParam);
1952 }
1953 else PostMessageA(window->getWindowHandle(), msg, wParam, lParam);
1954 }
1955 }
1956 }
1957 return 0;
1958}
1959//******************************************************************************
1960//TODO: Do this more efficiently
1961//******************************************************************************
1962LRESULT Win32BaseWindow::BroadcastMessageW(int type, UINT msg, WPARAM wParam, LPARAM lParam)
1963{
1964 Win32BaseWindow *window;
1965 HWND hwnd = WNDHANDLE_MAGIC_HIGHWORD;
1966
1967 dprintf(("BroadCastMessageW %x %x %x", msg, wParam, lParam));
1968
1969 for(int i=0;i<MAX_WINDOW_HANDLES;i++) {
1970 window = GetWindowFromHandle(hwnd++);
1971 if(window) {
1972 if ((window->getStyle() & WS_POPUP) || ((window->getStyle() & WS_CAPTION) == WS_CAPTION))
1973 {
1974
1975 if(type == BROADCAST_SEND) {
1976 window->SendInternalMessageW(msg, wParam, lParam);
1977 }
1978 else PostMessageW(window->getWindowHandle(), msg, wParam, lParam);
1979 }
1980 }
1981 }
1982 return 0;
1983}
1984//******************************************************************************
1985//******************************************************************************
1986void Win32BaseWindow::NotifyParent(UINT Msg, WPARAM wParam, LPARAM lParam)
1987{
1988 Win32BaseWindow *window = this;
1989 Win32BaseWindow *parentwindow;
1990
1991 while(window)
1992 {
1993 if(window->getStyle() & WS_CHILD && !(window->getExStyle() & WS_EX_NOPARENTNOTIFY) )
1994 {
1995 /* Notify the parent window only */
1996 parentwindow = window->getParent();
1997 if(parentwindow) {
1998 parentwindow->SendInternalMessageA(WM_PARENTNOTIFY, MAKEWPARAM(Msg, getWindowId()), lParam );
1999 }
2000 }
2001 else break;
2002
2003 window = parentwindow;
2004 }
2005}
2006//******************************************************************************
2007// Returns the big or small icon for the window, falling back to the
2008// class as windows does.
2009//******************************************************************************
2010HICON Win32BaseWindow::IconForWindow(WPARAM fType)
2011{
2012 HICON hWndIcon;
2013
2014 if (fType == ICON_BIG)
2015 {
2016 if (hIcon) hWndIcon = hIcon;
2017 else if (windowClass && windowClass->getIcon()) hWndIcon = windowClass->getIcon();
2018 else if (!(dwStyle & DS_MODALFRAME))
2019 hWndIcon = LoadImageA(0,MAKEINTRESOURCEA(OIC_ODINICON),IMAGE_ICON,0,0,LR_DEFAULTCOLOR);
2020 else hWndIcon = 0;
2021 } else
2022 {
2023 if (hIconSm) hWndIcon = hIconSm;
2024 else if (hIcon) hWndIcon = hIcon;
2025 else if (windowClass && windowClass->getIconSm()) hWndIcon = windowClass->getIconSm();
2026 else if (windowClass && windowClass->getIcon()) hWndIcon = windowClass->getIcon();
2027 else if (!(dwStyle & DS_MODALFRAME))
2028 hWndIcon = LoadImageA(0,MAKEINTRESOURCEA(OIC_ODINICON),IMAGE_ICON,0,0,LR_DEFAULTCOLOR);
2029 else hWndIcon = 0;
2030 }
2031
2032 return hWndIcon;
2033}
2034//******************************************************************************
2035//******************************************************************************
2036BOOL Win32BaseWindow::ShowWindow(ULONG nCmdShow)
2037{
2038 ULONG showstate = 0;
2039 HWND hWinAfter;
2040 BOOL rc;
2041
2042 dprintf(("ShowWindow %x %x", getWindowHandle(), nCmdShow));
2043
2044 if(getWindowHandle() == 0x68000002) {
2045// DebugInt3();
2046 }
2047 switch(nCmdShow)
2048 {
2049 case SW_SHOW:
2050 case SW_SHOWDEFAULT: //todo
2051 showstate = SWPOS_SHOW | SWPOS_ACTIVATE;
2052 break;
2053 case SW_HIDE:
2054 showstate = SWPOS_HIDE;
2055 break;
2056 case SW_RESTORE:
2057 showstate = SWPOS_RESTORE | SWPOS_SHOW | SWPOS_ACTIVATE;
2058 break;
2059 case SW_MINIMIZE:
2060 showstate = SWPOS_MINIMIZE;
2061 break;
2062 case SW_SHOWMAXIMIZED:
2063 showstate = SWPOS_MAXIMIZE | SWPOS_SHOW | SWPOS_ACTIVATE;
2064 break;
2065 case SW_SHOWMINIMIZED:
2066 showstate = SWPOS_MINIMIZE | SWPOS_SHOW | SWPOS_ACTIVATE;
2067 break;
2068 case SW_SHOWMINNOACTIVE:
2069 showstate = SWPOS_MINIMIZE | SWPOS_SHOW;
2070 break;
2071 case SW_SHOWNA:
2072 showstate = SWPOS_SHOW;
2073 break;
2074 case SW_SHOWNOACTIVATE:
2075 showstate = SWPOS_SHOW;
2076 break;
2077 case SW_SHOWNORMAL:
2078 showstate = SWPOS_RESTORE | SWPOS_ACTIVATE | SWPOS_SHOW;
2079 break;
2080 }
2081
2082 /* We can't activate a child window (WINE) */
2083 if(getStyle() & WS_CHILD)
2084 showstate &= ~SWPOS_ACTIVATE;
2085
2086 if(showstate & SWPOS_SHOW) {
2087 setStyle(getStyle() | WS_VISIBLE);
2088 }
2089 else setStyle(getStyle() & ~WS_VISIBLE);
2090
2091 rc = OSLibWinShowWindow(OS2HwndFrame, showstate);
2092
2093 SendInternalMessageA(WM_SHOWWINDOW, (showstate & SWPOS_SHOW) ? 1 : 0, 0);
2094
2095 if (flags & WIN_NEED_SIZE)
2096 {
2097 /* should happen only in CreateWindowEx() */
2098 int wParam = SIZE_RESTORED;
2099
2100 flags &= ~WIN_NEED_SIZE;
2101 if (dwStyle & WS_MAXIMIZE)
2102 wParam = SIZE_MAXIMIZED;
2103 else
2104 if (dwStyle & WS_MINIMIZE)
2105 wParam = SIZE_MINIMIZED;
2106
2107 SendInternalMessageA(WM_SIZE, wParam,
2108 MAKELONG(rectClient.right-rectClient.left,
2109 rectClient.bottom-rectClient.top));
2110 SendInternalMessageA(WM_MOVE,0,MAKELONG(rectClient.left,rectClient.top));
2111 }
2112
2113 return rc;
2114}
2115//******************************************************************************
2116//******************************************************************************
2117BOOL Win32BaseWindow::SetWindowPos(HWND hwndInsertAfter, int x, int y, int cx, int cy, UINT fuFlags)
2118{
2119 BOOL rc = FALSE;
2120 Win32BaseWindow *window;
2121 HWND hParent = 0;
2122 BOOL fShow = FALSE, fHide = FALSE;
2123
2124 if (fuFlags &
2125 ~(SWP_NOSIZE | SWP_NOMOVE | SWP_NOZORDER |
2126 SWP_NOREDRAW | SWP_NOACTIVATE | SWP_FRAMECHANGED |
2127 SWP_SHOWWINDOW | SWP_HIDEWINDOW | SWP_NOCOPYBITS |
2128 SWP_NOOWNERZORDER))
2129 {
2130 return FALSE;
2131 }
2132
2133 if(IsWindowDestroyed()) {
2134 //changing the position of a window that's being destroyed can cause crashes in PMMERGE
2135 dprintf(("SetWindowPos; window already destroyed"));
2136 return TRUE;
2137 }
2138#if 0
2139 /* Fix redundant flags */
2140 if(getStyle() & WS_VISIBLE) {
2141 fuFlags &= ~SWP_SHOWWINDOW;
2142 }
2143 else
2144 {
2145 if (!(fuFlags & SWP_SHOWWINDOW))
2146 fuFlags |= SWP_NOREDRAW;
2147 fuFlags &= ~SWP_HIDEWINDOW;
2148 }
2149
2150 if(cx < 0) cx = 0;
2151 if(cy < 0) cy = 0;
2152
2153 if((rectWindow.right - rectWindow.left == cx) && (rectWindow.bottom - rectWindow.top == cy)) {
2154 fuFlags |= SWP_NOSIZE; /* Already the right size */
2155 }
2156
2157 if((rectWindow.left == x) && (rectWindow.top == y)) {
2158 fuFlags |= SWP_NOMOVE; /* Already the right position */
2159 }
2160
2161 if(getWindowHandle() == GetActiveWindow()) {
2162 fuFlags |= SWP_NOACTIVATE; /* Already active */
2163 }
2164 else
2165 if((getStyle() & (WS_POPUP | WS_CHILD)) != WS_CHILD )
2166 {
2167 if(!(fuFlags & SWP_NOACTIVATE)) /* Bring to the top when activating */
2168 {
2169 fuFlags &= ~SWP_NOZORDER;
2170 hwndInsertAfter = HWND_TOP;
2171 }
2172 }
2173#endif
2174
2175 WINDOWPOS wpos;
2176 SWP swp, swpOld;
2177 wpos.flags = fuFlags;
2178 wpos.cy = cy;
2179 wpos.cx = cx;
2180 wpos.x = x;
2181 wpos.y = y;
2182 wpos.hwndInsertAfter = hwndInsertAfter;
2183 wpos.hwnd = getWindowHandle();
2184
2185 if(~fuFlags & (SWP_NOMOVE | SWP_NOSIZE))
2186 {
2187 if (isChild())
2188 {
2189 Win32BaseWindow *windowParent = getParent();
2190 if(windowParent) {
2191 hParent = getParent()->getOS2WindowHandle();
2192 }
2193 else dprintf(("WARNING: Win32BaseWindow::SetWindowPos window %x is child but has no parent!!", getWindowHandle()));
2194 }
2195 OSLibWinQueryWindowPos(OS2HwndFrame, &swpOld);
2196 }
2197
2198 OSLibMapWINDOWPOStoSWP(&wpos, &swp, &swpOld, hParent, OS2HwndFrame);
2199 if (swp.fl == 0) {
2200 if (fuFlags & SWP_FRAMECHANGED)
2201 {
2202 FrameUpdateClient(this);
2203 }
2204 if(fuFlags & SWP_SHOWWINDOW) {
2205 setStyle(getStyle() | WS_VISIBLE);
2206 }
2207 else
2208 if(fuFlags & SWP_HIDEWINDOW) {
2209 setStyle(getStyle() & ~WS_VISIBLE);
2210 }
2211 return TRUE;
2212 }
2213
2214// if ((swp.fl & SWPOS_ZORDER) && (swp.hwndInsertBehind > HWNDOS_BOTTOM))
2215 if ((swp.hwndInsertBehind > HWNDOS_BOTTOM))
2216 {
2217 Win32BaseWindow *wndBehind = Win32BaseWindow::GetWindowFromHandle(swp.hwndInsertBehind);
2218 if(wndBehind) {
2219 swp.hwndInsertBehind = wndBehind->getOS2FrameWindowHandle();
2220 }
2221 else {
2222 dprintf(("ERROR: SetWindowPos: hwndInsertBehind %x invalid!",swp.hwndInsertBehind));
2223 swp.hwndInsertBehind = 0;
2224 }
2225 }
2226 swp.hwnd = OS2HwndFrame;
2227
2228 dprintf (("WinSetWindowPos %x %x (%d,%d)(%d,%d) %x", swp.hwnd, swp.hwndInsertBehind, swp.x, swp.y, swp.cx, swp.cy, swp.fl));
2229
2230 if(fuFlags & SWP_SHOWWINDOW && !IsWindowVisible()) {
2231 setStyle(getStyle() | WS_VISIBLE);
2232 }
2233 else
2234 if(fuFlags & SWP_HIDEWINDOW && IsWindowVisible()) {
2235 setStyle(getStyle() & ~WS_VISIBLE);
2236 }
2237 rc = OSLibWinSetMultWindowPos(&swp, 1);
2238
2239 if (rc == FALSE)
2240 {
2241 dprintf(("OSLibWinSetMultWindowPos failed! Error %x",OSLibWinGetLastError()));
2242 }
2243
2244 if((fuFlags & SWP_FRAMECHANGED) && (fuFlags & (SWP_NOMOVE | SWP_NOSIZE) == (SWP_NOMOVE | SWP_NOSIZE)))
2245 {
2246 FrameUpdateClient(this);
2247 }
2248 return (rc);
2249}
2250//******************************************************************************
2251//TODO: WPF_RESTOREMAXIMIZED
2252//******************************************************************************
2253BOOL Win32BaseWindow::SetWindowPlacement(WINDOWPLACEMENT *winpos)
2254{
2255 if(isFrameWindow())
2256 {
2257 // Set the minimized position
2258 if (winpos->flags & WPF_SETMINPOSITION)
2259 {
2260 OSLibSetWindowMinPos(OS2HwndFrame, winpos->ptMinPosition.x, winpos->ptMinPosition.y);
2261 }
2262
2263 //TODO: Max position
2264
2265 // Set the new restore position.
2266 OSLibSetWindowRestoreRect(OS2HwndFrame, &winpos->rcNormalPosition);
2267 }
2268
2269 return ShowWindow(winpos->showCmd);
2270}
2271//******************************************************************************
2272//Also destroys all the child windows (destroy children first, parent last)
2273//******************************************************************************
2274BOOL Win32BaseWindow::DestroyWindow()
2275{
2276 HWND hwnd = getWindowHandle();
2277
2278 dprintf(("DestroyWindow %x", hwnd));
2279
2280 /* Call hooks */
2281 if(HOOK_CallHooksA( WH_CBT, HCBT_DESTROYWND, getWindowHandle(), 0L))
2282 {
2283 return FALSE;
2284 }
2285
2286 if(!(getStyle() & WS_CHILD) && getOwner() == NULL)
2287 {
2288 HOOK_CallHooksA(WH_SHELL, HSHELL_WINDOWDESTROYED, getWindowHandle(), 0L);
2289 /* FIXME: clean up palette - see "Internals" p.352 */
2290 }
2291
2292 if((getStyle() & WS_CHILD) && !(getExStyle() & WS_EX_NOPARENTNOTIFY))
2293 {
2294 if(getParent())
2295 {
2296 /* Notify the parent window only */
2297 getParent()->SendMessageA(WM_PARENTNOTIFY, MAKEWPARAM(WM_DESTROY, getWindowId()), (LPARAM)getWindowHandle());
2298 if(!::IsWindow(hwnd) )
2299 {
2300 return TRUE;
2301 }
2302 }
2303 else DebugInt3();
2304 }
2305
2306 /* Hide the window */
2307 if(IsWindowVisible())
2308 {
2309 SetWindowPos(0, 0, 0, 0, 0, SWP_HIDEWINDOW |
2310 SWP_NOACTIVATE|SWP_NOZORDER|SWP_NOMOVE|SWP_NOSIZE);
2311 if(!::IsWindow(hwnd))
2312 {
2313 return TRUE;
2314 }
2315 }
2316 dprintf(("DestroyWindow %x -> HIDDEN", hwnd));
2317
2318 fDestroyWindowCalled = TRUE;
2319 return OSLibWinDestroyWindow(OS2HwndFrame);
2320}
2321//******************************************************************************
2322//******************************************************************************
2323Win32BaseWindow *Win32BaseWindow::getParent()
2324{
2325 Win32BaseWindow *wndparent = (Win32BaseWindow *)ChildWindow::GetParent();
2326 return ((ULONG)wndparent == (ULONG)windowDesktop) ? NULL : wndparent;
2327}
2328//******************************************************************************
2329//******************************************************************************
2330HWND Win32BaseWindow::GetParent()
2331{
2332 Win32BaseWindow *wndparent;
2333
2334 if ((!(getStyle() & (WS_POPUP|WS_CHILD))))
2335 {
2336 return 0;
2337 }
2338 wndparent = ((getStyle() & WS_CHILD) ? getParent() : getOwner());
2339
2340 return (wndparent) ? wndparent->getWindowHandle() : 0;
2341}
2342//******************************************************************************
2343//******************************************************************************
2344HWND Win32BaseWindow::SetParent(HWND hwndNewParent)
2345{
2346 HWND oldhwnd;
2347 Win32BaseWindow *newparent;
2348 Win32BaseWindow *oldparent = (Win32BaseWindow *)ChildWindow::GetParent();
2349
2350 if(oldparent) {
2351 oldhwnd = oldparent->getWindowHandle();
2352 oldparent->RemoveChild(this);
2353 }
2354 else oldhwnd = 0;
2355
2356 newparent = GetWindowFromHandle(hwndNewParent);
2357 if(newparent)
2358 {
2359 setParent(newparent);
2360 getParent()->AddChild(this);
2361 OSLibWinSetParent(getOS2FrameWindowHandle(), getParent()->getOS2WindowHandle());
2362 return oldhwnd;
2363 }
2364 else {
2365 setParent(windowDesktop);
2366 windowDesktop->AddChild(this);
2367 OSLibWinSetParent(getOS2FrameWindowHandle(), OSLIB_HWND_DESKTOP);
2368 return oldhwnd;
2369 }
2370}
2371//******************************************************************************
2372//******************************************************************************
2373BOOL Win32BaseWindow::IsChild(HWND hwndParent)
2374{
2375 if(getParent()) {
2376 return getParent()->getWindowHandle() == hwndParent;
2377 }
2378 else return 0;
2379}
2380//******************************************************************************
2381//******************************************************************************
2382HWND Win32BaseWindow::GetTopWindow()
2383{
2384 return GetWindow(GW_CHILD);
2385}
2386//******************************************************************************
2387// Get the top-level parent for a child window.
2388//******************************************************************************
2389Win32BaseWindow *Win32BaseWindow::GetTopParent()
2390{
2391 Win32BaseWindow *window = this;
2392
2393 while(window && (window->getStyle() & WS_CHILD))
2394 {
2395 window = window->getParent();
2396 }
2397 return window;
2398}
2399//******************************************************************************
2400//TODO: Should not enumerate children that are created during the enumeration!
2401//******************************************************************************
2402BOOL Win32BaseWindow::EnumChildWindows(WNDENUMPROC lpfn, LPARAM lParam)
2403{
2404 BOOL rc = TRUE;
2405 HWND hwnd;
2406 Win32BaseWindow *prevchild = 0, *child = 0;
2407
2408 dprintf(("EnumChildWindows of %x parameter %x %x (%x)", getWindowHandle(), lpfn, lParam, getFirstChild()));
2409 for (child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2410 {
2411 dprintf(("EnumChildWindows: enumerating child %x", child->getWindowHandle()));
2412 hwnd = child->getWindowHandle();
2413 if(child->getOwner()) {
2414 continue; //shouldn't have an owner (Wine)
2415 }
2416 if(lpfn(hwnd, lParam) == FALSE)
2417 {
2418 rc = FALSE;
2419 break;
2420 }
2421 //check if the window still exists
2422 if(!::IsWindow(hwnd))
2423 {
2424 child = prevchild;
2425 continue;
2426 }
2427 if(child->getFirstChild() != NULL)
2428 {
2429 dprintf(("EnumChildWindows: Enumerate children of %x", child->getWindowHandle()));
2430 if(child->EnumChildWindows(lpfn, lParam) == FALSE)
2431 {
2432 rc = FALSE;
2433 break;
2434 }
2435 }
2436 prevchild = child;
2437 }
2438 return rc;
2439}
2440//******************************************************************************
2441//Enumerate first-level children only and check thread id
2442//******************************************************************************
2443BOOL Win32BaseWindow::EnumThreadWindows(DWORD dwThreadId, WNDENUMPROC lpfn, LPARAM lParam)
2444{
2445 Win32BaseWindow *child = 0;
2446 ULONG tid, pid;
2447 BOOL rc;
2448 HWND hwnd;
2449
2450 dprintf(("EnumThreadWindows %x %x %x", dwThreadId, lpfn, lParam));
2451
2452 for (child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2453 {
2454 OSLibWinQueryWindowProcess(child->getOS2WindowHandle(), &pid, &tid);
2455
2456 if(dwThreadId == tid) {
2457 dprintf2(("EnumThreadWindows: Found Window %x", child->getWindowHandle()));
2458 if((rc = lpfn(child->getWindowHandle(), lParam)) == FALSE) {
2459 break;
2460 }
2461 }
2462 }
2463 return TRUE;
2464}
2465//******************************************************************************
2466//Enumerate first-level children only
2467//******************************************************************************
2468BOOL Win32BaseWindow::EnumWindows(WNDENUMPROC lpfn, LPARAM lParam)
2469{
2470 Win32BaseWindow *child = 0;
2471 BOOL rc;
2472 HWND hwnd;
2473
2474 dprintf(("EnumWindows %x %x", lpfn, lParam));
2475
2476 for (child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2477 {
2478 hwnd = child->getWindowHandle();
2479
2480 dprintf2(("EnumWindows: Found Window %x", child->getWindowHandle()));
2481 if((rc = lpfn(child->getWindowHandle(), lParam)) == FALSE) {
2482 break;
2483 }
2484 }
2485 return TRUE;
2486}
2487//******************************************************************************
2488//******************************************************************************
2489Win32BaseWindow *Win32BaseWindow::FindWindowById(int id)
2490{
2491 for (Win32BaseWindow *child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
2492 {
2493 if (child->getWindowId() == id)
2494 {
2495 return child;
2496 }
2497 }
2498 return 0;
2499}
2500//******************************************************************************
2501//TODO:
2502//We assume (for now) that if hwndParent or hwndChildAfter are real window handles, that
2503//the current process owns them.
2504//******************************************************************************
2505HWND Win32BaseWindow::FindWindowEx(HWND hwndParent, HWND hwndChildAfter, ATOM atom, LPSTR lpszWindow)
2506{
2507 Win32BaseWindow *parent = GetWindowFromHandle(hwndParent);
2508 Win32BaseWindow *child = GetWindowFromHandle(hwndChildAfter);
2509
2510 dprintf(("FindWindowEx %x %x %x %s", hwndParent, hwndChildAfter, atom, lpszWindow));
2511 if((hwndParent != 0 && !parent) ||
2512 (hwndChildAfter != 0 && !child) ||
2513 (hwndParent == 0 && hwndChildAfter != 0))
2514 {
2515 dprintf(("Win32BaseWindow::FindWindowEx: parent or child not found %x %x", hwndParent, hwndChildAfter));
2516 SetLastError(ERROR_INVALID_WINDOW_HANDLE);
2517 return 0;
2518 }
2519 SetLastError(0);
2520 if(hwndParent != 0)
2521 {//if the current process owns the window, just do a quick search
2522 child = (Win32BaseWindow *)parent->getFirstChild();
2523 if(hwndChildAfter != 0)
2524 {
2525 while(child)
2526 {
2527 if(child->getWindowHandle() == hwndChildAfter)
2528 {
2529 child = (Win32BaseWindow *)child->getNextChild();
2530 break;
2531 }
2532 child = (Win32BaseWindow *)child->getNextChild();
2533 }
2534 }
2535 while(child)
2536 {
2537 //According to Wine, the class doesn't need to be specified
2538 if((!atom || child->getWindowClass()->getAtom() == atom) &&
2539 (!lpszWindow || child->hasWindowName(lpszWindow)))
2540 {
2541 dprintf(("FindWindowEx: Found window %x", child->getWindowHandle()));
2542 return child->getWindowHandle();
2543 }
2544 child = (Win32BaseWindow *)child->getNextChild();
2545 }
2546 }
2547 else {
2548 Win32BaseWindow *wnd;
2549 HWND henum, hwnd;
2550
2551 henum = OSLibWinBeginEnumWindows(OSLIB_HWND_DESKTOP);
2552 hwnd = OSLibWinGetNextWindow(henum);
2553
2554 while(hwnd)
2555 {
2556 wnd = GetWindowFromOS2Handle(hwnd);
2557 if(wnd == NULL) {
2558 hwnd = OSLibWinQueryClientWindow(hwnd);
2559 if(hwnd) wnd = GetWindowFromOS2Handle(hwnd);
2560 if(!hwnd) wnd = GetWindowFromOS2FrameHandle(hwnd);
2561 }
2562
2563 if(wnd) {
2564 //According to Wine, the class doesn't need to be specified
2565 if((!atom || wnd->getWindowClass()->getAtom() == atom) &&
2566 (!lpszWindow || wnd->hasWindowName(lpszWindow)))
2567 {
2568 OSLibWinEndEnumWindows(henum);
2569 dprintf(("FindWindowEx: Found window %x", wnd->getWindowHandle()));
2570 return wnd->getWindowHandle();
2571 }
2572 }
2573 hwnd = OSLibWinGetNextWindow(henum);
2574 }
2575 OSLibWinEndEnumWindows(henum);
2576 }
2577 SetLastError(ERROR_CANNOT_FIND_WND_CLASS); //TODO: not always correct
2578 return 0;
2579}
2580//******************************************************************************
2581//******************************************************************************
2582HWND Win32BaseWindow::GetWindow(UINT uCmd)
2583{
2584 HWND hwndRelated = 0;
2585 Win32BaseWindow *window;
2586
2587 switch(uCmd)
2588 {
2589 case GW_HWNDFIRST:
2590 if(getParent()) {
2591 window = (Win32BaseWindow *)getParent()->getFirstChild();
2592 hwndRelated = window->getWindowHandle();
2593 }
2594 break;
2595
2596 case GW_HWNDLAST:
2597 if(!getParent())
2598 {
2599 goto end;
2600 }
2601
2602 window = this;
2603 while(window->getNextChild())
2604 {
2605 window = (Win32BaseWindow *)window->getNextChild();
2606 }
2607 hwndRelated = window->getWindowHandle();
2608 break;
2609
2610 case GW_HWNDNEXT:
2611 window = (Win32BaseWindow *)getNextChild();
2612 if(window) {
2613 hwndRelated = window->getWindowHandle();
2614 }
2615 break;
2616
2617 case GW_HWNDPREV:
2618 if(!getParent())
2619 {
2620 goto end;
2621 }
2622 window = (Win32BaseWindow *)(getParent()->getFirstChild()); /* First sibling */
2623 if(window == this)
2624 {
2625 hwndRelated = 0; /* First in list */
2626 goto end;
2627 }
2628 while(window->getNextChild())
2629 {
2630 if (window->getNextChild() == this)
2631 {
2632 hwndRelated = window->getWindowHandle();
2633 goto end;
2634 }
2635 window = (Win32BaseWindow *)window->getNextChild();
2636 }
2637 break;
2638
2639 case GW_OWNER:
2640 if(getOwner()) {
2641 hwndRelated = getOwner()->getWindowHandle();
2642 }
2643 break;
2644
2645 case GW_CHILD:
2646 if(getFirstChild()) {
2647 hwndRelated = ((Win32BaseWindow *)getFirstChild())->getWindowHandle();
2648 }
2649 break;
2650 }
2651end:
2652 dprintf(("GetWindow %x %d returned %x", getWindowHandle(), uCmd, hwndRelated));
2653 return hwndRelated;
2654}
2655//******************************************************************************
2656//******************************************************************************
2657HWND Win32BaseWindow::SetActiveWindow()
2658{
2659 HWND hwndActive;
2660
2661 dprintf(("SetActiveWindow %x", getWindowHandle()));
2662 if(OSLibWinSetActiveWindow(OS2HwndFrame) == FALSE) {
2663 dprintf(("OSLibWinSetActiveWindow %x returned FALSE!", OS2HwndFrame));
2664 }
2665 hwndActive = GetActiveWindow();
2666 return (hwndActive) ? hwndActive : windowDesktop->getWindowHandle(); //pretend the desktop was active
2667}
2668//******************************************************************************
2669//WM_ENABLE is sent to hwnd, but not to it's children (as it should be)
2670//******************************************************************************
2671BOOL Win32BaseWindow::EnableWindow(BOOL fEnable)
2672{
2673 BOOL rc;
2674
2675 //return true if previous state was disabled, else false (sdk docs)
2676 rc = (getStyle() & WS_DISABLED) != 0;
2677 if(rc && !fEnable) {
2678 SendMessageA(WM_CANCELMODE, 0, 0);
2679 }
2680 OSLibWinEnableWindow(OS2HwndFrame, fEnable);
2681 if(fEnable == FALSE) {
2682 //SvL: No need to clear focus as PM already does this
2683 if(getWindowHandle() == GetCapture()) {
2684 ReleaseCapture(); /* A disabled window can't capture the mouse */
2685 dprintf(("Released capture for window %x that is being disabled", getWindowHandle()));
2686 }
2687 }
2688 return rc;
2689}
2690//******************************************************************************
2691//******************************************************************************
2692BOOL Win32BaseWindow::CloseWindow()
2693{
2694 return OSLibWinMinimizeWindow(OS2HwndFrame);
2695}
2696//******************************************************************************
2697//TODO: Not be 100% correct; should return active window of current thread
2698// or NULL when there is none -> WinQueryActiveWindow just returns
2699// the current active window
2700//******************************************************************************
2701HWND Win32BaseWindow::GetActiveWindow()
2702{
2703 HWND hwndActive;
2704 Win32BaseWindow *win32wnd;
2705 ULONG magic;
2706
2707 hwndActive = OSLibWinQueryActiveWindow();
2708
2709 return OS2ToWin32Handle(hwndActive);
2710}
2711//******************************************************************************
2712//******************************************************************************
2713BOOL Win32BaseWindow::IsWindowEnabled()
2714{
2715 return OSLibWinIsWindowEnabled(OS2HwndFrame);
2716}
2717//******************************************************************************
2718//******************************************************************************
2719BOOL Win32BaseWindow::IsWindowVisible()
2720{
2721#if 1
2722 return (dwStyle & WS_VISIBLE) == WS_VISIBLE;
2723#else
2724 return OSLibWinIsWindowVisible(OS2HwndFrame);
2725#endif
2726}
2727//******************************************************************************
2728//******************************************************************************
2729BOOL Win32BaseWindow::hasWindowName(LPSTR wndname, BOOL fUnicode)
2730{
2731 INT len = GetWindowTextLength();
2732 BOOL res;
2733
2734 if (wndname == NULL)
2735 return (len == 0);
2736
2737 len++;
2738 if (fUnicode)
2739 {
2740 WCHAR *text = (WCHAR*)malloc(len*sizeof(WCHAR));
2741
2742 GetWindowTextW(text,len);
2743 res = (lstrcmpW(text,(LPWSTR)wndname) == 0);
2744 free(text);
2745 } else
2746 {
2747 CHAR *text = (CHAR*)malloc(len*sizeof(CHAR));
2748
2749 GetWindowTextA(text,len);
2750 res = (strcmp(text,wndname) == 0);
2751 free(text);
2752 }
2753
2754 return res;
2755}
2756//******************************************************************************
2757//******************************************************************************
2758CHAR *Win32BaseWindow::getWindowNamePtrA()
2759{
2760 INT len = GetWindowTextLength();
2761 CHAR *text;
2762
2763 if (len == 0) return NULL;
2764 len++;
2765 text = (CHAR*)malloc(len*sizeof(CHAR));
2766 GetWindowTextA(text,len);
2767
2768 return text;
2769}
2770//******************************************************************************
2771//******************************************************************************
2772WCHAR *Win32BaseWindow::getWindowNamePtrW()
2773{
2774 INT len = GetWindowTextLength();
2775 WCHAR *text;
2776
2777 if (len == 0) return NULL;
2778 len++;
2779 text = (WCHAR*)malloc(len*sizeof(WCHAR));
2780 GetWindowTextW(text,len);
2781
2782 return text;
2783}
2784//******************************************************************************
2785//******************************************************************************
2786VOID Win32BaseWindow::freeWindowNamePtr(PVOID namePtr)
2787{
2788 if (namePtr) free(namePtr);
2789}
2790//******************************************************************************
2791//******************************************************************************
2792int Win32BaseWindow::GetWindowTextLength()
2793{
2794 return SendInternalMessageA(WM_GETTEXTLENGTH,0,0);
2795}
2796//******************************************************************************
2797//******************************************************************************
2798int Win32BaseWindow::GetWindowTextA(LPSTR lpsz, int cch)
2799{
2800 return SendInternalMessageA(WM_GETTEXT,(WPARAM)cch,(LPARAM)lpsz);
2801}
2802//******************************************************************************
2803//******************************************************************************
2804int Win32BaseWindow::GetWindowTextW(LPWSTR lpsz, int cch)
2805{
2806 return SendInternalMessageW(WM_GETTEXT,(WPARAM)cch,(LPARAM)lpsz);
2807}
2808//******************************************************************************
2809//******************************************************************************
2810BOOL Win32BaseWindow::SetWindowTextA(LPSTR lpsz)
2811{
2812 return SendInternalMessageA(WM_SETTEXT,0,(LPARAM)lpsz);
2813}
2814//******************************************************************************
2815//******************************************************************************
2816BOOL Win32BaseWindow::SetWindowTextW(LPWSTR lpsz)
2817{
2818 return SendInternalMessageW(WM_SETTEXT,0,(LPARAM)lpsz);
2819}
2820//******************************************************************************
2821//******************************************************************************
2822LONG Win32BaseWindow::SetWindowLongA(int index, ULONG value, BOOL fUnicode)
2823{
2824 LONG oldval;
2825
2826 dprintf2(("SetWindowLong%c %x %d %x", (fUnicode) ? 'W' : 'A', getWindowHandle(), index, value));
2827 switch(index) {
2828 case GWL_EXSTYLE:
2829 {
2830 STYLESTRUCT ss;
2831
2832 if(dwExStyle == value)
2833 return value;
2834
2835 ss.styleOld = dwExStyle;
2836 ss.styleNew = value;
2837 dprintf(("SetWindowLong GWL_EXSTYLE %x old %x new style %x", getWindowHandle(), dwExStyle, value));
2838 SendInternalMessageA(WM_STYLECHANGING,GWL_EXSTYLE,(LPARAM)&ss);
2839 setExStyle(ss.styleNew);
2840 SendInternalMessageA(WM_STYLECHANGED,GWL_EXSTYLE,(LPARAM)&ss);
2841 return ss.styleOld;
2842 }
2843 case GWL_STYLE:
2844 {
2845 STYLESTRUCT ss;
2846
2847 //SvL: TODO: Can you change minimize or maximize status here too?
2848
2849 if(dwStyle == value)
2850 return value;
2851
2852 value &= ~(WS_CHILD|WS_VISIBLE); /* Some bits can't be changed this way (WINE) */
2853 ss.styleOld = getStyle();
2854 ss.styleNew = value | (ss.styleOld & (WS_CHILD|WS_VISIBLE));
2855 dprintf(("SetWindowLong GWL_STYLE %x old %x new style %x", getWindowHandle(), ss.styleOld, ss.styleNew));
2856 SendInternalMessageA(WM_STYLECHANGING,GWL_STYLE,(LPARAM)&ss);
2857 setStyle(ss.styleNew);
2858 SendInternalMessageA(WM_STYLECHANGED,GWL_STYLE,(LPARAM)&ss);
2859//// OSLibSetWindowStyle(getOS2FrameWindowHandle(), getStyle(), getExStyle(),
2860//// windowClass->getStyle() & CS_SAVEBITS);
2861#ifdef DEBUG
2862 PrintWindowStyle(ss.styleNew, 0);
2863#endif
2864 return ss.styleOld;
2865 }
2866 case GWL_WNDPROC:
2867 oldval = (LONG)WINPROC_GetProc(win32wndproc, (fUnicode) ? WIN_PROC_32W : WIN_PROC_32A);
2868 WINPROC_SetProc((HWINDOWPROC *)&win32wndproc, (WNDPROC)value, WINPROC_GetProcType(win32wndproc), WIN_PROC_WINDOW);
2869 return oldval;
2870
2871 case GWL_HINSTANCE:
2872 oldval = hInstance;
2873 hInstance = value;
2874 return oldval;
2875
2876 case GWL_HWNDPARENT:
2877 return SetParent((HWND)value);
2878
2879 case GWL_ID:
2880 oldval = getWindowId();
2881 setWindowId(value);
2882 return oldval;
2883
2884 case GWL_USERDATA:
2885 oldval = userData;
2886 userData = value;
2887 return oldval;
2888
2889 default:
2890 if(index >= 0 && index/4 < nrUserWindowLong)
2891 {
2892 oldval = userWindowLong[index/4];
2893 userWindowLong[index/4] = value;
2894 return oldval;
2895 }
2896 SetLastError(ERROR_INVALID_PARAMETER);
2897 return 0;
2898 }
2899}
2900//******************************************************************************
2901//******************************************************************************
2902ULONG Win32BaseWindow::GetWindowLongA(int index, BOOL fUnicode)
2903{
2904 ULONG value;
2905
2906 switch(index) {
2907 case GWL_EXSTYLE:
2908 value = dwExStyle;
2909 break;
2910 case GWL_STYLE:
2911 value = dwStyle;
2912 break;
2913 case GWL_WNDPROC:
2914 value = (LONG)WINPROC_GetProc(win32wndproc, (fUnicode) ? WIN_PROC_32W : WIN_PROC_32A);
2915 break;
2916 case GWL_HINSTANCE:
2917 value = hInstance;
2918 break;
2919 case GWL_HWNDPARENT:
2920 if(getParent()) {
2921 value = getParent()->getWindowHandle();
2922 }
2923 else value = 0;
2924 break;
2925 case GWL_ID:
2926 value = getWindowId();
2927 break;
2928 case GWL_USERDATA:
2929 value = userData;
2930 break;
2931 default:
2932 if(index >= 0 && index/4 < nrUserWindowLong)
2933 {
2934 value = userWindowLong[index/4];
2935 break;
2936 }
2937 SetLastError(ERROR_INVALID_PARAMETER);
2938 return 0;
2939 }
2940 dprintf2(("GetWindowLongA %x %d %x", getWindowHandle(), index, value));
2941 return value;
2942}
2943//******************************************************************************
2944//******************************************************************************
2945WORD Win32BaseWindow::SetWindowWord(int index, WORD value)
2946{
2947 WORD oldval;
2948
2949 if(index >= 0 && index/4 < nrUserWindowLong)
2950 {
2951 oldval = ((WORD *)userWindowLong)[index/2];
2952 ((WORD *)userWindowLong)[index/2] = value;
2953 return oldval;
2954 }
2955 SetLastError(ERROR_INVALID_PARAMETER);
2956 return 0;
2957}
2958//******************************************************************************
2959//******************************************************************************
2960WORD Win32BaseWindow::GetWindowWord(int index)
2961{
2962 if(index >= 0 && index/4 < nrUserWindowLong)
2963 {
2964 return ((WORD *)userWindowLong)[index/2];
2965 }
2966 SetLastError(ERROR_INVALID_PARAMETER);
2967 return 0;
2968}
2969//******************************************************************************
2970//******************************************************************************
2971void Win32BaseWindow::setWindowId(DWORD id)
2972{
2973 dwIDMenu = id;
2974}
2975//******************************************************************************
2976//******************************************************************************
2977Win32BaseWindow *Win32BaseWindow::GetWindowFromHandle(HWND hwnd)
2978{
2979 Win32BaseWindow *window;
2980
2981 if(HwGetWindowHandleData(hwnd, (DWORD *)&window) == TRUE) {
2982 return window;
2983 }
2984// dprintf2(("Win32BaseWindow::GetWindowFromHandle: not a win32 window %x", hwnd));
2985 return NULL;
2986}
2987//******************************************************************************
2988//Note: Should return NULL if window is frame window! (IsOS2FrameWindowHandle depends on this
2989// behaviour)
2990//******************************************************************************
2991Win32BaseWindow *Win32BaseWindow::GetWindowFromOS2Handle(HWND hwnd)
2992{
2993 Win32BaseWindow *win32wnd;
2994 DWORD magic;
2995
2996 if(hwnd == OSLIB_HWND_DESKTOP)
2997 {
2998 return windowDesktop;
2999 }
3000
3001 win32wnd = (Win32BaseWindow *)OSLibWinGetWindowULong(hwnd, OFFSET_WIN32WNDPTR);
3002 magic = OSLibWinGetWindowULong(hwnd, OFFSET_WIN32PM_MAGIC);
3003
3004 if(win32wnd && CheckMagicDword(magic)) {
3005 return win32wnd;
3006 }
3007// dprintf2(("Win32BaseWindow::GetWindowFromOS2Handle: not an Odin os2 window %x", hwnd));
3008 return 0;
3009}
3010//******************************************************************************
3011//******************************************************************************
3012Win32BaseWindow *Win32BaseWindow::GetWindowFromOS2FrameHandle(HWND hwnd)
3013{
3014 return GetWindowFromOS2Handle(OSLibWinWindowFromID(hwnd,OSLIB_FID_CLIENT));
3015}
3016//******************************************************************************
3017//******************************************************************************
3018HWND Win32BaseWindow::Win32ToOS2Handle(HWND hwnd)
3019{
3020 Win32BaseWindow *window = GetWindowFromHandle(hwnd);
3021
3022 if(window) {
3023 return window->getOS2WindowHandle();
3024 }
3025// dprintf2(("Win32BaseWindow::Win32ToOS2Handle: not a win32 window %x", hwnd));
3026 return hwnd;
3027}
3028//******************************************************************************
3029//******************************************************************************
3030HWND Win32BaseWindow::Win32ToOS2FrameHandle(HWND hwnd)
3031{
3032 Win32BaseWindow *window = GetWindowFromHandle(hwnd);
3033
3034 if(window) {
3035 return window->getOS2FrameWindowHandle();
3036 }
3037// dprintf2(("Win32BaseWindow::Win32ToOS2FrameHandle: not a win32 window %x", hwnd));
3038 return hwnd;
3039}
3040//******************************************************************************
3041//******************************************************************************
3042HWND Win32BaseWindow::OS2ToWin32Handle(HWND hwnd)
3043{
3044 Win32BaseWindow *window = GetWindowFromOS2Handle(hwnd);
3045
3046 if(window) {
3047 return window->getWindowHandle();
3048 }
3049 window = GetWindowFromOS2FrameHandle(hwnd);
3050 if(window) {
3051 return window->getWindowHandle();
3052 }
3053// dprintf2(("Win32BaseWindow::OS2ToWin32Handle: not a win32 window %x", hwnd));
3054 return 0;
3055// else return hwnd; //OS/2 window handle
3056}
3057//******************************************************************************
3058//******************************************************************************
3059BOOL Win32BaseWindow::IsOS2FrameWindowHandle(HWND hwndWin32, HWND hwndOS2)
3060{
3061 Win32BaseWindow *window = GetWindowFromHandle(hwndWin32);
3062
3063 if(window->getOS2FrameWindowHandle() == hwndOS2) {
3064 return TRUE;
3065 }
3066 return FALSE;
3067}
3068//******************************************************************************
3069// GetNextDlgTabItem32 (USER32.276)
3070//******************************************************************************
3071HWND Win32BaseWindow::getNextDlgTabItem(HWND hwndCtrl, BOOL fPrevious)
3072{
3073 Win32BaseWindow *child, *nextchild, *lastchild;
3074 HWND retvalue;
3075
3076 if (hwndCtrl)
3077 {
3078 child = GetWindowFromHandle(hwndCtrl);
3079 if (!child)
3080 {
3081 retvalue = 0;
3082 goto END;
3083 }
3084 /* Make sure hwndCtrl is a top-level child */
3085 while ((child->getStyle() & WS_CHILD) && (child->getParent() != this))
3086 {
3087 child = child->getParent();
3088 if(child == NULL) break;
3089 }
3090
3091 if (!child || (child->getParent() != this))
3092 {
3093 retvalue = 0;
3094 goto END;
3095 }
3096 }
3097 else
3098 {
3099 /* No ctrl specified -> start from the beginning */
3100 child = (Win32BaseWindow *)getFirstChild();
3101 if (!child)
3102 {
3103 retvalue = 0;
3104 goto END;
3105 }
3106
3107 if (!fPrevious)
3108 {
3109 while (child->getNextChild())
3110 {
3111 child = (Win32BaseWindow *)child->getNextChild();
3112 }
3113 }
3114 }
3115
3116 lastchild = child;
3117 nextchild = (Win32BaseWindow *)child->getNextChild();
3118 while (TRUE)
3119 {
3120 if (!nextchild) nextchild = (Win32BaseWindow *)getFirstChild();
3121
3122 if (child == nextchild) break;
3123
3124 if ((nextchild->getStyle() & WS_TABSTOP) && (nextchild->getStyle() & WS_VISIBLE) &&
3125 !(nextchild->getStyle() & WS_DISABLED))
3126 {
3127 lastchild = nextchild;
3128 if (!fPrevious) break;
3129 }
3130 nextchild = (Win32BaseWindow *)nextchild->getNextChild();
3131 }
3132 retvalue = lastchild->getWindowHandle();
3133
3134END:
3135 return retvalue;
3136}
3137//******************************************************************************
3138//******************************************************************************
3139HWND Win32BaseWindow::getNextDlgGroupItem(HWND hwndCtrl, BOOL fPrevious)
3140{
3141 Win32BaseWindow *child, *nextchild, *lastchild;
3142 HWND retvalue;
3143
3144 if (hwndCtrl)
3145 {
3146 child = GetWindowFromHandle(hwndCtrl);
3147 if (!child)
3148 {
3149 retvalue = 0;
3150 goto END;
3151 }
3152 /* Make sure hwndCtrl is a top-level child */
3153 while ((child->getStyle() & WS_CHILD) && (child->getParent() != this))
3154 {
3155 child = child->getParent();
3156 if(child == NULL) break;
3157 }
3158
3159 if (!child || (child->getParent() != this))
3160 {
3161 retvalue = 0;
3162 goto END;
3163 }
3164 }
3165 else
3166 {
3167 /* No ctrl specified -> start from the beginning */
3168 child = (Win32BaseWindow *)getFirstChild();
3169 if (!child)
3170 {
3171 retvalue = 0;
3172 goto END;
3173 }
3174
3175 if (fPrevious)
3176 {
3177 while (child->getNextChild())
3178 {
3179 child = (Win32BaseWindow *)child->getNextChild();
3180 }
3181 }
3182 }
3183
3184 lastchild = child;
3185 nextchild = (Win32BaseWindow *)child->getNextChild();
3186 while (TRUE)
3187 {
3188 if (!nextchild || (nextchild->getStyle() & WS_GROUP))
3189 {
3190 /* Wrap-around to the beginning of the group */
3191 Win32BaseWindow *pWndTemp;
3192
3193 nextchild = (Win32BaseWindow *)getFirstChild();
3194
3195 for(pWndTemp = nextchild;pWndTemp;pWndTemp = (Win32BaseWindow *)pWndTemp->getNextChild())
3196 {
3197 if (pWndTemp->getStyle() & WS_GROUP)
3198 nextchild = pWndTemp;
3199
3200 if (pWndTemp == child)
3201 break;
3202 }
3203
3204 }
3205 if (nextchild == child)
3206 break;
3207
3208 if ((nextchild->getStyle() & WS_VISIBLE) && !(nextchild->getStyle() & WS_DISABLED))
3209 {
3210 lastchild = nextchild;
3211
3212 if (!fPrevious)
3213 break;
3214 }
3215
3216 nextchild = (Win32BaseWindow *)nextchild->getNextChild();
3217 }
3218 retvalue = lastchild->getWindowHandle();
3219END:
3220 return retvalue;
3221}
3222//******************************************************************************
3223//******************************************************************************
3224#ifdef DEBUG
3225void PrintWindowStyle(DWORD dwStyle, DWORD dwExStyle)
3226{
3227 char style[256] = "";
3228 char exstyle[256] = "";
3229
3230 /* Window styles */
3231 if(dwStyle & WS_CHILD)
3232 strcat(style, "WS_CHILD ");
3233 if(dwStyle & WS_POPUP)
3234 strcat(style, "WS_POPUP ");
3235 if(dwStyle & WS_VISIBLE)
3236 strcat(style, "WS_VISIBLE ");
3237 if(dwStyle & WS_DISABLED)
3238 strcat(style, "WS_DISABLED ");
3239 if(dwStyle & WS_CLIPSIBLINGS)
3240 strcat(style, "WS_CLIPSIBLINGS ");
3241 if(dwStyle & WS_CLIPCHILDREN)
3242 strcat(style, "WS_CLIPCHILDREN ");
3243 if(dwStyle & WS_MAXIMIZE)
3244 strcat(style, "WS_MAXIMIZE ");
3245 if(dwStyle & WS_MINIMIZE)
3246 strcat(style, "WS_MINIMIZE ");
3247 if(dwStyle & WS_GROUP)
3248 strcat(style, "WS_GROUP ");
3249 if(dwStyle & WS_TABSTOP)
3250 strcat(style, "WS_TABSTOP ");
3251
3252 if((dwStyle & WS_CAPTION) == WS_CAPTION)
3253 strcat(style, "WS_CAPTION ");
3254 if(dwStyle & WS_DLGFRAME)
3255 strcat(style, "WS_DLGFRAME ");
3256 if(dwStyle & WS_BORDER)
3257 strcat(style, "WS_BORDER ");
3258
3259 if(dwStyle & WS_VSCROLL)
3260 strcat(style, "WS_VSCROLL ");
3261 if(dwStyle & WS_HSCROLL)
3262 strcat(style, "WS_HSCROLL ");
3263 if(dwStyle & WS_SYSMENU)
3264 strcat(style, "WS_SYSMENU ");
3265 if(dwStyle & WS_THICKFRAME)
3266 strcat(style, "WS_THICKFRAME ");
3267 if(dwStyle & WS_MINIMIZEBOX)
3268 strcat(style, "WS_MINIMIZEBOX ");
3269 if(dwStyle & WS_MAXIMIZEBOX)
3270 strcat(style, "WS_MAXIMIZEBOX ");
3271
3272 if(dwExStyle & WS_EX_DLGMODALFRAME)
3273 strcat(exstyle, "WS_EX_DLGMODALFRAME ");
3274 if(dwExStyle & WS_EX_ACCEPTFILES)
3275 strcat(exstyle, "WS_EX_ACCEPTFILES ");
3276 if(dwExStyle & WS_EX_NOPARENTNOTIFY)
3277 strcat(exstyle, "WS_EX_NOPARENTNOTIFY ");
3278 if(dwExStyle & WS_EX_TOPMOST)
3279 strcat(exstyle, "WS_EX_TOPMOST ");
3280 if(dwExStyle & WS_EX_TRANSPARENT)
3281 strcat(exstyle, "WS_EX_TRANSPARENT ");
3282
3283 if(dwExStyle & WS_EX_MDICHILD)
3284 strcat(exstyle, "WS_EX_MDICHILD ");
3285 if(dwExStyle & WS_EX_TOOLWINDOW)
3286 strcat(exstyle, "WS_EX_TOOLWINDOW ");
3287 if(dwExStyle & WS_EX_WINDOWEDGE)
3288 strcat(exstyle, "WS_EX_WINDOWEDGE ");
3289 if(dwExStyle & WS_EX_CLIENTEDGE)
3290 strcat(exstyle, "WS_EX_CLIENTEDGE ");
3291 if(dwExStyle & WS_EX_CONTEXTHELP)
3292 strcat(exstyle, "WS_EX_CONTEXTHELP ");
3293 if(dwExStyle & WS_EX_RIGHT)
3294 strcat(exstyle, "WS_EX_RIGHT ");
3295 if(dwExStyle & WS_EX_LEFT)
3296 strcat(exstyle, "WS_EX_LEFT ");
3297 if(dwExStyle & WS_EX_RTLREADING)
3298 strcat(exstyle, "WS_EX_RTLREADING ");
3299 if(dwExStyle & WS_EX_LTRREADING)
3300 strcat(exstyle, "WS_EX_LTRREADING ");
3301 if(dwExStyle & WS_EX_LEFTSCROLLBAR)
3302 strcat(exstyle, "WS_EX_LEFTSCROLLBAR ");
3303 if(dwExStyle & WS_EX_RIGHTSCROLLBAR)
3304 strcat(exstyle, "WS_EX_RIGHTSCROLLBAR ");
3305 if(dwExStyle & WS_EX_CONTROLPARENT)
3306 strcat(exstyle, "WS_EX_CONTROLPARENT ");
3307 if(dwExStyle & WS_EX_STATICEDGE)
3308 strcat(exstyle, "WS_EX_STATICEDGE ");
3309 if(dwExStyle & WS_EX_APPWINDOW)
3310 strcat(exstyle, "WS_EX_APPWINDOW ");
3311
3312 dprintf(("Window style: %x %s", dwStyle, style));
3313 dprintf(("Window exStyle: %x %s (FS = %x)", dwExStyle, exstyle, GetFS()));
3314}
3315#endif
3316//******************************************************************************
3317//******************************************************************************
3318
3319GenericObject *Win32BaseWindow::windows = NULL;
Note: See TracBrowser for help on using the repository browser.