]> git.saurik.com Git - wxWidgets.git/blob - src/mac/dialog.cpp
added Mark Newsam's patch
[wxWidgets.git] / src / mac / dialog.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: dialog.cpp
3 // Purpose: wxDialog class
4 // Author: AUTHOR
5 // Modified by:
6 // Created: ??/??/98
7 // RCS-ID: $Id$
8 // Copyright: (c) AUTHOR
9 // Licence: wxWindows licence
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "dialog.h"
14 #endif
15
16 #include "wx/dialog.h"
17 #include "wx/utils.h"
18 #include "wx/frame.h"
19 #include "wx/app.h"
20 #include "wx/settings.h"
21
22 #include "wx/mac/uma.h"
23
24 // Lists to keep track of windows, so we can disable/enable them
25 // for modal dialogs
26 wxList wxModalDialogs;
27 //wxList wxModelessWindows; // Frames and modeless dialogs
28 extern wxList wxPendingDelete;
29
30 #if !USE_SHARED_LIBRARY
31 IMPLEMENT_DYNAMIC_CLASS(wxDialog, wxTopLevelWindow)
32
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)
37
38 EVT_CHAR_HOOK(wxDialog::OnCharHook)
39
40 EVT_SYS_COLOUR_CHANGED(wxDialog::OnSysColourChanged)
41
42 EVT_CLOSE(wxDialog::OnCloseWindow)
43 END_EVENT_TABLE()
44
45 #endif
46
47 wxDialog::wxDialog()
48 {
49 m_isShown = FALSE;
50 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
51 }
52
53 bool wxDialog::Create(wxWindow *parent, wxWindowID id,
54 const wxString& title,
55 const wxPoint& pos,
56 const wxSize& size,
57 long style,
58 const wxString& name)
59 {
60
61 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
62
63
64 if ( !wxTopLevelWindow::Create(parent, id, title, pos, size, style, name) )
65 return FALSE;
66
67 MacCreateRealWindow( title , pos , size , MacRemoveBordersFromStyle(style) , name ) ;
68
69 m_macWindowBackgroundTheme = kThemeBrushDialogBackgroundActive ;
70 SetThemeWindowBackground( (WindowRef) m_macWindow , m_macWindowBackgroundTheme , false ) ;
71 return TRUE;
72 }
73
74 void wxDialog::SetModal(bool flag)
75 {
76 if ( flag )
77 {
78 m_windowStyle |= wxDIALOG_MODAL;
79
80 wxModelessWindows.DeleteObject(this);
81 }
82 else
83 {
84 m_windowStyle &= ~wxDIALOG_MODAL;
85
86 wxModelessWindows.Append(this);
87 }
88 }
89
90 wxDialog::~wxDialog()
91 {
92 m_isBeingDeleted = TRUE ;
93 Show(FALSE);
94 }
95
96 // By default, pressing escape cancels the dialog , on mac command-stop does the same thing
97 void wxDialog::OnCharHook(wxKeyEvent& event)
98 {
99 if (
100 ( event.m_keyCode == WXK_ESCAPE ||
101 ( event.m_keyCode == '.' && event.MetaDown() ) )
102 && FindWindow(wxID_CANCEL) )
103 {
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);
109
110 return;
111 }
112 // We didn't process this event.
113 event.Skip();
114 }
115
116 bool wxDialog::IsModal() const
117 {
118 return (GetWindowStyleFlag() & wxDIALOG_MODAL) != 0;
119 }
120
121
122 bool wxDialog::IsModalShowing() const
123 {
124 return wxModalDialogs.Find((wxDialog *)this) != NULL; // const_cast
125 }
126
127 extern bool s_macIsInModalLoop ;
128
129 bool wxDialog::Show(bool show)
130 {
131 if ( !wxDialogBase::Show(show) )
132 {
133 // nothing to do
134 return FALSE;
135 }
136
137 if ( show )
138 {
139 // usually will result in TransferDataToWindow() being called
140 InitDialog();
141 }
142
143 if ( IsModal() )
144 {
145 if ( show )
146 {
147 DoShowModal();
148 }
149 else // end of modal dialog
150 {
151 // this will cause IsModalShowing() return FALSE and our local
152 // message loop will terminate
153 wxModalDialogs.DeleteObject(this);
154 }
155 }
156
157 return TRUE;
158 }
159
160 void wxDialog::DoShowModal()
161 {
162 wxCHECK_RET( !IsModalShowing(), _T("DoShowModal() called twice") );
163
164 wxModalDialogs.Append(this);
165
166 wxWindow *parent = GetParent();
167
168 // remember where the focus was
169 wxWindow *winFocus = FindFocus();
170 if ( !winFocus )
171 {
172 winFocus = parent;
173 }
174 if ( !winFocus )
175 {
176 winFocus = wxTheApp->GetTopWindow();
177 }
178 // TODO : test whether parent gets disabled
179
180 bool formerModal = s_macIsInModalLoop ;
181 s_macIsInModalLoop = true ;
182
183 while ( IsModalShowing() )
184 {
185 while ( !wxTheApp->Pending() && wxTheApp->ProcessIdle() )
186 {
187 }
188 wxTheApp->MacDoOneEvent() ;
189 }
190
191 s_macIsInModalLoop = formerModal ;
192
193 // TODO probably reenable the parent window if any
194
195 // and restore focus
196 if ( winFocus )
197 {
198 winFocus->SetFocus();
199 }
200 }
201
202
203 // Replacement for Show(TRUE) for modal dialogs - returns return code
204 int wxDialog::ShowModal()
205 {
206 m_windowStyle |= wxDIALOG_MODAL;
207 Show(TRUE);
208 return GetReturnCode();
209 }
210
211 // NB: this function (surprizingly) may be called for both modal and modeless
212 // dialogs and should work for both of them
213 void wxDialog::EndModal(int retCode)
214 {
215 SetReturnCode(retCode);
216 Show(FALSE);
217 }
218
219 // Standard buttons
220 void wxDialog::OnOK(wxCommandEvent& WXUNUSED(event))
221 {
222 if ( Validate() && TransferDataFromWindow() )
223 {
224 EndModal(wxID_OK);
225 }
226 }
227
228 void wxDialog::OnApply(wxCommandEvent& WXUNUSED(event))
229 {
230 if (Validate())
231 TransferDataFromWindow();
232 // TODO probably need to disable the Apply button until things change again
233 }
234
235 void wxDialog::OnCancel(wxCommandEvent& WXUNUSED(event))
236 {
237 EndModal(wxID_CANCEL);
238 }
239
240 void wxDialog::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
241 {
242 // We'll send a Cancel message by default,
243 // which may close the dialog.
244 // Check for looping if the Cancel event handler calls Close().
245
246 // Note that if a cancel button and handler aren't present in the dialog,
247 // nothing will happen when you close the dialog via the window manager, or
248 // via Close().
249 // We wouldn't want to destroy the dialog by default, since the dialog may have been
250 // created on the stack.
251 // However, this does mean that calling dialog->Close() won't delete the dialog
252 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
253 // sure to destroy the dialog.
254 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
255
256 static wxList closing;
257
258 if ( closing.Member(this) )
259 return;
260
261 closing.Append(this);
262
263 wxCommandEvent cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_CANCEL);
264 cancelEvent.SetEventObject( this );
265 GetEventHandler()->ProcessEvent(cancelEvent); // This may close the dialog
266
267 closing.DeleteObject(this);
268 }
269
270 void wxDialog::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
271 {
272 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
273 Refresh();
274 }
275