source: trunk/src/user32/win32dlg.cpp@ 1265

Last change on this file since 1265 was 1265, checked in by sandervl, 26 years ago

lots of changes
File size: 34.1 KB
Line 
1/* $Id: win32dlg.cpp,v 1.13 1999-10-13 14:24:26 sandervl Exp $ */
2/*
3 * Win32 Dialog Code for OS/2
4 *
5 * Copyright 1999 Sander van Leeuwen (sandervl@xs4all.nl) (Wine port & OS/2 adaption)
6 *
7 * Based on Wine code (990815; windows\dialog.c)
8 *
9 * Copyright 1993, 1994, 1996 Alexandre Julliard
10 *
11 * Project Odin Software License can be found in LICENSE.TXT
12 *
13 */
14#include <os2win.h>
15#include <windowsx.h>
16#include <stdlib.h>
17#include <string.h>
18#include <misc.h>
19#include <win32dlg.h>
20#include "oslibmsg.h"
21#include "win32wdesktop.h"
22
23#define DEFAULT_DLGFONT "9.WarpSans"
24
25//******************************************************************************
26//******************************************************************************
27Win32Dialog::Win32Dialog(HINSTANCE hInst, LPCSTR dlgTemplate, HWND owner,
28 DLGPROC dlgProc, LPARAM param, BOOL isUnicode)
29 : Win32BaseWindow(OBJTYPE_DIALOG)
30{
31 RECT rect;
32 WORD style;
33 ATOM classAtom;
34
35 this->isUnicode = isUnicode;
36 hUserFont = 0;
37 hMenu = 0;
38 hwndFocus = 0;
39 Win32DlgProc = 0;
40 msgResult = 0;
41 userDlgData = 0;
42 idResult = 0;
43 dialogFlags = 0;
44 memset(&dlgInfo, 0, sizeof(dlgInfo));
45
46 dprintf(("********* CREATE DIALOG ************"));
47 if(fInitialized == FALSE) {
48 if(DIALOG_Init() == FALSE) {
49 dprintf(("DIALOG_Init FAILED!"));
50 DebugInt3();
51 SetLastError(ERROR_GEN_FAILURE);
52 return;
53 }
54 fInitialized = TRUE;
55 }
56 xUnit = xBaseUnit;
57 yUnit = yBaseUnit;
58
59 /* Parse dialog template */
60 dlgTemplate = parseTemplate(dlgTemplate, &dlgInfo);
61
62 /* Load menu */
63 if (dlgInfo.menuName)
64 {
65 hMenu = LoadMenuW( hInst, (LPCWSTR)dlgInfo.menuName );
66 }
67
68 /* Create custom font if needed */
69 if (dlgInfo.style & DS_SETFONT)
70 {
71 /* The font height must be negative as it is a point size */
72 /* (see CreateFont() documentation in the Windows SDK). */
73 hUserFont = CreateFontW(dlgInfo.pointSize*2, 0, 0, 0,
74 dlgInfo.weight, dlgInfo.italic, FALSE,
75 FALSE, DEFAULT_CHARSET, 0, 0, PROOF_QUALITY,
76 FF_DONTCARE, (LPCWSTR)dlgInfo.faceName );
77 if (hUserFont)
78 {
79 SIZE charSize;
80 getCharSize(hUserFont,&charSize);
81 xBaseUnit = charSize.cx;
82 yBaseUnit = charSize.cy;
83 }
84 }
85
86 /* Create dialog main window */
87 rect.left = rect.top = 0;
88 rect.right = dlgInfo.cx * xUnit / 4;
89 rect.bottom = dlgInfo.cy * yUnit / 8;
90 if (dlgInfo.style & DS_MODALFRAME)
91 dlgInfo.exStyle |= WS_EX_DLGMODALFRAME;
92
93 AdjustWindowRectEx( &rect, dlgInfo.style, hMenu ? TRUE : FALSE , dlgInfo.exStyle );
94 rect.right -= rect.left;
95 rect.bottom -= rect.top;
96
97 if ((INT16)dlgInfo.x == CW_USEDEFAULT16)
98 {
99 rect.left = rect.top = CW_USEDEFAULT;
100 }
101 else
102 {
103 if (dlgInfo.style & DS_CENTER)
104 {
105 rect.left = (GetSystemMetrics(SM_CXSCREEN) - rect.right) / 2;
106 rect.top = (GetSystemMetrics(SM_CYSCREEN) - rect.bottom) / 2;
107 }
108 else
109 {
110 rect.left += dlgInfo.x * xUnit / 4;
111 rect.top += dlgInfo.y * yUnit / 8;
112 }
113 if ( !(dlgInfo.style & WS_CHILD) )
114 {
115 INT dX, dY;
116
117 if( !(dlgInfo.style & DS_ABSALIGN) )
118 ClientToScreen(owner, (POINT *)&rect );
119
120 /* try to fit it into the desktop */
121
122 if( (dX = rect.left + rect.right + GetSystemMetrics(SM_CXDLGFRAME)
123 - GetSystemMetrics(SM_CXSCREEN)) > 0 ) rect.left -= dX;
124 if( (dY = rect.top + rect.bottom + GetSystemMetrics(SM_CYDLGFRAME)
125 - GetSystemMetrics(SM_CYSCREEN)) > 0 ) rect.top -= dY;
126 if( rect.left < 0 ) rect.left = 0;
127 if( rect.top < 0 ) rect.top = 0;
128 }
129 }
130
131 /* Create the dialog window */
132
133 /* Find the class atom */
134 if (!HIWORD(dlgInfo.className))
135 {
136 classAtom = (ATOM)LOWORD(dlgInfo.className);
137 }
138 else
139 if(!(classAtom = GlobalFindAtomW((LPWSTR)dlgInfo.className)))
140 {
141 SetLastError(ERROR_INVALID_PARAMETER);
142 return;
143 }
144 CREATESTRUCTA cs;
145 cs.lpCreateParams = NULL;
146 cs.hInstance = hInst;
147 cs.hMenu = hMenu;
148 cs.hwndParent = owner;
149 cs.x = rect.left;
150 cs.y = rect.top;
151 cs.cx = rect.right;
152 cs.cy = rect.bottom;
153 cs.style = dlgInfo.style & ~WS_VISIBLE;
154 if(!isUnicode) {
155 if(dlgInfo.caption) {
156 cs.lpszName = UnicodeToAsciiString((LPWSTR)dlgInfo.caption);
157 }
158 else cs.lpszName = 0;
159 if(HIWORD(cs.lpszClass)) {
160 cs.lpszClass = UnicodeToAsciiString((LPWSTR)dlgInfo.className);
161 }
162 else cs.lpszClass = dlgInfo.className;
163 }
164 else {
165 cs.lpszName = dlgInfo.caption;
166 cs.lpszClass = dlgInfo.className;
167 }
168 cs.dwExStyle = dlgInfo.exStyle;
169
170 fIsDialog = TRUE;
171 CreateWindowExA(&cs, classAtom);
172
173 if(!isUnicode) {
174 if(cs.lpszName) FreeAsciiString((LPSTR)cs.lpszName);
175 if(HIWORD(cs.lpszClass)) {
176 FreeAsciiString((LPSTR)cs.lpszClass);
177 }
178 }
179
180 if (!getWindowHandle())
181 {
182 if (hUserFont) DeleteObject( hUserFont );
183 if (hMenu) DestroyMenu( hMenu );
184 return;
185 }
186
187//TODO:
188// wndPtr->helpContext = helpId;
189 Win32DlgProc = dlgProc;
190
191 if (hUserFont)
192 SendMessageA(WM_SETFONT, (WPARAM)hUserFont, 0 );
193
194 /* Create controls */
195 if (createControls(dlgTemplate, hInst))
196 {
197 dprintf(("********* DIALOG CONTROLS CREATED ************"));
198 /* Send initialisation messages and set focus */
199 hwndFocus = GetNextDlgTabItem( getWindowHandle(), 0, FALSE );
200
201 if (SendMessageA(WM_INITDIALOG, (WPARAM)hwndFocus, param ))
202 SetFocus(hwndFocus);
203
204 if (dlgInfo.style & WS_VISIBLE && !(getStyle() & WS_VISIBLE))
205 {
206 ShowWindow( SW_SHOWNORMAL ); /* SW_SHOW doesn't always work */
207 ::UpdateWindow( getWindowHandle() );
208 }
209 SetLastError(0);
210 dprintf(("********* DIALOG CREATED ************"));
211 return;
212 }
213 dprintf(("********* DIALOG CREATION FAILED! ************"));
214 DestroyWindow();
215}
216//******************************************************************************
217//******************************************************************************
218Win32Dialog::~Win32Dialog()
219{
220 if (hUserFont) DeleteObject( hUserFont );
221 if (hMenu) DestroyMenu( hMenu );
222
223}
224/***********************************************************************
225 * DIALOG_DoDialogBox
226 */
227INT Win32Dialog::doDialogBox()
228{
229 Win32BaseWindow *topOwner;
230 MSG msg;
231 INT retval;
232
233 /* Owner must be a top-level window */
234 if(getOwner() == NULL) {
235 topOwner = windowDesktop;
236 }
237 else topOwner = getOwner()->getTopParent();
238
239 if(topOwner == NULL) {
240 dprintf(("Dialog box has no top owner!!!"));
241 return -1;
242 }
243
244 if (!dialogFlags & DF_END) /* was EndDialog called in WM_INITDIALOG ? */
245 {
246 topOwner->EnableWindow( FALSE );
247 ShowWindow( SW_SHOW );
248
249 while (TRUE) {
250// while (OSLibWinPeekMsg(&msg, getWindowHandle(), owner, MSGF_DIALOGBOX,
251// MSG_REMOVE, !(getStyle() & DS_NOIDLEMSG), NULL ))
252// if(OSLibWinPeekMsg(&msg, topOwner->getOS2FrameWindowHandle(), 0, 0, MSG_REMOVE))
253 if(OSLibWinPeekMsg(&msg, 0, 0, 0, MSG_REMOVE))
254 {
255 if(msg.message == WM_QUIT) {
256 dprintf(("Win32Dialog::doDialogBox: received WM_QUIT"));
257 break;
258 }
259 if (!IsDialogMessageA( getWindowHandle(), &msg))
260 {
261 TranslateMessage( &msg );
262 DispatchMessageA( &msg );
263 }
264 if (dialogFlags & DF_END) break;
265 }
266 else {
267 if(!(getStyle() & DS_NOIDLEMSG)) {
268 topOwner->SendMessageA(WM_ENTERIDLE, MSGF_DIALOGBOX, getWindowHandle());
269 }
270 }
271 }
272 topOwner->EnableWindow( TRUE );
273 }
274 retval = idResult;
275 DestroyWindow();
276 return retval;
277}
278/***********************************************************************
279 * DIALOG_Init
280 *
281 * Initialisation of the dialog manager.
282 */
283BOOL Win32Dialog::DIALOG_Init(void)
284{
285 HDC hdc;
286 SIZE size;
287
288 /* Calculate the dialog base units */
289 if (!(hdc = CreateDCA( "DISPLAY", NULL, NULL, NULL ))) return FALSE;
290 if (!getCharSizeFromDC( hdc, 0, &size )) return FALSE;
291 DeleteDC( hdc );
292 xBaseUnit = size.cx;
293 yBaseUnit = size.cy;
294
295 return TRUE;
296}
297/***********************************************************************
298 * DIALOG_GetCharSizeFromDC
299 *
300 *
301 * Calculates the *true* average size of English characters in the
302 * specified font as oppposed to the one returned by GetTextMetrics.
303 */
304BOOL Win32Dialog::getCharSizeFromDC( HDC hDC, HFONT hUserFont, SIZE * pSize )
305{
306 BOOL Success = FALSE;
307 HFONT hUserFontPrev = 0;
308 pSize->cx = xBaseUnit;
309 pSize->cy = yBaseUnit;
310
311 if ( hDC )
312 {
313 /* select the font */
314 TEXTMETRICA tm;
315 memset(&tm,0,sizeof(tm));
316 if (hUserFont) hUserFontPrev = SelectFont(hDC,hUserFont);
317 if (GetTextMetricsA(hDC,&tm))
318 {
319 pSize->cx = tm.tmAveCharWidth;
320 pSize->cy = tm.tmHeight;
321
322 /* if variable width font */
323 if (tm.tmPitchAndFamily & TMPF_FIXED_PITCH)
324 {
325 SIZE total;
326 static const char szAvgChars[53] = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
327
328 /* Calculate a true average as opposed to the one returned
329 * by tmAveCharWidth. This works better when dealing with
330 * proportional spaced fonts and (more important) that's
331 * how Microsoft's dialog creation code calculates the size
332 * of the font
333 */
334 if (GetTextExtentPointA(hDC,szAvgChars,sizeof(szAvgChars),&total))
335 {
336 /* round up */
337 pSize->cx = ((2*total.cx/sizeof(szAvgChars)) + 1)/2;
338 Success = TRUE;
339 }
340 }
341 else
342 {
343 Success = TRUE;
344 }
345 }
346
347 /* select the original font */
348 if (hUserFontPrev) SelectFont(hDC,hUserFontPrev);
349 }
350 return (Success);
351}
352/***********************************************************************
353 * DIALOG_GetCharSize
354 *
355 *
356 * Calculates the *true* average size of English characters in the
357 * specified font as oppposed to the one returned by GetTextMetrics.
358 * A convenient variant of DIALOG_GetCharSizeFromDC.
359 */
360BOOL Win32Dialog::getCharSize( HFONT hUserFont, SIZE * pSize )
361{
362 HDC hDC = GetDC(0);
363 BOOL Success = getCharSizeFromDC( hDC, hUserFont, pSize );
364 ReleaseDC(0, hDC);
365 return Success;
366}
367/***********************************************************************
368 * DIALOG_ParseTemplate32
369 *
370 * Fill a DLG_TEMPLATE structure from the dialog template, and return
371 * a pointer to the first control.
372 */
373LPCSTR Win32Dialog::parseTemplate( LPCSTR dlgtemplate, DLG_TEMPLATE * result )
374{
375 const WORD *p = (const WORD *)dlgtemplate;
376
377 result->style = GET_DWORD(p); p += 2;
378 if (result->style == 0xffff0001) /* DIALOGEX resource */
379 {
380 result->dialogEx = TRUE;
381 result->helpId = GET_DWORD(p); p += 2;
382 result->exStyle = GET_DWORD(p); p += 2;
383 result->style = GET_DWORD(p); p += 2;
384 }
385 else
386 {
387 result->dialogEx = FALSE;
388 result->helpId = 0;
389 result->exStyle = GET_DWORD(p); p += 2;
390 }
391 result->nbItems = GET_WORD(p); p++;
392 result->x = GET_WORD(p); p++;
393 result->y = GET_WORD(p); p++;
394 result->cx = GET_WORD(p); p++;
395 result->cy = GET_WORD(p); p++;
396
397 /* Get the menu name */
398
399 switch(GET_WORD(p))
400 {
401 case 0x0000:
402 result->menuName = NULL;
403 p++;
404 break;
405 case 0xffff:
406 result->menuName = (LPCSTR)(UINT)GET_WORD( p + 1 );
407 p += 2;
408 break;
409 default:
410 result->menuName = (LPCSTR)p;
411 p += lstrlenW( (LPCWSTR)p ) + 1;
412 break;
413 }
414
415 /* Get the class name */
416 switch(GET_WORD(p))
417 {
418 case 0x0000:
419 result->className = (LPCSTR)DIALOG_CLASS_NAMEW;
420 p++;
421 break;
422 case 0xffff:
423 result->className = (LPCSTR)(UINT)GET_WORD( p + 1 );
424 p += 2;
425 break;
426 default:
427 result->className = (LPCSTR)p;
428 p += lstrlenW( (LPCWSTR)p ) + 1;
429 break;
430 }
431
432 /* Get the window caption */
433
434 result->caption = (LPCSTR)p;
435 p += lstrlenW( (LPCWSTR)p ) + 1;
436
437 /* Get the font name */
438
439 if (result->style & DS_SETFONT)
440 {
441 result->pointSize = GET_WORD(p);
442 p++;
443 if (result->dialogEx)
444 {
445 result->weight = GET_WORD(p); p++;
446 result->italic = LOBYTE(GET_WORD(p)); p++;
447 }
448 else
449 {
450 result->weight = FW_DONTCARE;
451 result->italic = FALSE;
452 }
453 result->faceName = (LPCSTR)p;
454 p += lstrlenW( (LPCWSTR)p ) + 1;
455 }
456
457 /* First control is on dword boundary */
458 return (LPCSTR)((((int)p) + 3) & ~3);
459}
460/***********************************************************************
461 * DIALOG_GetControl32
462 *
463 * Return the class and text of the control pointed to by ptr,
464 * fill the header structure and return a pointer to the next control.
465 */
466WORD *Win32Dialog::getControl(const WORD *p, DLG_CONTROL_INFO *info, BOOL dialogEx)
467{
468 if (dialogEx)
469 {
470 info->helpId = GET_DWORD(p); p += 2;
471 info->exStyle = GET_DWORD(p); p += 2;
472 info->style = GET_DWORD(p); p += 2;
473 }
474 else
475 {
476 info->helpId = 0;
477 info->style = GET_DWORD(p); p += 2;
478 info->exStyle = GET_DWORD(p); p += 2;
479 }
480 info->x = GET_WORD(p); p++;
481 info->y = GET_WORD(p); p++;
482 info->cx = GET_WORD(p); p++;
483 info->cy = GET_WORD(p); p++;
484
485 if (dialogEx)
486 {
487 /* id is a DWORD for DIALOGEX */
488 info->id = GET_DWORD(p);
489 p += 2;
490 }
491 else
492 {
493 info->id = GET_WORD(p);
494 p++;
495 }
496
497 if (GET_WORD(p) == 0xffff)
498 {
499 static const WCHAR class_names[6][10] =
500 {
501 { 'B','u','t','t','o','n', }, /* 0x80 */
502 { 'E','d','i','t', }, /* 0x81 */
503 { 'S','t','a','t','i','c', }, /* 0x82 */
504 { 'L','i','s','t','B','o','x', }, /* 0x83 */
505 { 'S','c','r','o','l','l','B','a','r', }, /* 0x84 */
506 { 'C','o','m','b','o','B','o','x', } /* 0x85 */
507 };
508 WORD id = GET_WORD(p+1);
509 if ((id >= 0x80) && (id <= 0x85))
510 info->className = (LPCSTR)class_names[id - 0x80];
511 else
512 {
513 info->className = NULL;
514 dprintf(("Unknown built-in class id %04x\n", id ));
515 }
516 p += 2;
517 }
518 else
519 {
520 info->className = (LPCSTR)p;
521 p += lstrlenW( (LPCWSTR)p ) + 1;
522 }
523
524 if (GET_WORD(p) == 0xffff) /* Is it an integer id? */
525 {
526 info->windowName = (LPCSTR)(UINT)GET_WORD(p + 1);
527 p += 2;
528 }
529 else
530 {
531 info->windowName = (LPCSTR)p;
532 p += lstrlenW( (LPCWSTR)p ) + 1;
533 }
534
535 if (GET_WORD(p))
536 {
537 info->data = (LPVOID)(p + 1);
538 p += GET_WORD(p) / sizeof(WORD);
539 }
540 else info->data = NULL;
541 p++;
542
543 /* Next control is on dword boundary */
544 return (WORD *)((((int)p) + 3) & ~3);
545}
546
547
548/***********************************************************************
549 * DIALOG_CreateControls
550 *
551 * Create the control windows for a dialog.
552 */
553BOOL Win32Dialog::createControls(LPCSTR dlgtemplate, HINSTANCE hInst)
554{
555 DLG_CONTROL_INFO info;
556 HWND hwndCtrl, hwndDefButton = 0;
557 INT items = dlgInfo.nbItems;
558
559 while (items--)
560 {
561 dlgtemplate = (LPCSTR)getControl( (WORD *)dlgtemplate, &info, dlgInfo.dialogEx );
562
563 dprintf(("Create CONTROL %d", info.id));
564 hwndCtrl = CreateWindowExW( info.exStyle | WS_EX_NOPARENTNOTIFY,
565 (LPCWSTR)info.className,
566 (LPCWSTR)info.windowName,
567 info.style | WS_CHILD,
568 info.x * xUnit / 4,
569 info.y * yUnit / 8,
570 info.cx * xUnit / 4,
571 info.cy * yUnit / 8,
572 getWindowHandle(), (HMENU)info.id,
573 hInst, info.data );
574
575 if (!hwndCtrl) return FALSE;
576
577 /* Send initialisation messages to the control */
578 if (hUserFont) ::SendMessageA( hwndCtrl, WM_SETFONT, (WPARAM)hUserFont, 0 );
579
580 if (::SendMessageA(hwndCtrl, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON)
581 {
582 /* If there's already a default push-button, set it back */
583 /* to normal and use this one instead. */
584 if (hwndDefButton)
585 ::SendMessageA( hwndDefButton, BM_SETSTYLE,
586 BS_PUSHBUTTON,FALSE );
587 hwndDefButton = hwndCtrl;
588 idResult = ::GetWindowWord( hwndCtrl, GWW_ID );
589 }
590 dprintf(("Create CONTROL %d DONE", info.id));
591 }
592 return TRUE;
593}
594/***********************************************************************
595 * DEFDLG_Proc
596 *
597 * Implementation of DefDlgProc(). Only handle messages that need special
598 * handling for dialogs.
599 */
600LRESULT Win32Dialog::DefDlg_Proc(UINT msg, WPARAM wParam, LPARAM lParam)
601{
602 switch(msg)
603 {
604 case WM_ERASEBKGND:
605 {
606 RECT rect;
607 int rc;
608 /* Since WM_ERASEBKGND may receive either a window dc or a */
609 /* client dc, the area to be erased has to be retrieved from */
610 /* the device context. */
611 rc = GetClipBox( (HDC)wParam, &rect );
612 if ((rc == SIMPLEREGION) || (rc == COMPLEXREGION))
613 FillRect( (HDC)wParam, &rect, windowClass->getBackgroundBrush());
614 return 1;
615 }
616 case WM_NCDESTROY:
617 /* Free dialog heap (if created) */
618#if 0
619 if (dlgInfo->hDialogHeap)
620 {
621 GlobalUnlock16(dlgInfo->hDialogHeap);
622 GlobalFree16(dlgInfo->hDialogHeap);
623 dlgInfo->hDialogHeap = 0;
624 }
625#endif
626 /* Delete font */
627 if (hUserFont)
628 {
629 DeleteObject( hUserFont );
630 hUserFont = 0;
631 }
632
633 /* Delete menu */
634 if (hMenu)
635 {
636 DestroyMenu( hMenu );
637 hMenu = 0;
638 }
639
640 /* Delete window procedure */
641 Win32DlgProc = 0;
642 dialogFlags |= DF_END; /* just in case */
643
644 /* Window clean-up */
645 return DefWindowProcA(msg, wParam, lParam );
646
647 case WM_SHOWWINDOW:
648 if (!wParam) saveFocus();
649 return DefWindowProcA(msg, wParam, lParam );
650
651 case WM_ACTIVATE:
652 if (wParam) {
653 restoreFocus();
654 }
655 else saveFocus();
656 return 0;
657
658 case WM_SETFOCUS:
659 restoreFocus();
660 return 0;
661
662 case DM_SETDEFID:
663 if (dialogFlags & DF_END)
664 return 1;
665
666 setDefButton(wParam ? GetDlgItem( getWindowHandle(), wParam ) : 0 );
667 return 1;
668
669 case DM_GETDEFID:
670 {
671 HWND hwndDefId;
672 if (dialogFlags & DF_END) return 0;
673 if (idResult)
674 return MAKELONG( idResult, DC_HASDEFID );
675 if ((hwndDefId = findDefButton()))
676 return MAKELONG( GetDlgCtrlID( hwndDefId ), DC_HASDEFID);
677
678 return 0;
679 }
680
681 case WM_NEXTDLGCTL:
682 {
683 HWND hwndDest = (HWND)wParam;
684 if (!lParam)
685 hwndDest = GetNextDlgTabItem(getWindowHandle(), GetFocus(), wParam);
686 if (hwndDest) setFocus( hwndDest );
687 setDefButton( hwndDest );
688 return 0;
689 }
690
691 case WM_ENTERMENULOOP:
692 case WM_LBUTTONDOWN:
693 case WM_NCLBUTTONDOWN:
694 {
695 HWND hwndCurFocus = GetFocus();
696 if (hwndCurFocus)
697 {
698#if 0
699 WND *wnd = WIN_FindWndPtr( hwndFocus );
700
701 if( wnd )
702 {
703 /* always make combo box hide its listbox control */
704 if( WIDGETS_IsControl( wnd, BIC32_COMBO ) )
705 SendMessageA( hwndFocus, CB_SHOWDROPDOWN, FALSE, 0 );
706 else
707 if( WIDGETS_IsControl( wnd, BIC32_EDIT ) &&
708 WIDGETS_IsControl( wnd->parent, BIC32_COMBO ))
709 SendMessageA(CB_SHOWDROPDOWN, FALSE, 0 );
710 }
711#endif
712 }
713 return DefWindowProcA( msg, wParam, lParam );
714 }
715
716 case WM_GETFONT:
717 return hUserFont;
718
719 case WM_CLOSE:
720 PostMessageA(WM_COMMAND, IDCANCEL, (LPARAM)GetDlgItem( getWindowHandle(), IDCANCEL ) );
721 return 0;
722
723 case WM_NOTIFYFORMAT:
724 return DefWindowProcA(msg, wParam, lParam );
725 }
726 return 0;
727}
728//******************************************************************************
729//******************************************************************************
730LRESULT Win32Dialog::DefDlgProcA(UINT Msg, WPARAM wParam, LPARAM lParam)
731{
732 BOOL result = FALSE;
733
734 msgResult = 0;
735
736 if (Win32DlgProc) { /* Call dialog procedure */
737 result = Win32DlgProc(getWindowHandle(), Msg, wParam, lParam);
738 }
739
740 if (!result && IsWindow())
741 {
742 /* callback didn't process this message */
743 switch(Msg)
744 {
745 case WM_ERASEBKGND:
746 case WM_SHOWWINDOW:
747 case WM_ACTIVATE:
748 case WM_SETFOCUS:
749 case DM_SETDEFID:
750 case DM_GETDEFID:
751 case WM_NEXTDLGCTL:
752 case WM_GETFONT:
753 case WM_CLOSE:
754 case WM_NCDESTROY:
755 case WM_ENTERMENULOOP:
756 case WM_LBUTTONDOWN:
757 case WM_NCLBUTTONDOWN:
758 return DefDlg_Proc(Msg, (WPARAM)wParam, lParam);
759
760 case WM_INITDIALOG:
761 case WM_VKEYTOITEM:
762 case WM_COMPAREITEM:
763 case WM_CHARTOITEM:
764 break;
765
766 default:
767 return DefWindowProcA(Msg, wParam, lParam );
768 }
769 }
770 return DefDlg_Epilog(Msg, result);
771}
772//******************************************************************************
773//******************************************************************************
774LRESULT Win32Dialog::DefDlgProcW(UINT Msg, WPARAM wParam, LPARAM lParam)
775{
776 BOOL result = FALSE;
777
778 msgResult = 0;
779
780 if (Win32DlgProc) { /* Call dialog procedure */
781 result = Win32DlgProc(getWindowHandle(), Msg, wParam, lParam);
782 }
783
784 if (!result && IsWindow())
785 {
786 /* callback didn't process this message */
787 switch(Msg)
788 {
789 case WM_ERASEBKGND:
790 case WM_SHOWWINDOW:
791 case WM_ACTIVATE:
792 case WM_SETFOCUS:
793 case DM_SETDEFID:
794 case DM_GETDEFID:
795 case WM_NEXTDLGCTL:
796 case WM_GETFONT:
797 case WM_CLOSE:
798 case WM_NCDESTROY:
799 case WM_ENTERMENULOOP:
800 case WM_LBUTTONDOWN:
801 case WM_NCLBUTTONDOWN:
802 return DefDlg_Proc(Msg, (WPARAM)wParam, lParam);
803
804 case WM_INITDIALOG:
805 case WM_VKEYTOITEM:
806 case WM_COMPAREITEM:
807 case WM_CHARTOITEM:
808 break;
809
810 default:
811 return DefWindowProcW(Msg, wParam, lParam );
812 }
813 }
814 return DefDlg_Epilog(Msg, result);
815}
816/***********************************************************************
817 * DEFDLG_Epilog
818 */
819LRESULT Win32Dialog::DefDlg_Epilog(UINT msg, BOOL fResult)
820{
821 /* see SDK 3.1 */
822 if ((msg >= WM_CTLCOLORMSGBOX && msg <= WM_CTLCOLORSTATIC) ||
823 msg == WM_CTLCOLOR || msg == WM_COMPAREITEM ||
824 msg == WM_VKEYTOITEM || msg == WM_CHARTOITEM ||
825 msg == WM_QUERYDRAGICON || msg == WM_INITDIALOG)
826 return fResult;
827
828 return msgResult;
829}
830/***********************************************************************
831 * DEFDLG_SetFocus
832 *
833 * Set the focus to a control of the dialog, selecting the text if
834 * the control is an edit dialog.
835 */
836void Win32Dialog::setFocus(HWND hwndCtrl )
837{
838 HWND hwndPrev = GetFocus();
839
840 if (IsChild( hwndPrev ))
841 {
842 if (::SendMessageA( hwndPrev, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
843 ::SendMessageA( hwndPrev, EM_SETSEL, TRUE, MAKELONG( -1, 0 ) );
844 }
845 if (::SendMessageA(hwndCtrl, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
846 ::SendMessageA(hwndCtrl, EM_SETSEL, FALSE, MAKELONG( 0, -1 ) );
847 SetFocus( hwndCtrl );
848}
849
850
851/***********************************************************************
852 * DEFDLG_SaveFocus
853 */
854BOOL Win32Dialog::saveFocus()
855{
856 HWND hwndCurrentFocus = GetFocus();
857
858 if (!hwndCurrentFocus || !IsChild( hwndCurrentFocus )) return FALSE;
859
860 hwndFocus = hwndCurrentFocus;
861 /* Remove default button */
862 return TRUE;
863}
864
865
866/***********************************************************************
867 * DEFDLG_RestoreFocus
868 */
869BOOL Win32Dialog::restoreFocus()
870{
871 if (!hwndFocus || IsIconic()) return FALSE;
872
873 if (!::IsWindow( hwndFocus )) return FALSE;
874
875 /* Don't set the focus back to controls if EndDialog is already called.*/
876 if (!(dialogFlags & DF_END))
877 setFocus(hwndFocus);
878
879 /* This used to set infoPtr->hwndFocus to NULL for no apparent reason,
880 sometimes losing focus when receiving WM_SETFOCUS messages. */
881 return TRUE;
882}
883
884
885/***********************************************************************
886 * DEFDLG_FindDefButton
887 *
888 * Find the current default push-button.
889 */
890HWND Win32Dialog::findDefButton()
891{
892 HWND hwndChild = GetWindow( GW_CHILD );
893 while (hwndChild)
894 {
895 if (::SendMessageA( hwndChild, WM_GETDLGCODE, 0, 0 ) & DLGC_DEFPUSHBUTTON)
896 break;
897 hwndChild = ::GetWindow( hwndChild, GW_HWNDNEXT );
898 }
899 return hwndChild;
900}
901
902
903/***********************************************************************
904 * DEFDLG_SetDefButton
905 *
906 * Set the new default button to be hwndNew.
907 */
908BOOL Win32Dialog::setDefButton(HWND hwndNew )
909{
910 if (hwndNew &&
911 !(::SendMessageA(hwndNew, WM_GETDLGCODE, 0, 0 ) & DLGC_UNDEFPUSHBUTTON))
912 return FALSE; /* Destination is not a push button */
913
914 if (idResult) /* There's already a default pushbutton */
915 {
916 HWND hwndOld = GetDlgItem( getWindowHandle(), idResult );
917 if (::SendMessageA( hwndOld, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON)
918 ::SendMessageA( hwndOld, BM_SETSTYLE, BS_PUSHBUTTON, TRUE );
919 }
920 if (hwndNew)
921 {
922 ::SendMessageA( hwndNew, BM_SETSTYLE, BS_DEFPUSHBUTTON, TRUE );
923 idResult = GetDlgCtrlID( hwndNew );
924 }
925 else idResult = 0;
926 return TRUE;
927}
928//******************************************************************************
929// GetNextDlgTabItem32 (USER32.276)
930//******************************************************************************
931HWND Win32Dialog::getNextDlgTabItem(HWND hwndCtrl, BOOL fPrevious)
932{
933 Win32BaseWindow *child, *nextchild, *lastchild;
934 HWND retvalue;
935
936 if (hwndCtrl)
937 {
938 child = GetWindowFromHandle(hwndCtrl);
939 if (!child)
940 {
941 retvalue = 0;
942 goto END;
943 }
944 /* Make sure hwndCtrl is a top-level child */
945 while ((child->getStyle() & WS_CHILD) && (child->getParent() != this))
946 {
947 child = child->getParent();
948 if(child == NULL) break;
949 }
950
951 if (!child || child->getParent() != this)
952 {
953 retvalue = 0;
954 goto END;
955 }
956 }
957 else
958 {
959 /* No ctrl specified -> start from the beginning */
960 child = (Win32BaseWindow *)getFirstChild();
961 if (!child)
962 {
963 retvalue = 0;
964 goto END;
965 }
966
967 if (!fPrevious)
968 {
969 while (child->getNextChild())
970 {
971 child = (Win32BaseWindow *)child->getNextChild();
972 }
973 }
974 }
975
976 lastchild = child;
977 nextchild = (Win32BaseWindow *)child->getNextChild();
978 while (TRUE)
979 {
980 if (!nextchild) nextchild = (Win32BaseWindow *)getFirstChild();
981
982 if (child == nextchild) break;
983
984 if ((nextchild->getStyle() & WS_TABSTOP) && (nextchild->getStyle() & WS_VISIBLE) &&
985 !(nextchild->getStyle() & WS_DISABLED))
986 {
987 lastchild = nextchild;
988 if (!fPrevious) break;
989 }
990 nextchild = (Win32BaseWindow *)nextchild->getNextChild();
991 }
992 retvalue = lastchild->getWindowHandle();
993
994END:
995 return retvalue;
996}
997//******************************************************************************
998//******************************************************************************
999HWND Win32Dialog::getNextDlgGroupItem(HWND hwndCtrl, BOOL fPrevious)
1000{
1001 Win32BaseWindow *child, *nextchild, *lastchild;
1002 HWND retvalue;
1003
1004 if (hwndCtrl)
1005 {
1006 child = GetWindowFromHandle(hwndCtrl);
1007 if (!child)
1008 {
1009 retvalue = 0;
1010 goto END;
1011 }
1012 /* Make sure hwndCtrl is a top-level child */
1013 while ((child->getStyle() & WS_CHILD) && (child->getParent() != this))
1014 {
1015 child = child->getParent();
1016 if(child == NULL) break;
1017 }
1018
1019 if (!child || child->getParent() != this)
1020 {
1021 retvalue = 0;
1022 goto END;
1023 }
1024 }
1025 else
1026 {
1027 /* No ctrl specified -> start from the beginning */
1028 child = (Win32BaseWindow *)getFirstChild();
1029 if (!child)
1030 {
1031 retvalue = 0;
1032 goto END;
1033 }
1034
1035 if (fPrevious)
1036 {
1037 while (child->getNextChild())
1038 {
1039 child = (Win32BaseWindow *)child->getNextChild();
1040 }
1041 }
1042 }
1043
1044 lastchild = child;
1045 nextchild = (Win32BaseWindow *)child->getNextChild();
1046 while (TRUE)
1047 {
1048 if (!nextchild || nextchild->getStyle() & WS_GROUP)
1049 {
1050 /* Wrap-around to the beginning of the group */
1051 Win32BaseWindow *pWndTemp;
1052
1053 nextchild = (Win32BaseWindow *)getFirstChild();
1054
1055 for(pWndTemp = nextchild;pWndTemp;pWndTemp = (Win32BaseWindow *)pWndTemp->getNextChild())
1056 {
1057 if (pWndTemp->getStyle() & WS_GROUP) nextchild = pWndTemp;
1058 if (pWndTemp == child) break;
1059 }
1060
1061 }
1062 if (nextchild == child) break;
1063
1064 if ((nextchild->getStyle() & WS_VISIBLE) && !(nextchild->getStyle() & WS_DISABLED))
1065 {
1066 lastchild = nextchild;
1067 if (!fPrevious) break;
1068 }
1069
1070 nextchild = (Win32BaseWindow *)nextchild->getNextChild();
1071 }
1072 retvalue = lastchild->getWindowHandle();
1073END:
1074 return retvalue;
1075}
1076//******************************************************************************
1077//******************************************************************************
1078Win32BaseWindow *Win32Dialog::getDlgItem(int id)
1079{
1080 for (Win32BaseWindow *child = (Win32BaseWindow *)getFirstChild(); child; child = (Win32BaseWindow *)child->getNextChild())
1081 {
1082 if (child->getWindowId() == id)
1083 {
1084 return child;
1085 }
1086 }
1087 return 0;
1088}
1089//******************************************************************************
1090//******************************************************************************
1091BOOL Win32Dialog::endDialog(int retval)
1092{
1093 dialogFlags |= DF_END;
1094 idResult = retval;
1095 return TRUE;
1096}
1097//******************************************************************************
1098//******************************************************************************
1099ULONG Win32Dialog::MsgOS2Create(HWND hwndOS2, ULONG initParam)
1100{
1101 OS2Hwnd = hwndOS2;
1102 return win32wndproc(Win32Hwnd, WM_CREATE, 0, initParam);
1103}
1104//******************************************************************************
1105//******************************************************************************
1106LONG Win32Dialog::SetWindowLongA(int index, ULONG value)
1107{
1108 LONG oldval;
1109
1110 switch(index)
1111 {
1112 case DWL_DLGPROC:
1113 oldval = (LONG)Win32DlgProc;
1114 Win32DlgProc = (DLGPROC)index;
1115 return oldval;
1116 case DWL_MSGRESULT:
1117 oldval = msgResult;
1118 msgResult = value;
1119 return oldval;
1120 case DWL_USER:
1121 oldval = userDlgData;
1122 userDlgData = value;
1123 return oldval;
1124 default:
1125 return Win32BaseWindow::SetWindowLongA(index, value);
1126 }
1127}
1128//******************************************************************************
1129//******************************************************************************
1130ULONG Win32Dialog::GetWindowLongA(int index)
1131{
1132 switch(index)
1133 {
1134 case DWL_DLGPROC:
1135 return (ULONG)Win32DlgProc;
1136 case DWL_MSGRESULT:
1137 return msgResult;
1138 case DWL_USER:
1139 return userDlgData;
1140 default:
1141 return Win32BaseWindow::GetWindowLongA(index);
1142 }
1143}
1144//******************************************************************************
1145//******************************************************************************
1146BOOL DIALOG_Register()
1147{
1148 WNDCLASSA wndClass;
1149
1150 ZeroMemory(&wndClass,sizeof(WNDCLASSA));
1151 wndClass.style = CS_GLOBALCLASS | CS_SAVEBITS;
1152 wndClass.lpfnWndProc = (WNDPROC)DefDlgProcA;
1153 wndClass.cbClsExtra = 0;
1154 wndClass.cbWndExtra = 0;
1155 wndClass.hCursor = (HCURSOR)IDC_ARROWA;
1156 wndClass.hbrBackground = GetSysColorBrush(COLOR_BTNFACE);
1157 wndClass.lpszClassName = DIALOG_CLASS_NAMEA;
1158
1159 return RegisterClassA(&wndClass);
1160}
1161//******************************************************************************
1162//******************************************************************************
1163BOOL DIALOG_Unregister()
1164{
1165 if (GlobalFindAtomA(DIALOG_CLASS_NAMEA))
1166 return UnregisterClassA(DIALOG_CLASS_NAMEA,(HINSTANCE)NULL);
1167 else return FALSE;
1168}
1169//******************************************************************************
1170//******************************************************************************
1171BOOL Win32Dialog::fInitialized = FALSE;
1172int Win32Dialog::xBaseUnit = 10;
1173int Win32Dialog::yBaseUnit = 20;
Note: See TracBrowser for help on using the repository browser.