Small modifications to Vadims changes
[wxWidgets.git] / src / gtk1 / dialog.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: dialog.cpp
3 // Purpose:
4 // Author: Robert Roebling
5 // Id: $Id$
6 // Copyright: (c) 1998 Robert Roebling
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 #ifdef __GNUG__
11 #pragma implementation "dialog.h"
12 #endif
13
14 #include "wx/dialog.h"
15 #include "wx/frame.h"
16 #include "wx/app.h"
17
18 #include "gdk/gdk.h"
19 #include "gtk/gtk.h"
20 #include "wx/gtk/win_gtk.h"
21
22 //-----------------------------------------------------------------------------
23 // idle system
24 //-----------------------------------------------------------------------------
25
26 extern void wxapp_install_idle_handler();
27 extern bool g_isIdle;
28
29 //-----------------------------------------------------------------------------
30 // data
31 //-----------------------------------------------------------------------------
32
33 extern wxList wxPendingDelete;
34
35 //-----------------------------------------------------------------------------
36 // "delete_event"
37 //-----------------------------------------------------------------------------
38
39 bool gtk_dialog_delete_callback( GtkWidget *WXUNUSED(widget), GdkEvent *WXUNUSED(event), wxDialog *win )
40 {
41 if (g_isIdle) wxapp_install_idle_handler();
42
43 /*
44 printf( "OnDelete from " );
45 if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
46 printf( win->GetClassInfo()->GetClassName() );
47 printf( ".\n" );
48 */
49
50 win->Close();
51
52 return TRUE;
53 }
54
55 //-----------------------------------------------------------------------------
56 // "size_allocate"
57 //-----------------------------------------------------------------------------
58
59 static void gtk_dialog_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* alloc, wxDialog *win )
60 {
61 if (g_isIdle) wxapp_install_idle_handler();
62
63 if (!win->m_hasVMT) return;
64
65 /*
66 printf( "OnDialogResize from " );
67 if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
68 printf( win->GetClassInfo()->GetClassName() );
69 printf( ".\n" );
70 */
71
72 if ((win->m_width != alloc->width) || (win->m_height != alloc->height))
73 {
74 win->InternalSetSize( alloc->width, alloc->height );
75 }
76 }
77
78 //-----------------------------------------------------------------------------
79 // "configure_event"
80 //-----------------------------------------------------------------------------
81
82 static gint gtk_dialog_configure_callback( GtkWidget *WXUNUSED(widget), GdkEventConfigure *event, wxDialog *win )
83 {
84 if (g_isIdle) wxapp_install_idle_handler();
85
86 if (!win->m_hasVMT) return FALSE;
87
88 win->InternalSetPosition(event->x, event->y);
89
90 wxMoveEvent mevent( wxPoint(win->m_x,win->m_y), win->GetId() );
91 mevent.SetEventObject( win );
92 win->GetEventHandler()->ProcessEvent( mevent );
93
94 return FALSE;
95 }
96
97 //-----------------------------------------------------------------------------
98 // "realize" from m_widget
99 //-----------------------------------------------------------------------------
100
101 /* we cannot MWM hints and icons before the widget has been realized,
102 so we do this directly after realization */
103
104 static gint
105 gtk_dialog_realized_callback( GtkWidget *widget, wxDialog *win )
106 {
107 if (g_isIdle) wxapp_install_idle_handler();
108
109 /* reset the icon */
110 if (win->m_icon != wxNullIcon)
111 {
112 wxIcon icon( win->m_icon );
113 win->m_icon = wxNullIcon;
114 win->SetIcon( icon );
115 }
116
117 return FALSE;
118 }
119
120 //-----------------------------------------------------------------------------
121 // "map" from m_widget
122 //-----------------------------------------------------------------------------
123
124 static gint
125 gtk_dialog_map_callback( GtkWidget *widget, wxDialog *win )
126 {
127 /* I haven''t been able to set the position of
128 the dialog before it is shown, so I do it here */
129 gtk_widget_set_uposition( widget, win->m_x, win->m_y );
130
131 /* all this is for Motif Window Manager "hints" and is supposed to be
132 recognized by other WM as well. not tested. */
133 long decor = (long) GDK_DECOR_BORDER;
134 long func = (long) GDK_FUNC_MOVE ;
135
136 if ((win->GetWindowStyle() & wxCAPTION) != 0)
137 decor |= GDK_DECOR_TITLE;
138 if ((win->GetWindowStyle() & wxSYSTEM_MENU) != 0)
139 {
140 decor |= GDK_DECOR_MENU;
141 func |= GDK_FUNC_CLOSE;
142 }
143 if ((win->GetWindowStyle() & wxMINIMIZE_BOX) != 0)
144 {
145 func |= GDK_FUNC_MINIMIZE;
146 decor |= GDK_DECOR_MINIMIZE;
147 }
148 if ((win->GetWindowStyle() & wxMAXIMIZE_BOX) != 0)
149 {
150 decor |= GDK_DECOR_MAXIMIZE;
151 func |= GDK_FUNC_MAXIMIZE;
152 }
153 if ((win->GetWindowStyle() & wxRESIZE_BORDER) != 0)
154 {
155 func |= GDK_FUNC_RESIZE;
156 decor |= GDK_DECOR_RESIZEH;
157 }
158 gdk_window_set_decorations( win->m_widget->window, (GdkWMDecoration)decor);
159 gdk_window_set_functions( win->m_widget->window, (GdkWMFunction)func);
160
161 /* GTK's shrinking/growing policy */
162 if ((win->GetWindowStyle() & wxRESIZE_BORDER) == 0)
163 gtk_window_set_policy(GTK_WINDOW(win->m_widget), 0, 0, 1);
164 else
165 gtk_window_set_policy(GTK_WINDOW(win->m_widget), 1, 1, 1);
166
167 return FALSE;
168 }
169
170 //-----------------------------------------------------------------------------
171 // wxDialog
172 //-----------------------------------------------------------------------------
173
174 BEGIN_EVENT_TABLE(wxDialog,wxPanel)
175 EVT_BUTTON (wxID_OK, wxDialog::OnOK)
176 EVT_BUTTON (wxID_CANCEL, wxDialog::OnCancel)
177 EVT_BUTTON (wxID_APPLY, wxDialog::OnApply)
178 EVT_SIZE (wxDialog::OnSize)
179 EVT_CLOSE (wxDialog::OnCloseWindow)
180 END_EVENT_TABLE()
181
182 IMPLEMENT_DYNAMIC_CLASS(wxDialog,wxPanel)
183
184 void wxDialog::Init()
185 {
186 m_returnCode = 0;
187 m_sizeSet = FALSE;
188 m_modalShowing = FALSE;
189 }
190
191 wxDialog::wxDialog( wxWindow *parent,
192 wxWindowID id, const wxString &title,
193 const wxPoint &pos, const wxSize &size,
194 long style, const wxString &name )
195 {
196 Init();
197
198 Create( parent, id, title, pos, size, style, name );
199 }
200
201 bool wxDialog::Create( wxWindow *parent,
202 wxWindowID id, const wxString &title,
203 const wxPoint &pos, const wxSize &size,
204 long style, const wxString &name )
205 {
206 wxTopLevelWindows.Append( this );
207
208 m_needParent = FALSE;
209
210 PreCreation( parent, id, pos, size, style, name );
211
212 m_widget = gtk_window_new( GTK_WINDOW_TOPLEVEL );
213
214 if (!name.IsEmpty())
215 gtk_window_set_wmclass( GTK_WINDOW(m_widget), name.mb_str(), name.mb_str() );
216
217 GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS );
218
219 gtk_signal_connect( GTK_OBJECT(m_widget), "delete_event",
220 GTK_SIGNAL_FUNC(gtk_dialog_delete_callback), (gpointer)this );
221
222 m_wxwindow = gtk_myfixed_new();
223 gtk_widget_show( m_wxwindow );
224 GTK_WIDGET_UNSET_FLAGS( m_wxwindow, GTK_CAN_FOCUS );
225
226 gtk_container_add( GTK_CONTAINER(m_widget), m_wxwindow );
227
228 SetTitle( title );
229
230 if (m_parent) m_parent->AddChild( this );
231
232 PostCreation();
233
234 /* we cannot set MWM hints before the widget has
235 been realized, so we do this directly after realization */
236 gtk_signal_connect( GTK_OBJECT(m_widget), "realize",
237 GTK_SIGNAL_FUNC(gtk_dialog_realized_callback), (gpointer) this );
238
239 /* we set the position of the window after the map event. setting it
240 before has no effect (with KWM) */
241 gtk_signal_connect( GTK_OBJECT(m_widget), "map",
242 GTK_SIGNAL_FUNC(gtk_dialog_map_callback), (gpointer) this );
243
244 /* the user resized the frame by dragging etc. */
245 gtk_signal_connect( GTK_OBJECT(m_widget), "size_allocate",
246 GTK_SIGNAL_FUNC(gtk_dialog_size_callback), (gpointer)this );
247
248 gtk_signal_connect( GTK_OBJECT(m_widget), "configure_event",
249 GTK_SIGNAL_FUNC(gtk_dialog_configure_callback), (gpointer)this );
250
251 return TRUE;
252 }
253
254 wxDialog::~wxDialog()
255 {
256 wxTopLevelWindows.DeleteObject( this );
257
258 if (wxTheApp->GetTopWindow() == this)
259 {
260 wxTheApp->SetTopWindow( (wxWindow*) NULL );
261 }
262
263 if (wxTopLevelWindows.Number() == 0)
264 {
265 wxTheApp->ExitMainLoop();
266 }
267 }
268
269 void wxDialog::SetTitle( const wxString& title )
270 {
271 m_title = title;
272 if (m_title.IsNull()) m_title = _T("");
273 gtk_window_set_title( GTK_WINDOW(m_widget), m_title.mbc_str() );
274 }
275
276 wxString wxDialog::GetTitle() const
277 {
278 return (wxString&)m_title;
279 }
280
281 void wxDialog::OnApply( wxCommandEvent &WXUNUSED(event) )
282 {
283 if (Validate()) TransferDataFromWindow();
284 }
285
286 void wxDialog::OnCancel( wxCommandEvent &WXUNUSED(event) )
287 {
288 if (IsModal())
289 {
290 EndModal(wxID_CANCEL);
291 }
292 else
293 {
294 SetReturnCode(wxID_CANCEL);
295 this->Show(FALSE);
296 }
297 }
298
299 void wxDialog::OnOK( wxCommandEvent &WXUNUSED(event) )
300 {
301 if ( Validate() && TransferDataFromWindow())
302 {
303 if (IsModal())
304 {
305 EndModal(wxID_OK);
306 }
307 else
308 {
309 SetReturnCode(wxID_OK);
310 this->Show(FALSE);
311 }
312 }
313 }
314
315 void wxDialog::OnPaint( wxPaintEvent& WXUNUSED(event) )
316 {
317 // yes
318 }
319
320 void wxDialog::OnCloseWindow(wxCloseEvent& event)
321 {
322 // We'll send a Cancel message by default,
323 // which may close the dialog.
324 // Check for looping if the Cancel event handler calls Close().
325
326 // Note that if a cancel button and handler aren't present in the dialog,
327 // nothing will happen when you close the dialog via the window manager, or
328 // via Close().
329 // We wouldn't want to destroy the dialog by default, since the dialog may have been
330 // created on the stack.
331 // However, this does mean that calling dialog->Close() won't delete the dialog
332 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
333 // sure to destroy the dialog.
334 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
335
336 static wxList s_closing;
337
338 if (s_closing.Member(this))
339 return; // no loops
340
341 s_closing.Append(this);
342
343 wxCommandEvent cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED, wxID_CANCEL);
344 cancelEvent.SetEventObject( this );
345 GetEventHandler()->ProcessEvent(cancelEvent);
346 s_closing.DeleteObject(this);
347 }
348
349 bool wxDialog::Destroy()
350 {
351 if (!wxPendingDelete.Member(this)) wxPendingDelete.Append(this);
352
353 return TRUE;
354 }
355
356 void wxDialog::OnSize( wxSizeEvent &WXUNUSED(event) )
357 {
358 wxASSERT_MSG( (m_widget != NULL), _T("invalid dialog") );
359
360 if (GetAutoLayout())
361 {
362 Layout();
363 }
364 else
365 {
366 /* no child: go out ! */
367 if (!GetChildren().First()) return;
368
369 /* do we have exactly one child? */
370 wxWindow *child = (wxWindow *) NULL;
371 for(wxNode *node = GetChildren().First(); node; node = node->Next())
372 {
373 wxWindow *win = (wxWindow *)node->Data();
374 if (!wxIS_KIND_OF(win,wxFrame) && !wxIS_KIND_OF(win,wxDialog))
375 {
376 /* it's the second one: do nothing */
377 if (child) return;
378 child = win;
379 }
380 }
381
382 /* yes: set it's size to fill all the frame */
383 int client_x, client_y;
384 GetClientSize( &client_x, &client_y );
385 child->SetSize( 1, 1, client_x-2, client_y);
386 }
387 }
388
389 void wxDialog::DoSetSize( int x, int y, int width, int height, int sizeFlags )
390 {
391 wxASSERT_MSG( (m_widget != NULL), _T("invalid dialog") );
392 wxASSERT_MSG( (m_wxwindow != NULL), _T("invalid dialog") );
393
394 if (m_resizing) return; /* I don't like recursions */
395 m_resizing = TRUE;
396
397 int old_x = m_x;
398 int old_y = m_y;
399 int old_width = m_width;
400 int old_height = m_height;
401
402 if ((sizeFlags & wxSIZE_USE_EXISTING) == wxSIZE_USE_EXISTING)
403 {
404 if (x != -1) m_x = x;
405 if (y != -1) m_y = y;
406 if (width != -1) m_width = width;
407 if (height != -1) m_height = height;
408 }
409 else
410 {
411 m_x = x;
412 m_y = y;
413 m_width = width;
414 m_height = height;
415 }
416
417 if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
418 {
419 if (width == -1) m_width = 80;
420 }
421
422 if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
423 {
424 if (height == -1) m_height = 26;
425 }
426
427 if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
428 if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
429 if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
430 if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
431
432 if ((m_x != -1) || (m_y != -1))
433 {
434 if ((m_x != old_x) || (m_y != old_y))
435 {
436 /* we set the position here and when showing the dialog
437 for the first time in idle time */
438 gtk_widget_set_uposition( m_widget, m_x, m_y );
439 }
440 }
441
442 if ((m_width != old_width) || (m_height != old_height))
443 {
444 /* actual resizing is deferred to GtkOnSize in idle time and
445 when showing the dialog */
446 m_sizeSet = FALSE;
447 }
448
449 m_resizing = FALSE;
450 }
451
452 void wxDialog::GtkOnSize( int WXUNUSED(x), int WXUNUSED(y), int width, int height )
453 {
454 // due to a bug in gtk, x,y are always 0
455 // m_x = x;
456 // m_y = y;
457
458 if ((m_height == height) && (m_width == width) && (m_sizeSet)) return;
459 if (!m_wxwindow) return;
460
461 m_width = width;
462 m_height = height;
463
464 if ((m_minWidth != -1) && (m_width < m_minWidth)) m_width = m_minWidth;
465 if ((m_minHeight != -1) && (m_height < m_minHeight)) m_height = m_minHeight;
466 if ((m_maxWidth != -1) && (m_width > m_maxWidth)) m_width = m_maxWidth;
467 if ((m_maxHeight != -1) && (m_height > m_maxHeight)) m_height = m_maxHeight;
468
469 /* we actually set the size of a frame here and no-where else */
470 gtk_widget_set_usize( m_widget, m_width, m_height );
471
472 m_sizeSet = TRUE;
473
474 wxSizeEvent event( wxSize(m_width,m_height), GetId() );
475 event.SetEventObject( this );
476 GetEventHandler()->ProcessEvent( event );
477 }
478
479 void wxDialog::Centre( int direction )
480 {
481 wxASSERT_MSG( (m_widget != NULL), _T("invalid dialog") );
482
483 int x = 0;
484 int y = 0;
485
486 if ((direction & wxHORIZONTAL) == wxHORIZONTAL) x = (gdk_screen_width () - m_width) / 2;
487 if ((direction & wxVERTICAL) == wxVERTICAL) y = (gdk_screen_height () - m_height) / 2;
488
489 Move( x, y );
490 }
491
492 void wxDialog::OnInternalIdle()
493 {
494 if (!m_sizeSet && GTK_WIDGET_REALIZED(m_wxwindow))
495 GtkOnSize( m_x, m_y, m_width, m_height );
496 }
497
498 bool wxDialog::Show( bool show )
499 {
500 if (!show && IsModal())
501 {
502 EndModal( wxID_CANCEL );
503 }
504
505 if (show && !m_sizeSet)
506 {
507 /* by calling GtkOnSize here, we don't have to call
508 either after showing the frame, which would entail
509 much ugly flicker nor from within the size_allocate
510 handler, because GTK 1.1.X forbids that. */
511
512 GtkOnSize( m_x, m_y, m_width, m_height );
513 }
514
515 if (show != m_isShown)
516 {
517 if (show)
518 {
519 gtk_widget_show( m_widget );
520 }
521 else
522 gtk_widget_hide( m_widget );
523
524 m_isShown = show;
525 }
526
527 if (show) InitDialog();
528
529 return TRUE;
530 }
531
532 bool wxDialog::IsModal() const
533 {
534 return m_modalShowing;
535 }
536
537 void wxDialog::SetModal( bool WXUNUSED(flag) )
538 {
539 /*
540 if (flag)
541 m_windowStyle |= wxDIALOG_MODAL;
542 else
543 if (m_windowStyle & wxDIALOG_MODAL) m_windowStyle -= wxDIALOG_MODAL;
544 */
545 wxFAIL_MSG( _T("wxDialog:SetModal obsolete now") );
546 }
547
548 int wxDialog::ShowModal()
549 {
550 if (IsModal())
551 {
552 wxFAIL_MSG( _T("wxDialog:ShowModal called twice") );
553 return GetReturnCode();
554 }
555
556 Show( TRUE );
557
558 m_modalShowing = TRUE;
559
560 gtk_grab_add( m_widget );
561 gtk_main();
562 gtk_grab_remove( m_widget );
563
564 return GetReturnCode();
565 }
566
567 void wxDialog::EndModal( int retCode )
568 {
569 SetReturnCode( retCode );
570
571 if (!IsModal())
572 {
573 wxFAIL_MSG( _T("wxDialog:EndModal called twice") );
574 return;
575 }
576
577 m_modalShowing = FALSE;
578
579 gtk_main_quit();
580
581 Show( FALSE );
582 }
583
584 void wxDialog::InitDialog()
585 {
586 wxWindow::InitDialog();
587 }
588
589 void wxDialog::SetIcon( const wxIcon &icon )
590 {
591 m_icon = icon;
592 if (!icon.Ok()) return;
593
594 wxMask *mask = icon.GetMask();
595 GdkBitmap *bm = (GdkBitmap *) NULL;
596 if (mask) bm = mask->GetBitmap();
597
598 gdk_window_set_icon( m_widget->window, (GdkWindow *) NULL, icon.GetPixmap(), bm );
599 }