Got dialog sizing to work, downsized fonts a bit (though it always returns
[wxWidgets.git] / src / univ / dialog.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/univ/dialog.cpp
3 // Author: Robert Roebling, Vaclav Slavik
4 // Id: $Id$
5 // Copyright: (c) 2001 SciTech Software, Inc. (www.scitechsoft.com)
6 // Licence: wxWindows licence
7 /////////////////////////////////////////////////////////////////////////////
8
9 // ============================================================================
10 // declarations
11 // ============================================================================
12
13 // ----------------------------------------------------------------------------
14 // headers
15 // ----------------------------------------------------------------------------
16
17 #ifdef __GNUG__
18 #pragma implementation "univdialog.h"
19 #endif
20
21 // For compilers that support precompilation, includes "wx.h".
22 #include "wx/wxprec.h"
23
24 #ifdef __BORLANDC__
25 #pragma hdrstop
26 #endif
27
28 #ifndef WX_PRECOMP
29 #include "wx/dialog.h"
30 #include "wx/utils.h"
31 #include "wx/app.h"
32 #endif
33
34 #include "wx/evtloop.h"
35
36 //-----------------------------------------------------------------------------
37 // wxDialog
38 //-----------------------------------------------------------------------------
39
40 BEGIN_EVENT_TABLE(wxDialog,wxDialogBase)
41 EVT_BUTTON (wxID_OK, wxDialog::OnOK)
42 EVT_BUTTON (wxID_CANCEL, wxDialog::OnCancel)
43 EVT_BUTTON (wxID_APPLY, wxDialog::OnApply)
44 EVT_CLOSE (wxDialog::OnCloseWindow)
45 END_EVENT_TABLE()
46
47 IMPLEMENT_DYNAMIC_CLASS(wxDialog,wxTopLevelWindow)
48
49 void wxDialog::Init()
50 {
51 m_returnCode = 0;
52 m_windowDisabler = NULL;
53 m_eventLoop = NULL;
54 m_isShowingModal = FALSE;
55 }
56
57 wxDialog::~wxDialog()
58 {
59 delete m_eventLoop;
60 }
61
62 bool wxDialog::Create(wxWindow *parent,
63 wxWindowID id, const wxString &title,
64 const wxPoint &pos, const wxSize &size,
65 long style, const wxString &name)
66 {
67 SetExtraStyle(GetExtraStyle() | wxTOPLEVEL_EX_DIALOG);
68
69 // all dialogs should have tab traversal enabled
70 style |= wxTAB_TRAVERSAL;
71
72 return wxTopLevelWindow::Create(parent, id, title, pos, size, style, name);
73 }
74
75 void wxDialog::OnApply(wxCommandEvent &WXUNUSED(event))
76 {
77 if ( Validate() )
78 TransferDataFromWindow();
79 }
80
81 void wxDialog::OnCancel(wxCommandEvent &WXUNUSED(event))
82 {
83 if ( IsModal() )
84 {
85 EndModal(wxID_CANCEL);
86 }
87 else
88 {
89 SetReturnCode(wxID_CANCEL);
90 Show(FALSE);
91 }
92 }
93
94 void wxDialog::OnOK(wxCommandEvent &WXUNUSED(event))
95 {
96 if ( Validate() && TransferDataFromWindow() )
97 {
98 if ( IsModal() )
99 {
100 EndModal(wxID_OK);
101 }
102 else
103 {
104 SetReturnCode(wxID_OK);
105 Show(FALSE);
106 }
107 }
108 }
109
110 void wxDialog::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
111 {
112 // We'll send a Cancel message by default,
113 // which may close the dialog.
114 // Check for looping if the Cancel event handler calls Close().
115
116 // Note that if a cancel button and handler aren't present in the dialog,
117 // nothing will happen when you close the dialog via the window manager, or
118 // via Close().
119 // We wouldn't want to destroy the dialog by default, since the dialog may have been
120 // created on the stack.
121 // However, this does mean that calling dialog->Close() won't delete the dialog
122 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
123 // sure to destroy the dialog.
124 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
125
126 static wxList s_closing;
127
128 if (s_closing.Member(this))
129 return; // no loops
130
131 s_closing.Append(this);
132
133 wxCommandEvent cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_CANCEL);
134 cancelEvent.SetEventObject(this);
135 GetEventHandler()->ProcessEvent(cancelEvent);
136 s_closing.DeleteObject(this);
137 }
138
139 bool wxDialog::Show(bool show)
140 {
141 if ( !show )
142 {
143 // if we had disabled other app windows, reenable them back now because
144 // if they stay disabled Windows will activate another window (one
145 // which is enabled, anyhow) and we will lose activation
146 if ( m_windowDisabler )
147 {
148 delete m_windowDisabler;
149 m_windowDisabler = NULL;
150 }
151
152 if ( IsModal() )
153 EndModal(wxID_CANCEL);
154 }
155
156 // Not sure how to put this in platform-specific
157 // code just yet. Nano-X has to force a size event,
158 // else there's no initial size.
159 #if wxUSE_NANOX
160 if (show)
161 {
162 wxSizeEvent event(GetSize(), GetId());
163 event.SetEventObject(this);
164 GetEventHandler()->ProcessEvent(event);
165 }
166 #endif
167
168 bool ret = wxDialogBase::Show(show);
169
170 if ( show )
171 InitDialog();
172
173 return ret;
174 }
175
176 bool wxDialog::IsModal() const
177 {
178 return m_isShowingModal;
179 }
180
181 void wxDialog::SetModal(bool WXUNUSED(flag))
182 {
183 wxFAIL_MSG( wxT("wxDialog:SetModal obsolete now") );
184 }
185
186 int wxDialog::ShowModal()
187 {
188 if ( IsModal() )
189 {
190 wxFAIL_MSG( wxT("wxDialog:ShowModal called twice") );
191 return GetReturnCode();
192 }
193
194 // use the apps top level window as parent if none given unless explicitly
195 // forbidden
196 if ( !GetParent() && !(GetWindowStyleFlag() & wxDIALOG_NO_PARENT) )
197 {
198 wxWindow *parent = wxTheApp->GetTopWindow();
199 if ( parent && parent != this )
200 {
201 m_parent = parent;
202 }
203 }
204
205 Show(TRUE);
206
207 m_isShowingModal = TRUE;
208
209 wxASSERT_MSG( !m_windowDisabler, _T("disabling windows twice?") );
210
211 #if defined(__WXGTK__) || defined(__WXMGL__)
212 wxBusyCursorSuspender suspender;
213 // FIXME (FIXME_MGL) - make sure busy cursor disappears under MSW too
214 #endif
215
216 m_windowDisabler = new wxWindowDisabler(this);
217 if ( !m_eventLoop )
218 m_eventLoop = new wxEventLoop;
219
220 m_eventLoop->Run();
221
222 return GetReturnCode();
223 }
224
225 void wxDialog::EndModal(int retCode)
226 {
227 wxASSERT_MSG( m_eventLoop, _T("wxDialog is not modal") );
228
229 SetReturnCode(retCode);
230
231 if ( !IsModal() )
232 {
233 wxFAIL_MSG( wxT("wxDialog:EndModal called twice") );
234 return;
235 }
236
237 m_isShowingModal = FALSE;
238
239 m_eventLoop->Exit();
240
241 Show(FALSE);
242 }