2 * Default dialog procedure
4 * Copyright 1993, 1996 Alexandre Julliard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
26 #include "wine/winuser16.h"
30 #include "wine/debug.h"
32 WINE_DEFAULT_DEBUG_CHANNEL(dialog);
35 /***********************************************************************
38 static WNDPROC DEFDLG_GetDlgProc( HWND hwnd )
41 WND *wndPtr = WIN_GetPtr( hwnd );
43 if (!wndPtr) return 0;
44 if (wndPtr == WND_OTHER_PROCESS)
46 ERR( "cannot get dlg proc %p from other process\n", hwnd );
49 ret = *(WNDPROC *)((char *)wndPtr->wExtra + DWL_DLGPROC);
50 WIN_ReleasePtr( wndPtr );
54 /***********************************************************************
57 * Set the focus to a control of the dialog, selecting the text if
58 * the control is an edit dialog.
60 static void DEFDLG_SetFocus( HWND hwndDlg, HWND hwndCtrl )
62 HWND hwndPrev = GetFocus();
64 if (IsChild( hwndDlg, hwndPrev ))
66 if (SendMessageW( hwndPrev, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
67 SendMessageW( hwndPrev, EM_SETSEL, -1, 0 );
69 if (SendMessageW( hwndCtrl, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
70 SendMessageW( hwndCtrl, EM_SETSEL, 0, -1 );
75 /***********************************************************************
78 static void DEFDLG_SaveFocus( HWND hwnd )
81 HWND hwndFocus = GetFocus();
83 if (!hwndFocus || !IsChild( hwnd, hwndFocus )) return;
84 if (!(infoPtr = DIALOG_get_info( hwnd ))) return;
85 infoPtr->hwndFocus = hwndFocus;
86 /* Remove default button */
90 /***********************************************************************
93 static void DEFDLG_RestoreFocus( HWND hwnd )
97 if (IsIconic( hwnd )) return;
98 if (!(infoPtr = DIALOG_get_info( hwnd ))) return;
99 if (!IsWindow( infoPtr->hwndFocus )) return;
100 /* Don't set the focus back to controls if EndDialog is already called.*/
101 if (!(infoPtr->flags & DF_END))
103 DEFDLG_SetFocus( hwnd, infoPtr->hwndFocus );
106 /* This used to set infoPtr->hwndFocus to NULL for no apparent reason,
107 sometimes losing focus when receiving WM_SETFOCUS messages. */
111 /***********************************************************************
112 * DEFDLG_FindDefButton
114 * Find the current default push-button.
116 static HWND DEFDLG_FindDefButton( HWND hwndDlg )
118 HWND hwndChild = GetWindow( hwndDlg, GW_CHILD );
121 if (SendMessageW( hwndChild, WM_GETDLGCODE, 0, 0 ) & DLGC_DEFPUSHBUTTON)
123 hwndChild = GetWindow( hwndChild, GW_HWNDNEXT );
129 /***********************************************************************
130 * DEFDLG_SetDefButton
132 * Set the new default button to be hwndNew.
134 static BOOL DEFDLG_SetDefButton( HWND hwndDlg, DIALOGINFO *dlgInfo, WPARAM wParam )
136 DWORD dlgcode=0; /* initialize just to avoid a warning */
137 HWND hwndNew = GetDlgItem(hwndDlg, wParam);
139 dlgInfo->idResult = wParam;
141 !((dlgcode=SendMessageW(hwndNew, WM_GETDLGCODE, 0, 0 ))
142 & (DLGC_UNDEFPUSHBUTTON | DLGC_BUTTON)))
143 return FALSE; /* Destination is not a push button */
145 if (dlgInfo->idResult) /* There's already a default pushbutton */
147 HWND hwndOld = GetDlgItem( hwndDlg, dlgInfo->idResult );
148 if (hwndOld && (SendMessageA( hwndOld, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON))
149 SendMessageA( hwndOld, BM_SETSTYLE, BS_PUSHBUTTON, TRUE );
153 if(dlgcode==DLGC_UNDEFPUSHBUTTON)
154 SendMessageA( hwndNew, BM_SETSTYLE, BS_DEFPUSHBUTTON, TRUE );
160 /***********************************************************************
163 * Implementation of DefDlgProc(). Only handle messages that need special
164 * handling for dialogs.
166 static LRESULT DEFDLG_Proc( HWND hwnd, UINT msg, WPARAM wParam,
167 LPARAM lParam, DIALOGINFO *dlgInfo )
173 HBRUSH brush = (HBRUSH)SendMessageW( hwnd, WM_CTLCOLORDLG, wParam, (LPARAM)hwnd );
174 if (!brush) brush = (HBRUSH)DefWindowProcW( hwnd, WM_CTLCOLORDLG, wParam, (LPARAM)hwnd );
178 HDC hdc = (HDC)wParam;
179 GetClientRect( hwnd, &rect );
180 DPtoLP( hdc, (LPPOINT)&rect, 2 );
181 FillRect( hdc, &rect, brush );
186 if ((dlgInfo = (DIALOGINFO *)SetWindowLongW( hwnd, DWL_WINE_DIALOGINFO, 0 )))
188 /* Free dialog heap (if created) */
189 if (dlgInfo->hDialogHeap)
191 GlobalUnlock16(dlgInfo->hDialogHeap);
192 GlobalFree16(dlgInfo->hDialogHeap);
194 if (dlgInfo->hUserFont) DeleteObject( dlgInfo->hUserFont );
195 if (dlgInfo->hMenu) DestroyMenu( dlgInfo->hMenu );
196 WINPROC_FreeProc( DEFDLG_GetDlgProc( hwnd ), WIN_PROC_WINDOW );
197 HeapFree( GetProcessHeap(), 0, dlgInfo );
199 /* Window clean-up */
200 return DefWindowProcA( hwnd, msg, wParam, lParam );
203 if (!wParam) DEFDLG_SaveFocus( hwnd );
204 return DefWindowProcA( hwnd, msg, wParam, lParam );
207 if (wParam) DEFDLG_RestoreFocus( hwnd );
208 else DEFDLG_SaveFocus( hwnd );
212 DEFDLG_RestoreFocus( hwnd );
216 if (dlgInfo && !(dlgInfo->flags & DF_END))
217 DEFDLG_SetDefButton( hwnd, dlgInfo, wParam );
221 if (dlgInfo && !(dlgInfo->flags & DF_END))
224 if (dlgInfo->idResult)
225 return MAKELONG( dlgInfo->idResult, DC_HASDEFID );
226 if ((hwndDefId = DEFDLG_FindDefButton( hwnd )))
227 return MAKELONG( GetDlgCtrlID( hwndDefId ), DC_HASDEFID);
234 HWND hwndDest = (HWND)wParam;
236 hwndDest = GetNextDlgTabItem(hwnd, GetFocus(), wParam);
237 if (hwndDest) DEFDLG_SetFocus( hwnd, hwndDest );
238 DEFDLG_SetDefButton( hwnd, dlgInfo, GetDlgCtrlID(hwndDest) );
242 case WM_ENTERMENULOOP:
244 case WM_NCLBUTTONDOWN:
246 HWND hwndFocus = GetFocus();
249 /* always make combo box hide its listbox control */
250 if (!SendMessageA( hwndFocus, CB_SHOWDROPDOWN, FALSE, 0 ))
251 SendMessageA( GetParent(hwndFocus), CB_SHOWDROPDOWN, FALSE, 0 );
254 return DefWindowProcA( hwnd, msg, wParam, lParam );
257 return dlgInfo ? (LRESULT)dlgInfo->hUserFont : 0;
260 PostMessageA( hwnd, WM_COMMAND, MAKEWPARAM(IDCANCEL, BN_CLICKED),
261 (LPARAM)GetDlgItem( hwnd, IDCANCEL ) );
264 case WM_NOTIFYFORMAT:
265 return DefWindowProcA( hwnd, msg, wParam, lParam );
270 /***********************************************************************
273 static LRESULT DEFDLG_Epilog(HWND hwnd, UINT msg, BOOL fResult)
277 if ((msg >= WM_CTLCOLORMSGBOX && msg <= WM_CTLCOLORSTATIC) ||
278 msg == WM_CTLCOLOR || msg == WM_COMPAREITEM ||
279 msg == WM_VKEYTOITEM || msg == WM_CHARTOITEM ||
280 msg == WM_QUERYDRAGICON || msg == WM_INITDIALOG)
283 return GetWindowLongA( hwnd, DWL_MSGRESULT );
286 /***********************************************************************
289 * Allocate memory for DIALOGINFO structure and store in DWL_DIALOGINFO
290 * structure. Also flag the window as a dialog type.
292 static DIALOGINFO* DEFDLG_InitDlgInfo(HWND hwnd)
295 DIALOGINFO* dlgInfo = DIALOG_get_info( hwnd );
298 if (!(dlgInfo = HeapAlloc( GetProcessHeap(), 0, sizeof(*dlgInfo) ))) return NULL;
299 dlgInfo->hwndFocus = 0;
300 dlgInfo->hUserFont = 0;
302 dlgInfo->xBaseUnit = 0;
303 dlgInfo->yBaseUnit = 0;
304 dlgInfo->idResult = 0;
306 dlgInfo->hDialogHeap = 0;
307 wndPtr = WIN_GetPtr( hwnd );
308 if (wndPtr && wndPtr != WND_OTHER_PROCESS)
310 wndPtr->flags |= WIN_ISDIALOG;
311 WIN_ReleasePtr( wndPtr );
312 SetWindowLongW( hwnd, DWL_WINE_DIALOGINFO, (LONG)dlgInfo );
316 HeapFree( GetProcessHeap(), 0, dlgInfo );
323 /***********************************************************************
324 * DefDlgProc (USER.308)
326 LRESULT WINAPI DefDlgProc16( HWND16 hwnd, UINT16 msg, WPARAM16 wParam,
331 HWND hwnd32 = WIN_Handle32( hwnd );
334 /* Perform DIALOGINFO intialization if not done */
335 if(!(dlgInfo = DEFDLG_InitDlgInfo(hwnd32))) return -1;
337 SetWindowLongW( hwnd32, DWL_MSGRESULT, 0 );
339 if ((dlgproc = (WNDPROC16)DEFDLG_GetDlgProc( hwnd32 )))
341 /* Call dialog procedure */
342 result = CallWindowProc16( dlgproc, hwnd, msg, wParam, lParam );
343 /* 16 bit dlg procs only return BOOL16 */
344 if( WINPROC_GetProcType( (WNDPROC)dlgproc ) == WIN_PROC_16 )
345 result = LOWORD(result);
348 if (!result && IsWindow(hwnd32))
350 /* callback didn't process this message */
364 case WM_ENTERMENULOOP:
366 case WM_NCLBUTTONDOWN:
367 return DEFDLG_Proc( hwnd32, msg, (WPARAM)wParam, lParam, dlgInfo );
375 return DefWindowProc16( hwnd, msg, wParam, lParam );
378 return DEFDLG_Epilog( hwnd32, msg, result);
382 /***********************************************************************
383 * DefDlgProcA (USER32.@)
385 LRESULT WINAPI DefDlgProcA( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
391 /* Perform DIALOGINFO initialization if not done */
392 if(!(dlgInfo = DEFDLG_InitDlgInfo(hwnd))) return -1;
394 SetWindowLongW( hwnd, DWL_MSGRESULT, 0 );
396 if ((dlgproc = DEFDLG_GetDlgProc( hwnd )))
398 /* Call dialog procedure */
399 result = CallWindowProcA( dlgproc, hwnd, msg, wParam, lParam );
400 /* 16 bit dlg procs only return BOOL16 */
401 if( WINPROC_GetProcType( dlgproc ) == WIN_PROC_16 )
402 result = LOWORD(result);
405 if (!result && IsWindow(hwnd))
407 /* callback didn't process this message */
421 case WM_ENTERMENULOOP:
423 case WM_NCLBUTTONDOWN:
424 return DEFDLG_Proc( hwnd, msg, wParam, lParam, dlgInfo );
432 return DefWindowProcA( hwnd, msg, wParam, lParam );
435 return DEFDLG_Epilog(hwnd, msg, result);
439 /***********************************************************************
440 * DefDlgProcW (USER32.@)
442 LRESULT WINAPI DefDlgProcW( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
448 /* Perform DIALOGINFO intialization if not done */
449 if(!(dlgInfo = DEFDLG_InitDlgInfo(hwnd))) return -1;
451 SetWindowLongW( hwnd, DWL_MSGRESULT, 0 );
453 if ((dlgproc = DEFDLG_GetDlgProc( hwnd )))
455 /* Call dialog procedure */
456 result = CallWindowProcW( dlgproc, hwnd, msg, wParam, lParam );
457 /* 16 bit dlg procs only return BOOL16 */
458 if( WINPROC_GetProcType( dlgproc ) == WIN_PROC_16 )
459 result = LOWORD(result);
462 if (!result && IsWindow(hwnd))
464 /* callback didn't process this message */
478 case WM_ENTERMENULOOP:
480 case WM_NCLBUTTONDOWN:
481 return DEFDLG_Proc( hwnd, msg, wParam, lParam, dlgInfo );
489 return DefWindowProcW( hwnd, msg, wParam, lParam );
492 return DEFDLG_Epilog(hwnd, msg, result);