src/os2/dialog.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/os2/dialog.cpp
   3 // Purpose:     wxDialog class
   4 // Author:      David Webster
   5 // Modified by:
   6 // Created:     10/14/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) David Webster
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #include "wx/dialog.h"
  16
  17 #ifndef WX_PRECOMP
  18     #include "wx/utils.h"
  19     #include "wx/frame.h"
  20     #include "wx/app.h"
  21     #include "wx/settings.h"
  22     #include "wx/intl.h"
  23     #include "wx/log.h"
  24 #endif
  25
  26 #include "wx/os2/private.h"
  27 #include "wx/evtloop.h"
  28 #include "wx/ptr_scpd.h"
  29
  30 #define wxDIALOG_DEFAULT_X 300
  31 #define wxDIALOG_DEFAULT_Y 300
  32
  33 #define wxDIALOG_DEFAULT_WIDTH 500
  34 #define wxDIALOG_DEFAULT_HEIGHT 500
  35
  36 IMPLEMENT_DYNAMIC_CLASS(wxDialog, wxTopLevelWindow)
  37
  38 BEGIN_EVENT_TABLE(wxDialog, wxDialogBase)
  39     EVT_BUTTON(wxID_OK, wxDialog::OnOK)
  40     EVT_BUTTON(wxID_APPLY, wxDialog::OnApply)
  41     EVT_BUTTON(wxID_CANCEL, wxDialog::OnCancel)
  42     EVT_SYS_COLOUR_CHANGED(wxDialog::OnSysColourChanged)
  43
  44     EVT_CLOSE(wxDialog::OnCloseWindow)
  45 END_EVENT_TABLE()
  46
  47 // ----------------------------------------------------------------------------
  48 // wxDialogModalData
  49 // ----------------------------------------------------------------------------
  50
  51 // this is simply a container for any data we need to implement modality which
  52 // allows us to avoid changing wxDialog each time the implementation changes
  53 class wxDialogModalData
  54 {
  55 public:
  56     wxDialogModalData(wxDialog *dialog) : m_evtLoop(dialog) { }
  57
  58     void RunLoop()
  59     {
  60         m_evtLoop.Run();
  61     }
  62
  63     void ExitLoop()
  64     {
  65         m_evtLoop.Exit();
  66     }
  67
  68 private:
  69     wxModalEventLoop m_evtLoop;
  70 };
  71
  72 wxDEFINE_TIED_SCOPED_PTR_TYPE(wxDialogModalData);
  73
  74 // ============================================================================
  75 // implementation
  76 // ============================================================================
  77
  78 // ----------------------------------------------------------------------------
  79 // wxDialog construction
  80 // ----------------------------------------------------------------------------
  81
  82 void wxDialog::Init()
  83 {
  84     m_pOldFocus = (wxWindow *)NULL;
  85     m_isShown = false;
  86     m_pWindowDisabler = (wxWindowDisabler *)NULL;
  87     m_modalData = NULL;
  88     SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
  89 } // end of wxDialog::Init
  90
  91 bool wxDialog::Create( wxWindow*       pParent,
  92                        wxWindowID      vId,
  93                        const wxString& rsTitle,
  94                        const wxPoint&  rPos,
  95                        const wxSize&   rSize,
  96                        long            lStyle,
  97                        const wxString& rsName )
  98 {
  99     Init();
 100     SetExtraStyle(GetExtraStyle() | wxTOPLEVEL_EX_DIALOG);
 101
 102     //
 103     // Save focus before doing anything which can potentially change it
 104     //
 105     m_pOldFocus = FindFocus();
 106
 107     //
 108     // All dialogs should really have this style
 109     //
 110     lStyle |= wxTAB_TRAVERSAL;
 111
 112     if (!wxTopLevelWindow::Create( pParent
 113                                   ,vId
 114                                   ,rsTitle
 115                                   ,rPos
 116                                   ,rSize
 117                                   ,lStyle
 118                                   ,rsName
 119                                  ))
 120         return false;
 121
 122     SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
 123
 124     //
 125     // Must defer setting the title until after dialog is created and sized
 126     //
 127     if (!rsTitle.IsNull())
 128         SetTitle(rsTitle);
 129     return true;
 130 } // end of wxDialog::Create
 131
 132 #if WXWIN_COMPATIBILITY_2_6
 133
 134 // deprecated ctor
 135 wxDialog::wxDialog(wxWindow *parent,
 136                    const wxString& title,
 137                    bool WXUNUSED(modal),
 138                    int x,
 139                    int y,
 140                    int w,
 141                    int h,
 142                    long style,
 143                    const wxString& name)
 144 {
 145     Init();
 146
 147     Create(parent, wxID_ANY, title, wxPoint(x, y), wxSize(w, h), style, name);
 148 }
 149
 150 void wxDialog::SetModal(bool WXUNUSED(bFlag))
 151 {
 152     // nothing to do, obsolete method
 153 } // end of wxDialog::SetModal
 154
 155 #endif // WXWIN_COMPATIBILITY_2_6
 156
 157 wxDialog::~wxDialog()
 158 {
 159     m_isBeingDeleted = true;
 160
 161     // this will also reenable all the other windows for a modal dialog
 162     Show(false);
 163 } // end of wxDialog::~wxDialog
 164
 165 // ----------------------------------------------------------------------------
 166 // showing the dialogs
 167 // ----------------------------------------------------------------------------
 168
 169 #if WXWIN_COMPATIBILITY_2_6
 170
 171 bool wxDialog::IsModalShowing() const
 172 {
 173     return IsModal();
 174 } // end of wxDialog::IsModalShowing
 175
 176 #endif // WXWIN_COMPATIBILITY_2_6
 177
 178 wxWindow *wxDialog::FindSuitableParent() const
 179 {
 180     // first try to use the currently active window
 181     HWND hwndFg = ::WinQueryActiveWindow(HWND_DESKTOP);
 182     wxWindow *parent = hwndFg ? wxFindWinFromHandle((WXHWND)hwndFg)
 183                               : NULL;
 184     if ( !parent )
 185     {
 186         // next try the main app window
 187         parent = wxTheApp->GetTopWindow();
 188     }
 189
 190     // finally, check if the parent we found is really suitable
 191     if ( !parent || parent == (wxWindow *)this || !parent->IsShown() )
 192     {
 193         // don't use this one
 194         parent = NULL;
 195     }
 196
 197     return parent;
 198 }
 199
 200 bool wxDialog::Show( bool bShow )
 201 {
 202     if ( bShow == IsShown() )
 203         return false;
 204
 205     if (!bShow && m_modalData )
 206     {
 207         // we need to do this before calling wxDialogBase version because if we
 208         // had disabled other app windows, they must be reenabled right now as
 209         // if they stay disabled Windows will activate another window (one
 210         // which is enabled, anyhow) when we're hidden in the base class Show()
 211         // and we will lose activation
 212         m_modalData->ExitLoop();
 213 #if 0
 214         if (m_pWindowDisabler)
 215         {
 216             delete m_pWindowDisabler;
 217             m_pWindowDisabler = NULL;
 218         }
 219 #endif
 220     }
 221
 222     if (bShow)
 223     {
 224         // this usually will result in TransferDataToWindow() being called
 225         // which will change the controls values so do it before showing as
 226         // otherwise we could have some flicker
 227         InitDialog();
 228     }
 229
 230     wxDialogBase::Show(bShow);
 231
 232     wxString title = GetTitle();
 233     if (!title.empty())
 234         ::WinSetWindowText((HWND)GetHwnd(), (PSZ)title.c_str());
 235
 236     if ( bShow )
 237     {
 238         // dialogs don't get WM_SIZE message after creation unlike most (all?)
 239         // other windows and so could start their life not laid out correctly
 240         // if we didn't call Layout() from here
 241         //
 242         // NB: normally we should call it just the first time but doing it
 243         //     every time is simpler than keeping a flag
 244         Layout();
 245     }
 246
 247     return true;
 248 } // end of wxDialog::Show
 249
 250 //
 251 // Replacement for Show(true) for modal dialogs - returns return code
 252 //
 253 int wxDialog::ShowModal()
 254 {
 255     wxASSERT_MSG( !IsModal(), _T("wxDialog::ShowModal() reentered?") );
 256
 257     m_endModalCalled = false;
 258
 259     Show();
 260
 261     // EndModal may have been called from InitDialog handler (called from
 262     // inside Show()), which would cause an infinite loop if we didn't take it
 263     // into account
 264     if ( !m_endModalCalled )
 265     {
 266         // modal dialog needs a parent window, so try to find one
 267         wxWindow *parent = GetParent();
 268         if ( !parent )
 269         {
 270             parent = FindSuitableParent();
 271         }
 272
 273         // remember where the focus was
 274         wxWindow *oldFocus = m_pOldFocus;
 275         if ( !oldFocus )
 276         {
 277             // VZ: do we really want to do this?
 278             oldFocus = parent;
 279         }
 280
 281         // We have to remember the HWND because we need to check
 282         // the HWND still exists (oldFocus can be garbage when the dialog
 283         // exits, if it has been destroyed)
 284         HWND hwndOldFocus = oldFocus ? GetHwndOf(oldFocus) : NULL;
 285
 286
 287         //
 288         // Before entering the modal loop, reset the "is in OnIdle()" flag (see
 289         // comment in app.cpp)
 290         //
 291         extern bool                     gbInOnIdle;
 292         bool                            bWasInOnIdle = gbInOnIdle;
 293
 294         gbInOnIdle = false;
 295
 296         // enter and run the modal loop
 297         {
 298             wxDialogModalDataTiedPtr modalData(&m_modalData,
 299                                                new wxDialogModalData(this));
 300             modalData->RunLoop();
 301         }
 302         gbInOnIdle = bWasInOnIdle;
 303
 304         // and restore focus
 305         // Note that this code MUST NOT access the dialog object's data
 306         // in case the object has been deleted (which will be the case
 307         // for a modal dialog that has been destroyed before calling EndModal).
 308         if ( oldFocus && (oldFocus != this) && ::WinIsWindow(vHabmain, hwndOldFocus))
 309         {
 310             // This is likely to prove that the object still exists
 311             if (wxFindWinFromHandle((WXHWND) hwndOldFocus) == oldFocus)
 312                 oldFocus->SetFocus();
 313         }
 314     }
 315
 316     return GetReturnCode();
 317 } // end of wxDialog::ShowModal
 318
 319 void wxDialog::EndModal(
 320   int                               nRetCode
 321 )
 322 {
 323     wxASSERT_MSG( IsModal(), _T("EndModal() called for non modal dialog") );
 324
 325     m_endModalCalled = true;
 326     SetReturnCode(nRetCode);
 327
 328     Hide();
 329 } // end of wxDialog::EndModal
 330
 331 MRESULT wxDialog::OS2WindowProc( WXUINT uMessage, WXWPARAM wParam, WXLPARAM lParam )
 332 {
 333     MRESULT  rc = 0;
 334     bool     bProcessed = false;
 335
 336     switch (uMessage)
 337     {
 338         case WM_CLOSE:
 339             //
 340             // If we can't close, tell the system that we processed the
 341             // message - otherwise it would close us
 342             //
 343             bProcessed = !Close();
 344             break;
 345     }
 346
 347     if (!bProcessed)
 348         rc = wxWindow::OS2WindowProc( uMessage
 349                                      ,wParam
 350                                      ,lParam
 351                                     );
 352     return rc;
 353 } // end of wxDialog::OS2WindowProc