]> git.saurik.com Git - wxWidgets.git/blame - src/msw/dialog.cpp
added possibility to throw different objects and crash directly from the main frame...
[wxWidgets.git] / src / msw / dialog.cpp
CommitLineData
2bda0e17 1/////////////////////////////////////////////////////////////////////////////
b6c588e1 2// Name: src/msw/dialog.cpp
2bda0e17
KB
3// Purpose: wxDialog class
4// Author: Julian Smart
5// Modified by:
6// Created: 01/02/97
7// RCS-ID: $Id$
6c9a19aa 8// Copyright: (c) Julian Smart
65571936 9// Licence: wxWindows licence
2bda0e17
KB
10/////////////////////////////////////////////////////////////////////////////
11
b6c588e1
VZ
12// ============================================================================
13// declarations
14// ============================================================================
15
16// ----------------------------------------------------------------------------
17// headers
18// ----------------------------------------------------------------------------
19
14f355c2 20#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
b6c588e1 21 #pragma implementation "dialog.h"
2bda0e17
KB
22#endif
23
24// For compilers that support precompilation, includes "wx.h".
25#include "wx/wxprec.h"
26
27#ifdef __BORLANDC__
b6c588e1 28 #pragma hdrstop
2bda0e17
KB
29#endif
30
31#ifndef WX_PRECOMP
b6c588e1
VZ
32 #include "wx/dialog.h"
33 #include "wx/utils.h"
34 #include "wx/frame.h"
35 #include "wx/app.h"
36 #include "wx/settings.h"
37 #include "wx/intl.h"
38 #include "wx/log.h"
2bda0e17
KB
39#endif
40
41#include "wx/msw/private.h"
dbda9e86 42#include "wx/log.h"
ac8d0c11 43#include "wx/evtloop.h"
8c7f5f03 44#include "wx/ptr_scpd.h"
2bda0e17 45
c67d6888 46#if wxUSE_COMMON_DIALOGS && !defined(__WXMICROWIN__)
b6c588e1 47 #include <commdlg.h>
2bda0e17
KB
48#endif
49
3180bc0e 50#if defined(__SMARTPHONE__) && defined(__WXWINCE__)
ef6d716b 51 #include "wx/msw/wince/resources.h"
3180bc0e 52#endif // __SMARTPHONE__ && __WXWINCE__
ef6d716b 53
b6c588e1
VZ
54// ----------------------------------------------------------------------------
55// wxWin macros
56// ----------------------------------------------------------------------------
57
ffca575c
SC
58#if wxUSE_EXTENDED_RTTI
59WX_DEFINE_FLAGS( wxDialogStyle )
60
3ff066a4 61wxBEGIN_FLAGS( wxDialogStyle )
ffca575c
SC
62 // new style border flags, we put them first to
63 // use them for streaming out
3ff066a4
SC
64 wxFLAGS_MEMBER(wxBORDER_SIMPLE)
65 wxFLAGS_MEMBER(wxBORDER_SUNKEN)
66 wxFLAGS_MEMBER(wxBORDER_DOUBLE)
67 wxFLAGS_MEMBER(wxBORDER_RAISED)
68 wxFLAGS_MEMBER(wxBORDER_STATIC)
69 wxFLAGS_MEMBER(wxBORDER_NONE)
044fe836 70
ffca575c 71 // old style border flags
3ff066a4
SC
72 wxFLAGS_MEMBER(wxSIMPLE_BORDER)
73 wxFLAGS_MEMBER(wxSUNKEN_BORDER)
74 wxFLAGS_MEMBER(wxDOUBLE_BORDER)
75 wxFLAGS_MEMBER(wxRAISED_BORDER)
76 wxFLAGS_MEMBER(wxSTATIC_BORDER)
77 wxFLAGS_MEMBER(wxNO_BORDER)
ffca575c
SC
78
79 // standard window styles
3ff066a4
SC
80 wxFLAGS_MEMBER(wxTAB_TRAVERSAL)
81 wxFLAGS_MEMBER(wxCLIP_CHILDREN)
ffca575c
SC
82
83 // dialog styles
3ff066a4
SC
84 wxFLAGS_MEMBER(wxWS_EX_VALIDATE_RECURSIVELY)
85 wxFLAGS_MEMBER(wxSTAY_ON_TOP)
86 wxFLAGS_MEMBER(wxCAPTION)
87 wxFLAGS_MEMBER(wxTHICK_FRAME)
88 wxFLAGS_MEMBER(wxSYSTEM_MENU)
89 wxFLAGS_MEMBER(wxRESIZE_BORDER)
90 wxFLAGS_MEMBER(wxRESIZE_BOX)
91 wxFLAGS_MEMBER(wxCLOSE_BOX)
92 wxFLAGS_MEMBER(wxMAXIMIZE_BOX)
93 wxFLAGS_MEMBER(wxMINIMIZE_BOX)
94wxEND_FLAGS( wxDialogStyle )
ffca575c
SC
95
96IMPLEMENT_DYNAMIC_CLASS_XTI(wxDialog, wxTopLevelWindow,"wx/dialog.h")
97
3ff066a4 98wxBEGIN_PROPERTIES_TABLE(wxDialog)
af498247
VZ
99 wxPROPERTY( Title, wxString, SetTitle, GetTitle, wxString() , 0 /*flags*/ , wxT("Helpstring") , wxT("group"))
100 wxPROPERTY_FLAGS( WindowStyle , wxDialogStyle , long , SetWindowStyleFlag , GetWindowStyleFlag , EMPTY_MACROVALUE , 0 /*flags*/ , wxT("Helpstring") , wxT("group")) // style
3ff066a4 101wxEND_PROPERTIES_TABLE()
ffca575c 102
3ff066a4
SC
103wxBEGIN_HANDLERS_TABLE(wxDialog)
104wxEND_HANDLERS_TABLE()
ffca575c 105
044fe836 106wxCONSTRUCTOR_6( wxDialog , wxWindow* , Parent , wxWindowID , Id , wxString , Title , wxPoint , Position , wxSize , Size , long , WindowStyle)
ffca575c
SC
107
108#else
82c9f85c 109IMPLEMENT_DYNAMIC_CLASS(wxDialog, wxTopLevelWindow)
ffca575c 110#endif
066f1b7a 111
138e1502 112BEGIN_EVENT_TABLE(wxDialog, wxDialogBase)
1b6452df
VZ
113 EVT_BUTTON(wxID_OK, wxDialog::OnOK)
114 EVT_BUTTON(wxID_APPLY, wxDialog::OnApply)
115 EVT_BUTTON(wxID_CANCEL, wxDialog::OnCancel)
b6c588e1 116
1b6452df 117 EVT_SYS_COLOUR_CHANGED(wxDialog::OnSysColourChanged)
b6c588e1 118
1b6452df
VZ
119 EVT_CLOSE(wxDialog::OnCloseWindow)
120END_EVENT_TABLE()
2bda0e17 121
6757b5e3
VZ
122// ----------------------------------------------------------------------------
123// wxDialogModalData
124// ----------------------------------------------------------------------------
125
8c7f5f03
VZ
126// this is simply a container for any data we need to implement modality which
127// allows us to avoid changing wxDialog each time the implementation changes
6757b5e3
VZ
128class wxDialogModalData
129{
130public:
8c7f5f03 131 wxDialogModalData(wxDialog *dialog) : m_evtLoop(dialog) { }
6757b5e3 132
8c7f5f03 133 void RunLoop()
6757b5e3 134 {
6757b5e3
VZ
135 m_evtLoop.Run();
136 }
137
138 void ExitLoop()
139 {
6757b5e3
VZ
140 m_evtLoop.Exit();
141 }
142
6757b5e3 143private:
8c7f5f03 144 wxModalEventLoop m_evtLoop;
6757b5e3
VZ
145};
146
8c7f5f03
VZ
147wxDEFINE_TIED_SCOPED_PTR_TYPE(wxDialogModalData);
148
b6c588e1
VZ
149// ============================================================================
150// implementation
151// ============================================================================
152
153// ----------------------------------------------------------------------------
154// wxDialog construction
155// ----------------------------------------------------------------------------
156
b0a6bb75 157void wxDialog::Init()
2bda0e17 158{
52a07708 159 m_oldFocus = (wxWindow *)NULL;
044fe836 160 m_isShown = false;
6757b5e3 161 m_modalData = NULL;
044fe836 162 m_endModalCalled = false;
2bda0e17
KB
163}
164
b3daa5a3
VZ
165bool wxDialog::Create(wxWindow *parent,
166 wxWindowID id,
462e2437
VZ
167 const wxString& title,
168 const wxPoint& pos,
169 const wxSize& size,
170 long style,
171 const wxString& name)
2bda0e17 172{
82c9f85c 173 SetExtraStyle(GetExtraStyle() | wxTOPLEVEL_EX_DIALOG);
bd9d76cb 174
b225f659 175 // save focus before doing anything which can potentially change it
82c9f85c 176 m_oldFocus = FindFocus();
462e2437 177
706bb5f9 178 // All dialogs should really have this style
b225f659 179 style |= wxTAB_TRAVERSAL;
2bda0e17 180
b225f659 181 if ( !wxTopLevelWindow::Create(parent, id, title, pos, size, style, name) )
044fe836 182 return false;
00233716
VZ
183
184 if ( !m_hasFont )
6f951810 185 SetFont(wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT));
e1bdd507 186
3180bc0e 187#if defined(__SMARTPHONE__) && defined(__WXWINCE__)
ef6d716b
WS
188 SetLeftMenu(wxID_OK, _("OK"));
189#endif
190
044fe836 191 return true;
2bda0e17
KB
192}
193
f46f4c86
VZ
194// deprecated ctor
195wxDialog::wxDialog(wxWindow *parent,
196 const wxString& title,
197 bool WXUNUSED(modal),
198 int x,
199 int y,
200 int w,
201 int h,
202 long style,
203 const wxString& name)
2bda0e17 204{
f46f4c86
VZ
205 Init();
206
d71cc120 207 Create(parent, wxID_ANY, title, wxPoint(x, y), wxSize(w, h), style, name);
f46f4c86
VZ
208}
209
210void wxDialog::SetModal(bool WXUNUSED(flag))
211{
212 // nothing to do, obsolete method
2bda0e17
KB
213}
214
215wxDialog::~wxDialog()
216{
044fe836 217 m_isBeingDeleted = true;
2bda0e17 218
b0a6bb75 219 // this will also reenable all the other windows for a modal dialog
044fe836 220 Show(false);
2bda0e17
KB
221}
222
b6c588e1
VZ
223// ----------------------------------------------------------------------------
224// showing the dialogs
225// ----------------------------------------------------------------------------
22cf5fec 226
b6c588e1 227bool wxDialog::IsModalShowing() const
2bda0e17 228{
f46f4c86 229 return IsModal();
2bda0e17
KB
230}
231
a543e3ce
VZ
232wxWindow *wxDialog::FindSuitableParent() const
233{
234 // first try to use the currently active window
235 HWND hwndFg = ::GetForegroundWindow();
236 wxWindow *parent = hwndFg ? wxFindWinFromHandle((WXHWND)hwndFg)
237 : NULL;
238 if ( !parent )
239 {
240 // next try the main app window
241 parent = wxTheApp->GetTopWindow();
242 }
243
244 // finally, check if the parent we found is really suitable
245 if ( !parent || parent == (wxWindow *)this || !parent->IsShown() )
246 {
247 // don't use this one
248 parent = NULL;
249 }
250
251 return parent;
252}
253
b6c588e1 254bool wxDialog::Show(bool show)
2bda0e17 255{
044fe836
VZ
256 if ( show == IsShown() )
257 return false;
258
6757b5e3 259 if ( !show && m_modalData )
86ad564e 260 {
6757b5e3
VZ
261 // we need to do this before calling wxDialogBase version because if we
262 // had disabled other app windows, they must be reenabled right now as
b0a6bb75 263 // if they stay disabled Windows will activate another window (one
6757b5e3
VZ
264 // which is enabled, anyhow) when we're hidden in the base class Show()
265 // and we will lose activation
266 m_modalData->ExitLoop();
86ad564e
JS
267 }
268
044fe836 269 if ( show )
b6c588e1 270 {
044fe836
VZ
271 // this usually will result in TransferDataToWindow() being called
272 // which will change the controls values so do it before showing as
273 // otherwise we could have some flicker
274 InitDialog();
b6c588e1 275 }
2bda0e17 276
044fe836
VZ
277 wxDialogBase::Show(show);
278
b6c588e1
VZ
279 if ( show )
280 {
2b5f62a0
VZ
281 // dialogs don't get WM_SIZE message after creation unlike most (all?)
282 // other windows and so could start their life non laid out correctly
283 // if we didn't call Layout() from here
284 //
285 // NB: normally we should call it just the first time but doing it
286 // every time is simpler than keeping a flag
287 Layout();
b6c588e1 288 }
2bda0e17 289
044fe836 290 return true;
2bda0e17
KB
291}
292
313901f3
JS
293void wxDialog::Raise()
294{
295 ::SetForegroundWindow(GetHwnd());
296}
297
f46f4c86 298// show dialog modally
a23fd0e1 299int wxDialog::ShowModal()
2bda0e17 300{
f46f4c86
VZ
301 wxASSERT_MSG( !IsModal(), _T("wxDialog::ShowModal() reentered?") );
302
044fe836 303 m_endModalCalled = false;
f46f4c86
VZ
304
305 Show();
306
307 // EndModal may have been called from InitDialog handler (called from
308 // inside Show()), which would cause an infinite loop if we didn't take it
309 // into account
310 if ( !m_endModalCalled )
5e1febfa 311 {
f46f4c86
VZ
312 // modal dialog needs a parent window, so try to find one
313 wxWindow *parent = GetParent();
314 if ( !parent )
315 {
316 parent = FindSuitableParent();
317 }
5e1febfa 318
f46f4c86
VZ
319 // remember where the focus was
320 wxWindow *oldFocus = m_oldFocus;
321 if ( !oldFocus )
322 {
323 // VZ: do we really want to do this?
324 oldFocus = parent;
325 }
326
327 // We have to remember the HWND because we need to check
328 // the HWND still exists (oldFocus can be garbage when the dialog
329 // exits, if it has been destroyed)
330 HWND hwndOldFocus = oldFocus ? GetHwndOf(oldFocus) : NULL;
331
332
333 // enter and run the modal loop
334 {
335 wxDialogModalDataTiedPtr modalData(&m_modalData,
336 new wxDialogModalData(this));
337 modalData->RunLoop();
338 }
339
340
341 // and restore focus
342 // Note that this code MUST NOT access the dialog object's data
343 // in case the object has been deleted (which will be the case
344 // for a modal dialog that has been destroyed before calling EndModal).
345 if ( oldFocus && (oldFocus != this) && ::IsWindow(hwndOldFocus))
346 {
347 // This is likely to prove that the object still exists
348 if (wxFindWinFromHandle((WXHWND) hwndOldFocus) == oldFocus)
349 oldFocus->SetFocus();
350 }
351 }
5e1febfa 352
b6c588e1 353 return GetReturnCode();
2bda0e17
KB
354}
355
356void wxDialog::EndModal(int retCode)
357{
f46f4c86
VZ
358 wxASSERT_MSG( IsModal(), _T("EndModal() called for non modal dialog") );
359
044fe836 360 m_endModalCalled = true;
b6c588e1 361 SetReturnCode(retCode);
6a088435 362
12b58624
VZ
363 Hide();
364}
365
366void wxDialog::EndDialog(int rc)
367{
368 if ( IsModal() )
369 EndModal(rc);
370 else
371 Hide();
2bda0e17
KB
372}
373
b6c588e1
VZ
374// ----------------------------------------------------------------------------
375// wxWin event handlers
376// ----------------------------------------------------------------------------
2bda0e17
KB
377
378// Standard buttons
33ac7e6f 379void wxDialog::OnOK(wxCommandEvent& WXUNUSED(event))
2bda0e17 380{
dc1c4b62
VZ
381 if ( Validate() && TransferDataFromWindow() )
382 {
12b58624 383 EndDialog(wxID_OK);
dc1c4b62 384 }
2bda0e17
KB
385}
386
33ac7e6f 387void wxDialog::OnApply(wxCommandEvent& WXUNUSED(event))
2bda0e17 388{
b6c588e1
VZ
389 if ( Validate() )
390 TransferDataFromWindow();
391
392 // TODO probably need to disable the Apply button until things change again
2bda0e17
KB
393}
394
33ac7e6f 395void wxDialog::OnCancel(wxCommandEvent& WXUNUSED(event))
2bda0e17 396{
12b58624 397 EndDialog(wxID_CANCEL);
2bda0e17
KB
398}
399
33ac7e6f 400void wxDialog::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
2bda0e17 401{
b6c588e1 402 // We'll send a Cancel message by default, which may close the dialog.
e3065973
JS
403 // Check for looping if the Cancel event handler calls Close().
404
405 // Note that if a cancel button and handler aren't present in the dialog,
406 // nothing will happen when you close the dialog via the window manager, or
b6c588e1
VZ
407 // via Close(). We wouldn't want to destroy the dialog by default, since
408 // the dialog may have been created on the stack. However, this does mean
409 // that calling dialog->Close() won't delete the dialog unless the handler
410 // for wxID_CANCEL does so. So use Destroy() if you want to be sure to
411 // destroy the dialog. The default OnCancel (above) simply ends a modal
412 // dialog, and hides a modeless dialog.
413
414 // VZ: this is horrible and MT-unsafe. Can't we reuse some of these global
415 // lists here? don't dare to change it now, but should be done later!
2bda0e17 416 static wxList closing;
bd9d76cb 417
2bda0e17 418 if ( closing.Member(this) )
e3065973 419 return;
bd9d76cb 420
2bda0e17 421 closing.Append(this);
bd9d76cb 422
387a3b02
JS
423 wxCommandEvent cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_CANCEL);
424 cancelEvent.SetEventObject( this );
e3065973 425 GetEventHandler()->ProcessEvent(cancelEvent); // This may close the dialog
2bda0e17
KB
426
427 closing.DeleteObject(this);
e3065973 428}
2bda0e17 429
33ac7e6f 430void wxDialog::OnSysColourChanged(wxSysColourChangedEvent& WXUNUSED(event))
2bda0e17 431{
a756f210 432 SetBackgroundColour(wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE));
b6c588e1 433 Refresh();
68ad65f8 434}
42e69d6b
VZ
435
436// ---------------------------------------------------------------------------
437// dialog window proc
438// ---------------------------------------------------------------------------
439
c140b7e7 440WXLRESULT wxDialog::MSWWindowProc(WXUINT message, WXWPARAM wParam, WXLPARAM lParam)
42e69d6b 441{
c140b7e7 442 WXLRESULT rc = 0;
044fe836 443 bool processed = false;
42e69d6b
VZ
444
445 switch ( message )
446 {
0fc58b86
RR
447#ifdef __WXWINCE__
448 // react to pressing the OK button in the title
449 case WM_COMMAND:
ef6d716b
WS
450 {
451 switch ( LOWORD(wParam) )
0fc58b86 452 {
ef6d716b
WS
453#ifndef __SMARTPHONE__
454 case IDOK:
455 wxButton *btn = wxDynamicCast(FindWindow(wxID_CANCEL), wxButton);
456 if ( btn && btn->IsEnabled() )
457 {
458 // if we do have a cancel button, do press it
459 btn->MSWCommand(BN_CLICKED, 0 /* unused */);
460 processed = true;
461 break;
462 }
463#else // ifdef __SMARTPHONE__
464 case IDM_LEFT:
465 case IDM_RIGHT:
466 processed = HandleCommand( LOWORD(wParam) , 0 , NULL );
0fc58b86 467 break;
ef6d716b 468#endif // __SMARTPHONE__
0fc58b86
RR
469 }
470 break;
ef6d716b 471 }
044fe836 472#endif
42e69d6b
VZ
473 case WM_CLOSE:
474 // if we can't close, tell the system that we processed the
475 // message - otherwise it would close us
476 processed = !Close();
477 break;
abceee76 478
f73f67be
VZ
479 case WM_SIZE:
480 // the Windows dialogs unfortunately are not meant to be resizeable
481 // at all and their standard class doesn't include CS_[VH]REDRAW
482 // styles which means that the window is not refreshed properly
483 // after the resize and no amount of WS_CLIPCHILDREN/SIBLINGS can
484 // help with it - so we have to refresh it manually which certainly
485 // creates flicker but at least doesn't show garbage on the screen
486 rc = wxWindow::MSWWindowProc(message, wParam, lParam);
044fe836 487 processed = true;
e441e1f4 488 if ( HasFlag(wxFULL_REPAINT_ON_RESIZE) )
f73f67be 489 {
044fe836 490 ::InvalidateRect(GetHwnd(), NULL, false /* erase bg */);
f73f67be
VZ
491 }
492 break;
493
04ef50df 494#ifndef __WXMICROWIN__
abceee76
VZ
495 case WM_SETCURSOR:
496 // we want to override the busy cursor for modal dialogs:
497 // typically, wxBeginBusyCursor() is called and then a modal dialog
bfbd6dc1 498 // is shown, but the modal dialog shouldn't have hourglass cursor
f46f4c86 499 if ( IsModal() && wxIsBusy() )
abceee76 500 {
bfbd6dc1
VZ
501 // set our cursor for all windows (but see below)
502 wxCursor cursor = m_cursor;
503 if ( !cursor.Ok() )
504 cursor = wxCURSOR_ARROW;
abceee76 505
bfbd6dc1
VZ
506 ::SetCursor(GetHcursorOf(cursor));
507
508 // in any case, stop here and don't let wxWindow process this
509 // message (it would set the busy cursor)
044fe836 510 processed = true;
bfbd6dc1 511
044fe836 512 // but return false to tell the child window (if the event
bfbd6dc1
VZ
513 // comes from one of them and not from ourselves) that it can
514 // set its own cursor if it has one: thus, standard controls
515 // (e.g. text ctrl) still have correct cursors in a dialog
516 // invoked while wxIsBusy()
044fe836 517 rc = false;
abceee76 518 }
bfbd6dc1 519 break;
82c9f85c 520#endif // __WXMICROWIN__
42e69d6b
VZ
521 }
522
523 if ( !processed )
524 rc = wxWindow::MSWWindowProc(message, wParam, lParam);
525
526 return rc;
527}
b6c588e1 528