1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: wxDialog class
4 // Author: Stefan Csomor
8 // Copyright: (c) Stefan Csomor
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
13 #pragma implementation "dialog.h"
16 #include "wx/dialog.h"
20 #include "wx/settings.h"
22 #include "wx/mac/uma.h"
24 // Lists to keep track of windows, so we can disable/enable them
26 wxList wxModalDialogs
;
27 //wxList wxModelessWindows; // Frames and modeless dialogs
28 extern wxList wxPendingDelete
;
30 #if !USE_SHARED_LIBRARY
31 IMPLEMENT_DYNAMIC_CLASS(wxDialog
, wxTopLevelWindow
)
33 BEGIN_EVENT_TABLE(wxDialog
, wxDialogBase
)
34 EVT_BUTTON(wxID_OK
, wxDialog::OnOK
)
35 EVT_BUTTON(wxID_APPLY
, wxDialog::OnApply
)
36 EVT_BUTTON(wxID_CANCEL
, wxDialog::OnCancel
)
38 EVT_CHAR_HOOK(wxDialog::OnCharHook
)
40 EVT_SYS_COLOUR_CHANGED(wxDialog::OnSysColourChanged
)
42 EVT_CLOSE(wxDialog::OnCloseWindow
)
50 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE
));
53 bool wxDialog::Create(wxWindow
*parent
, wxWindowID id
,
54 const wxString
& title
,
61 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE
));
64 if ( !wxTopLevelWindow::Create(parent
, id
, title
, pos
, size
, style
, name
) )
67 MacCreateRealWindow( title
, pos
, size
, MacRemoveBordersFromStyle(style
) , name
) ;
69 m_macWindowBackgroundTheme
= kThemeBrushDialogBackgroundActive
;
70 SetThemeWindowBackground( (WindowRef
) m_macWindow
, m_macWindowBackgroundTheme
, false ) ;
74 void wxDialog::SetModal(bool flag
)
78 m_windowStyle
|= wxDIALOG_MODAL
;
80 wxModelessWindows
.DeleteObject(this);
84 m_windowStyle
&= ~wxDIALOG_MODAL
;
86 wxModelessWindows
.Append(this);
92 m_isBeingDeleted
= TRUE
;
96 // By default, pressing escape cancels the dialog , on mac command-stop does the same thing
97 void wxDialog::OnCharHook(wxKeyEvent
& event
)
100 ( event
.m_keyCode
== WXK_ESCAPE
||
101 ( event
.m_keyCode
== '.' && event
.MetaDown() ) )
102 && FindWindow(wxID_CANCEL
) )
104 // Behaviour changed in 2.0: we'll send a Cancel message
105 // to the dialog instead of Close.
106 wxCommandEvent
cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED
, wxID_CANCEL
);
107 cancelEvent
.SetEventObject( this );
108 GetEventHandler()->ProcessEvent(cancelEvent
);
112 // We didn't process this event.
116 bool wxDialog::IsModal() const
118 return (GetWindowStyleFlag() & wxDIALOG_MODAL
) != 0;
122 bool wxDialog::IsModalShowing() const
124 return wxModalDialogs
.Find((wxDialog
*)this) != NULL
; // const_cast
127 bool wxDialog::Show(bool show
)
129 if ( !wxDialogBase::Show(show
) )
137 // usually will result in TransferDataToWindow() being called
147 else // end of modal dialog
149 // this will cause IsModalShowing() return FALSE and our local
150 // message loop will terminate
151 wxModalDialogs
.DeleteObject(this);
159 extern bool s_macIsInModalLoop
;
162 void wxDialog::DoShowModal()
164 wxCHECK_RET( !IsModalShowing(), _T("DoShowModal() called twice") );
166 wxModalDialogs
.Append(this);
168 wxWindow
*parent
= GetParent();
170 // remember where the focus was
171 wxWindow
*winFocus
= FindFocus();
178 winFocus
= wxTheApp
->GetTopWindow();
181 BeginAppModalStateForWindow( (WindowRef
) MacGetWindowRef()) ;
183 // TODO : test whether parent gets disabled
184 bool formerModal
= s_macIsInModalLoop
;
185 s_macIsInModalLoop
= true ;
187 while ( IsModalShowing() )
189 wxTheApp
->MacDoOneEvent() ;
190 // calls process idle itself
194 EndAppModalStateForWindow( (WindowRef
) MacGetWindowRef() ) ;
196 // TODO probably reenable the parent window if any
197 s_macIsInModalLoop
= formerModal
;
204 winFocus
->SetFocus();
209 // Replacement for Show(TRUE) for modal dialogs - returns return code
210 int wxDialog::ShowModal()
218 return GetReturnCode();
221 // NB: this function (surprizingly) may be called for both modal and modeless
222 // dialogs and should work for both of them
223 void wxDialog::EndModal(int retCode
)
225 SetReturnCode(retCode
);
230 void wxDialog::OnOK(wxCommandEvent
& WXUNUSED(event
))
232 if ( Validate() && TransferDataFromWindow() )
238 void wxDialog::OnApply(wxCommandEvent
& WXUNUSED(event
))
241 TransferDataFromWindow();
242 // TODO probably need to disable the Apply button until things change again
245 void wxDialog::OnCancel(wxCommandEvent
& WXUNUSED(event
))
247 EndModal(wxID_CANCEL
);
250 void wxDialog::OnCloseWindow(wxCloseEvent
& WXUNUSED(event
))
252 // We'll send a Cancel message by default,
253 // which may close the dialog.
254 // Check for looping if the Cancel event handler calls Close().
256 // Note that if a cancel button and handler aren't present in the dialog,
257 // nothing will happen when you close the dialog via the window manager, or
259 // We wouldn't want to destroy the dialog by default, since the dialog may have been
260 // created on the stack.
261 // However, this does mean that calling dialog->Close() won't delete the dialog
262 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
263 // sure to destroy the dialog.
264 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
266 static wxList closing
;
268 if ( closing
.Member(this) )
271 closing
.Append(this);
273 wxCommandEvent
cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED
, wxID_CANCEL
);
274 cancelEvent
.SetEventObject( this );
275 GetEventHandler()->ProcessEvent(cancelEvent
); // This may close the dialog
277 closing
.DeleteObject(this);
280 void wxDialog::OnSysColourChanged(wxSysColourChangedEvent
& WXUNUSED(event
))
282 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE
));