1 /////////////////////////////////////////////////////////////////////////////
3 // Purpose: wxDialog class
4 // Author: Stefan Csomor
8 // Copyright: (c) Stefan Csomor
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
12 #include "wx/wxprec.h"
14 #include "wx/dialog.h"
18 #include "wx/settings.h"
20 #include "wx/mac/uma.h"
22 // Lists to keep track of windows, so we can disable/enable them
24 wxList wxModalDialogs
;
25 //wxList wxModelessWindows; // Frames and modeless dialogs
26 extern wxList wxPendingDelete
;
28 IMPLEMENT_DYNAMIC_CLASS(wxDialog
, wxTopLevelWindow
)
30 BEGIN_EVENT_TABLE(wxDialog
, wxDialogBase
)
31 EVT_BUTTON(wxID_OK
, wxDialog::OnOK
)
32 EVT_BUTTON(wxID_APPLY
, wxDialog::OnApply
)
33 EVT_BUTTON(wxID_CANCEL
, wxDialog::OnCancel
)
35 EVT_CHAR_HOOK(wxDialog::OnCharHook
)
37 EVT_SYS_COLOUR_CHANGED(wxDialog::OnSysColourChanged
)
39 EVT_CLOSE(wxDialog::OnCloseWindow
)
44 m_isModalStyle
= false;
47 bool wxDialog::Create(wxWindow
*parent
, wxWindowID id
,
48 const wxString
& title
,
54 SetExtraStyle(GetExtraStyle() | wxTOPLEVEL_EX_DIALOG
);
56 // All dialogs should really have this style
57 style
|= wxTAB_TRAVERSAL
;
59 if ( !wxTopLevelWindow::Create(parent
, id
, title
, pos
, size
, style
& ~(wxYES
|wxOK
|wxNO
/*|wxCANCEL*/) , name
) )
62 HIViewRef growBoxRef
= 0 ;
63 OSStatus err
= HIViewFindByID( HIViewGetRoot( (WindowRef
) m_macWindow
) , kHIViewWindowGrowBoxID
, &growBoxRef
);
64 if ( err
== noErr
&& growBoxRef
!= 0 )
65 HIGrowBoxViewSetTransparent( growBoxRef
, true ) ;
69 void wxDialog::SetModal(bool flag
)
73 m_isModalStyle
= true;
75 wxModelessWindows
.DeleteObject(this);
77 SetWindowModality( (WindowRef
) MacGetWindowRef() , kWindowModalityAppModal
, NULL
) ;
82 m_isModalStyle
= false;
84 wxModelessWindows
.Append(this);
90 m_isBeingDeleted
= true;
94 // By default, pressing escape cancels the dialog; on mac command-stop does the same thing
95 void wxDialog::OnCharHook(wxKeyEvent
& event
)
97 if (( event
.m_keyCode
== WXK_ESCAPE
||
98 ( event
.m_keyCode
== '.' && event
.MetaDown() ) )
99 && FindWindow(wxID_CANCEL
) )
101 // Behaviour changed in 2.0: we'll send a Cancel message
102 // to the dialog instead of Close.
103 wxCommandEvent
cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED
, wxID_CANCEL
);
104 cancelEvent
.SetEventObject( this );
105 GetEventHandler()->ProcessEvent(cancelEvent
);
109 // We didn't process this event.
113 bool wxDialog::IsModal() const
115 return wxModalDialogs
.Find((wxDialog
*)this) != NULL
; // const_cast
116 // return m_isModalStyle;
120 bool wxDialog::IsModalShowing() const
122 return wxModalDialogs
.Find((wxDialog
*)this) != NULL
; // const_cast
125 bool wxDialog::Show(bool show
)
127 if ( !wxDialogBase::Show(show
) )
135 // usually will result in TransferDataToWindow() being called
139 if ( m_isModalStyle
)
145 else // end of modal dialog
147 // this will cause IsModalShowing() return false and our local
148 // message loop will terminate
149 wxModalDialogs
.DeleteObject(this);
157 extern bool s_macIsInModalLoop
;
160 void wxDialog::DoShowModal()
162 wxCHECK_RET( !IsModalShowing(), _T("DoShowModal() called twice") );
164 wxModalDialogs
.Append(this);
169 BeginAppModalStateForWindow( (WindowRef
) MacGetWindowRef()) ;
171 // TODO : test whether parent gets disabled
172 bool formerModal
= s_macIsInModalLoop
;
173 s_macIsInModalLoop
= true ;
175 while ( IsModalShowing() )
177 wxTheApp
->MacDoOneEvent() ;
178 // calls process idle itself
182 EndAppModalStateForWindow( (WindowRef
) MacGetWindowRef() ) ;
184 // TODO probably reenable the parent window if any
185 s_macIsInModalLoop
= formerModal
;
190 // Replacement for Show(true) for modal dialogs - returns return code
191 int wxDialog::ShowModal()
193 if ( !m_isModalStyle
)
197 return GetReturnCode();
200 // NB: this function (surprizingly) may be called for both modal and modeless
201 // dialogs and should work for both of them
202 void wxDialog::EndModal(int retCode
)
204 SetReturnCode(retCode
);
210 void wxDialog::OnOK(wxCommandEvent
& WXUNUSED(event
))
212 if ( Validate() && TransferDataFromWindow() )
216 void wxDialog::OnApply(wxCommandEvent
& WXUNUSED(event
))
219 TransferDataFromWindow();
221 // TODO probably need to disable the Apply button until things change again
224 void wxDialog::OnCancel(wxCommandEvent
& WXUNUSED(event
))
226 EndModal(wxID_CANCEL
);
229 void wxDialog::OnCloseWindow(wxCloseEvent
& WXUNUSED(event
))
231 // We'll send a Cancel message by default,
232 // which may close the dialog.
233 // Check for looping if the Cancel event handler calls Close().
235 // Note that if a cancel button and handler aren't present in the dialog,
236 // nothing will happen when you close the dialog via the window manager, or
238 // We wouldn't want to destroy the dialog by default, since the dialog may have been
239 // created on the stack.
240 // However, this does mean that calling dialog->Close() won't delete the dialog
241 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
242 // sure to destroy the dialog.
243 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
245 static wxList closing
;
247 if ( closing
.Member(this) )
250 closing
.Append(this);
252 wxCommandEvent
cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED
, wxID_CANCEL
);
253 cancelEvent
.SetEventObject( this );
254 GetEventHandler()->ProcessEvent(cancelEvent
); // This may close the dialog
256 closing
.DeleteObject(this);
259 void wxDialog::OnSysColourChanged(wxSysColourChangedEvent
& WXUNUSED(event
))
261 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE
));