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
, FALSE
))) 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
, FALSE
))) 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 * Get the DIALOGINFO structure of a window, allocating it if needed
290 * and 'create' is TRUE.
292 DIALOGINFO
*DIALOG_get_info( HWND hwnd
, BOOL create
)
295 DIALOGINFO
* dlgInfo
= (DIALOGINFO
*)GetWindowLongW( hwnd
, DWL_WINE_DIALOGINFO
);
297 if(!dlgInfo
&& create
)
299 if (!(dlgInfo
= HeapAlloc( GetProcessHeap(), 0, sizeof(*dlgInfo
) ))) return NULL
;
300 dlgInfo
->hwndFocus
= 0;
301 dlgInfo
->hUserFont
= 0;
303 dlgInfo
->xBaseUnit
= 0;
304 dlgInfo
->yBaseUnit
= 0;
305 dlgInfo
->idResult
= 0;
307 dlgInfo
->hDialogHeap
= 0;
308 wndPtr
= WIN_GetPtr( hwnd
);
309 if (wndPtr
&& wndPtr
!= WND_OTHER_PROCESS
)
311 wndPtr
->flags
|= WIN_ISDIALOG
;
312 WIN_ReleasePtr( wndPtr
);
313 SetWindowLongW( hwnd
, DWL_WINE_DIALOGINFO
, (LONG
)dlgInfo
);
317 HeapFree( GetProcessHeap(), 0, dlgInfo
);
324 /***********************************************************************
325 * DefDlgProc (USER.308)
327 LRESULT WINAPI
DefDlgProc16( HWND16 hwnd
, UINT16 msg
, WPARAM16 wParam
,
332 HWND hwnd32
= WIN_Handle32( hwnd
);
335 /* Perform DIALOGINFO intialization if not done */
336 if(!(dlgInfo
= DIALOG_get_info(hwnd32
, TRUE
))) return -1;
338 SetWindowLongW( hwnd32
, DWL_MSGRESULT
, 0 );
340 if ((dlgproc
= (WNDPROC16
)DEFDLG_GetDlgProc( hwnd32
)))
342 /* Call dialog procedure */
343 result
= CallWindowProc16( dlgproc
, hwnd
, msg
, wParam
, lParam
);
344 /* 16 bit dlg procs only return BOOL16 */
345 if( WINPROC_GetProcType( (WNDPROC
)dlgproc
) == WIN_PROC_16
)
346 result
= LOWORD(result
);
349 if (!result
&& IsWindow(hwnd32
))
351 /* callback didn't process this message */
365 case WM_ENTERMENULOOP
:
367 case WM_NCLBUTTONDOWN
:
368 return DEFDLG_Proc( hwnd32
, msg
, (WPARAM
)wParam
, lParam
, dlgInfo
);
376 return DefWindowProc16( hwnd
, msg
, wParam
, lParam
);
379 return DEFDLG_Epilog( hwnd32
, msg
, result
);
383 /***********************************************************************
384 * DefDlgProcA (USER32.@)
386 LRESULT WINAPI
DefDlgProcA( HWND hwnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
392 /* Perform DIALOGINFO initialization if not done */
393 if(!(dlgInfo
= DIALOG_get_info( hwnd
, TRUE
))) return -1;
395 SetWindowLongW( hwnd
, DWL_MSGRESULT
, 0 );
397 if ((dlgproc
= DEFDLG_GetDlgProc( hwnd
)))
399 /* Call dialog procedure */
400 result
= CallWindowProcA( dlgproc
, hwnd
, msg
, wParam
, lParam
);
401 /* 16 bit dlg procs only return BOOL16 */
402 if( WINPROC_GetProcType( dlgproc
) == WIN_PROC_16
)
403 result
= LOWORD(result
);
406 if (!result
&& IsWindow(hwnd
))
408 /* callback didn't process this message */
422 case WM_ENTERMENULOOP
:
424 case WM_NCLBUTTONDOWN
:
425 return DEFDLG_Proc( hwnd
, msg
, wParam
, lParam
, dlgInfo
);
433 return DefWindowProcA( hwnd
, msg
, wParam
, lParam
);
436 return DEFDLG_Epilog(hwnd
, msg
, result
);
440 /***********************************************************************
441 * DefDlgProcW (USER32.@)
443 LRESULT WINAPI
DefDlgProcW( HWND hwnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
449 /* Perform DIALOGINFO intialization if not done */
450 if(!(dlgInfo
= DIALOG_get_info( hwnd
, TRUE
))) return -1;
452 SetWindowLongW( hwnd
, DWL_MSGRESULT
, 0 );
454 if ((dlgproc
= DEFDLG_GetDlgProc( hwnd
)))
456 /* Call dialog procedure */
457 result
= CallWindowProcW( dlgproc
, hwnd
, msg
, wParam
, lParam
);
458 /* 16 bit dlg procs only return BOOL16 */
459 if( WINPROC_GetProcType( dlgproc
) == WIN_PROC_16
)
460 result
= LOWORD(result
);
463 if (!result
&& IsWindow(hwnd
))
465 /* callback didn't process this message */
479 case WM_ENTERMENULOOP
:
481 case WM_NCLBUTTONDOWN
:
482 return DEFDLG_Proc( hwnd
, msg
, wParam
, lParam
, dlgInfo
);
490 return DefWindowProcW( hwnd
, msg
, wParam
, lParam
);
493 return DEFDLG_Epilog(hwnd
, msg
, result
);