windows/defdlg.c

   1 /*
   2  * Default dialog procedure
   3  *
   4  * Copyright 1993, 1996 Alexandre Julliard
   5  *
   6  */
   7
   8 #include "windows.h"
   9 #include "dialog.h"
  10 #include "win.h"
  11 #include "winproc.h"
  12
  13
  14 /***********************************************************************
  15  *           DEFDLG_SetFocus
  16  *
  17  * Set the focus to a control of the dialog, selecting the text if
  18  * the control is an edit dialog.
  19  */
  20 static void DEFDLG_SetFocus( HWND hwndDlg, HWND hwndCtrl )
  21 {
  22     HWND32 hwndPrev = GetFocus32();
  23
  24     if (IsChild( hwndDlg, hwndPrev ))
  25     {
  26         if (SendMessage16( hwndPrev, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
  27             SendMessage16( hwndPrev, EM_SETSEL, TRUE, MAKELONG( -1, 0 ) );
  28     }
  29     if (SendMessage16( hwndCtrl, WM_GETDLGCODE, 0, 0 ) & DLGC_HASSETSEL)
  30         SendMessage16( hwndCtrl, EM_SETSEL, FALSE, MAKELONG( 0, -1 ) );
  31     SetFocus32( hwndCtrl );
  32 }
  33
  34
  35 /***********************************************************************
  36  *           DEFDLG_SaveFocus
  37  */
  38 static BOOL DEFDLG_SaveFocus( HWND hwnd, DIALOGINFO *infoPtr )
  39 {
  40     HWND32 hwndFocus = GetFocus32();
  41
  42     if (!hwndFocus || !IsChild( hwnd, hwndFocus )) return FALSE;
  43     infoPtr->hwndFocus = hwndFocus;
  44       /* Remove default button */
  45     return TRUE;
  46 }
  47
  48
  49 /***********************************************************************
  50  *           DEFDLG_RestoreFocus
  51  */
  52 static BOOL DEFDLG_RestoreFocus( HWND hwnd, DIALOGINFO *infoPtr )
  53 {
  54     if (!infoPtr->hwndFocus || IsIconic(hwnd)) return FALSE;
  55     if (!IsWindow( infoPtr->hwndFocus )) return FALSE;
  56     DEFDLG_SetFocus( hwnd, infoPtr->hwndFocus );
  57     infoPtr->hwndFocus = 0;
  58     return TRUE;
  59 }
  60
  61
  62 /***********************************************************************
  63  *           DEFDLG_FindDefButton
  64  *
  65  * Find the current default push-button.
  66  */
  67 static HWND DEFDLG_FindDefButton( HWND hwndDlg )
  68 {
  69     HWND hwndChild = GetWindow( hwndDlg, GW_CHILD );
  70     while (hwndChild)
  71     {
  72         if (SendMessage16( hwndChild, WM_GETDLGCODE, 0, 0 ) & DLGC_DEFPUSHBUTTON)
  73             break;
  74         hwndChild = GetWindow( hwndChild, GW_HWNDNEXT );
  75     }
  76     return hwndChild;
  77 }
  78
  79
  80 /***********************************************************************
  81  *           DEFDLG_SetDefButton
  82  *
  83  * Set the new default button to be hwndNew.
  84  */
  85 static BOOL DEFDLG_SetDefButton( HWND hwndDlg, DIALOGINFO *dlgInfo,
  86                                  HWND hwndNew )
  87 {
  88     if (hwndNew &&
  89         !(SendMessage16(hwndNew, WM_GETDLGCODE, 0, 0 ) & DLGC_UNDEFPUSHBUTTON))
  90         return FALSE;  /* Destination is not a push button */
  91
  92     if (dlgInfo->msgResult)  /* There's already a default pushbutton */
  93     {
  94         HWND hwndOld = GetDlgItem( hwndDlg, dlgInfo->msgResult );
  95         if (SendMessage32A( hwndOld, WM_GETDLGCODE, 0, 0) & DLGC_DEFPUSHBUTTON)
  96             SendMessage32A( hwndOld, BM_SETSTYLE32, BS_PUSHBUTTON, TRUE );
  97     }
  98     if (hwndNew)
  99     {
 100         SendMessage32A( hwndNew, BM_SETSTYLE32, BS_DEFPUSHBUTTON, TRUE );
 101         dlgInfo->msgResult = GetDlgCtrlID( hwndNew );
 102     }
 103     else dlgInfo->msgResult = 0;
 104     return TRUE;
 105 }
 106
 107
 108 /***********************************************************************
 109  *           DEFDLG_Proc
 110  *
 111  * Implementation of DefDlgProc(). Only handle messages that need special
 112  * handling for dialogs.
 113  */
 114 static LRESULT DEFDLG_Proc( HWND32 hwnd, UINT32 msg, WPARAM32 wParam,
 115                             LPARAM lParam, DIALOGINFO *dlgInfo )
 116 {
 117     HWND hwndDefId;
 118
 119     switch(msg)
 120     {
 121         case WM_INITDIALOG:
 122             return 0;
 123
 124         case WM_ERASEBKGND:
 125             FillWindow( hwnd, hwnd, (HDC16)wParam, (HBRUSH16)CTLCOLOR_DLG );
 126             return 1;
 127
 128         case WM_NCDESTROY:
 129
 130               /* Free dialog heap (if created) */
 131             if (dlgInfo->hDialogHeap)
 132             {
 133                 GlobalUnlock16(dlgInfo->hDialogHeap);
 134                 GlobalFree16(dlgInfo->hDialogHeap);
 135                 dlgInfo->hDialogHeap = 0;
 136             }
 137
 138               /* Delete font */
 139             if (dlgInfo->hUserFont)
 140             {
 141                 DeleteObject( dlgInfo->hUserFont );
 142                 dlgInfo->hUserFont = 0;
 143             }
 144
 145               /* Delete menu */
 146             if (dlgInfo->hMenu)
 147             {
 148                 DestroyMenu( dlgInfo->hMenu );
 149                 dlgInfo->hMenu = 0;
 150             }
 151
 152             /* Delete window procedure */
 153             WINPROC_FreeProc( dlgInfo->dlgProc );
 154             dlgInfo->dlgProc = (HWINDOWPROC)0;
 155
 156               /* Window clean-up */
 157             return DefWindowProc32A( hwnd, msg, wParam, lParam );
 158
 159         case WM_SHOWWINDOW:
 160             if (!wParam) DEFDLG_SaveFocus( hwnd, dlgInfo );
 161             return DefWindowProc32A( hwnd, msg, wParam, lParam );
 162
 163         case WM_ACTIVATE:
 164             if (wParam) DEFDLG_RestoreFocus( hwnd, dlgInfo );
 165             else DEFDLG_SaveFocus( hwnd, dlgInfo );
 166             return 0;
 167
 168         case WM_SETFOCUS:
 169             DEFDLG_RestoreFocus( hwnd, dlgInfo );
 170             return 0;
 171
 172         case DM_SETDEFID:
 173             if (dlgInfo->fEnd) return 1;
 174             DEFDLG_SetDefButton( hwnd, dlgInfo,
 175                                  wParam ? GetDlgItem( hwnd, wParam ) : 0 );
 176             return 1;
 177
 178         case DM_GETDEFID:
 179             if (dlgInfo->fEnd) return 0;
 180             if (dlgInfo->msgResult)
 181               return MAKELONG( dlgInfo->msgResult, DC_HASDEFID );
 182             hwndDefId = DEFDLG_FindDefButton( hwnd );
 183             if (hwndDefId)
 184               return MAKELONG( GetDlgCtrlID( hwndDefId ), DC_HASDEFID);
 185             return 0;
 186
 187         case WM_NEXTDLGCTL:
 188             {
 189                 HWND hwndDest = (HWND)wParam;
 190                 if (!lParam)
 191                     hwndDest = GetNextDlgTabItem32(hwnd, GetFocus32(), wParam);
 192                 if (hwndDest) DEFDLG_SetFocus( hwnd, hwndDest );
 193                 DEFDLG_SetDefButton( hwnd, dlgInfo, hwndDest );
 194             }
 195             return 0;
 196
 197         case WM_CLOSE:
 198             EndDialog( hwnd, TRUE );
 199             DestroyWindow( hwnd );
 200             return 0;
 201     }
 202     return 0;
 203 }
 204
 205
 206 /***********************************************************************
 207  *           DefDlgProc16   (USER.308)
 208  */
 209 LRESULT DefDlgProc16( HWND16 hwnd, UINT16 msg, WPARAM16 wParam, LPARAM lParam )
 210 {
 211     DIALOGINFO * dlgInfo;
 212     BOOL16 result = FALSE;
 213     WND * wndPtr = WIN_FindWndPtr( hwnd );
 214
 215     if (!wndPtr) return 0;
 216     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
 217
 218     dlgInfo->msgResult = 0;
 219     if (dlgInfo->dlgProc)
 220     {
 221           /* Call dialog procedure */
 222         result = (BOOL16)CallWindowProc16( (WNDPROC16)dlgInfo->dlgProc,
 223                                            hwnd, msg, wParam, lParam );
 224
 225         /* Check if window was destroyed by dialog procedure */
 226         if (result || !IsWindow( hwnd )) return result;
 227     }
 228
 229     switch(msg)
 230     {
 231         case WM_INITDIALOG:
 232         case WM_ERASEBKGND:
 233         case WM_NCDESTROY:
 234         case WM_SHOWWINDOW:
 235         case WM_ACTIVATE:
 236         case WM_SETFOCUS:
 237         case DM_SETDEFID:
 238         case DM_GETDEFID:
 239         case WM_NEXTDLGCTL:
 240         case WM_CLOSE:
 241             return DEFDLG_Proc( (HWND32)hwnd, msg, (WPARAM32)wParam,
 242                                 lParam, dlgInfo );
 243
 244         default:
 245             return DefWindowProc16( hwnd, msg, wParam, lParam );
 246     }
 247 }
 248
 249
 250 /***********************************************************************
 251  *           DefDlgProc32A   (USER32.119)
 252  */
 253 LRESULT DefDlgProc32A( HWND32 hwnd, UINT32 msg, WPARAM32 wParam, LPARAM lParam)
 254 {
 255     DIALOGINFO * dlgInfo;
 256     BOOL16 result = FALSE;
 257     WND * wndPtr = WIN_FindWndPtr( hwnd );
 258
 259     if (!wndPtr) return 0;
 260     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
 261
 262     dlgInfo->msgResult = 0;
 263     if (dlgInfo->dlgProc)
 264     {
 265           /* Call dialog procedure */
 266         result = (BOOL16)CallWindowProc32A( (WNDPROC32)dlgInfo->dlgProc,
 267                                             hwnd, msg, wParam, lParam );
 268
 269         /* Check if window was destroyed by dialog procedure */
 270         if (result || !IsWindow( hwnd )) return result;
 271     }
 272
 273     switch(msg)
 274     {
 275         case WM_INITDIALOG:
 276         case WM_ERASEBKGND:
 277         case WM_NCDESTROY:
 278         case WM_SHOWWINDOW:
 279         case WM_ACTIVATE:
 280         case WM_SETFOCUS:
 281         case DM_SETDEFID:
 282         case DM_GETDEFID:
 283         case WM_NEXTDLGCTL:
 284         case WM_CLOSE:
 285             return DEFDLG_Proc( hwnd, msg, wParam, lParam, dlgInfo );
 286
 287         default:
 288             return DefWindowProc32A( hwnd, msg, wParam, lParam );
 289     }
 290 }
 291
 292
 293 /***********************************************************************
 294  *           DefDlgProc32W   (USER32.120)
 295  */
 296 LRESULT DefDlgProc32W( HWND32 hwnd, UINT32 msg, WPARAM32 wParam, LPARAM lParam)
 297 {
 298     DIALOGINFO * dlgInfo;
 299     BOOL16 result = FALSE;
 300     WND * wndPtr = WIN_FindWndPtr( hwnd );
 301
 302     if (!wndPtr) return 0;
 303     dlgInfo = (DIALOGINFO *)&wndPtr->wExtra;
 304
 305     dlgInfo->msgResult = 0;
 306     if (dlgInfo->dlgProc)
 307     {
 308           /* Call dialog procedure */
 309         result = (BOOL16)CallWindowProc32W( (WNDPROC32)dlgInfo->dlgProc,
 310                                             hwnd, msg, wParam, lParam );
 311
 312         /* Check if window was destroyed by dialog procedure */
 313         if (result || !IsWindow( hwnd )) return result;
 314     }
 315
 316     switch(msg)
 317     {
 318         case WM_INITDIALOG:
 319         case WM_ERASEBKGND:
 320         case WM_NCDESTROY:
 321         case WM_SHOWWINDOW:
 322         case WM_ACTIVATE:
 323         case WM_SETFOCUS:
 324         case DM_SETDEFID:
 325         case DM_GETDEFID:
 326         case WM_NEXTDLGCTL:
 327         case WM_CLOSE:
 328             return DEFDLG_Proc( hwnd, msg, wParam, lParam, dlgInfo );
 329
 330         default:
 331             return DefWindowProc32W( hwnd, msg, wParam, lParam );
 332     }
 333 }