1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
11 #pragma implementation "dialog.h"
14 #include "wx/dialog.h"
17 #include "wx/cursor.h"
21 #include "gdk/gdkkeysyms.h"
22 #include "wx/gtk/win_gtk.h"
24 //-----------------------------------------------------------------------------
26 //-----------------------------------------------------------------------------
28 extern void wxapp_install_idle_handler();
30 extern int g_openDialogs
;
32 //-----------------------------------------------------------------------------
34 //-----------------------------------------------------------------------------
36 extern wxList wxPendingDelete
;
38 //-----------------------------------------------------------------------------
39 // "focus" from m_window
40 //-----------------------------------------------------------------------------
42 static gint
gtk_dialog_focus_callback( GtkWidget
*widget
, GtkDirectionType
WXUNUSED(d
), wxWindow
*WXUNUSED(win
) )
45 wxapp_install_idle_handler();
47 // This disables GTK's tab traversal
48 gtk_signal_emit_stop_by_name( GTK_OBJECT(widget
), "focus" );
52 //-----------------------------------------------------------------------------
54 //-----------------------------------------------------------------------------
56 bool gtk_dialog_delete_callback( GtkWidget
*WXUNUSED(widget
), GdkEvent
*WXUNUSED(event
), wxDialog
*win
)
59 wxapp_install_idle_handler();
66 //-----------------------------------------------------------------------------
68 //-----------------------------------------------------------------------------
70 static void gtk_dialog_size_callback( GtkWidget
*WXUNUSED(widget
), GtkAllocation
* alloc
, wxDialog
*win
)
73 wxapp_install_idle_handler();
75 if (!win
->m_hasVMT
) return;
77 if ((win
->m_width
!= alloc
->width
) || (win
->m_height
!= alloc
->height
))
79 win
->m_width
= alloc
->width
;
80 win
->m_height
= alloc
->height
;
85 //-----------------------------------------------------------------------------
87 //-----------------------------------------------------------------------------
90 #if (GTK_MINOR_VERSION > 0)
91 gtk_dialog_configure_callback( GtkWidget
*WXUNUSED(widget
), GdkEventConfigure
*WXUNUSED(event
), wxDialog
*win
)
93 gtk_dialog_configure_callback( GtkWidget
*WXUNUSED(widget
), GdkEventConfigure
*event
, wxDialog
*win
)
97 wxapp_install_idle_handler();
99 if (!win
->m_hasVMT
) return FALSE
;
101 #if (GTK_MINOR_VERSION > 0)
104 gdk_window_get_root_origin( win
->m_widget
->window
, &x
, &y
);
112 wxMoveEvent
mevent( wxPoint(win
->m_x
,win
->m_y
), win
->GetId() );
113 mevent
.SetEventObject( win
);
114 win
->GetEventHandler()->ProcessEvent( mevent
);
119 //-----------------------------------------------------------------------------
120 // "realize" from m_widget
121 //-----------------------------------------------------------------------------
123 /* we cannot MWM hints and icons before the widget has been realized,
124 so we do this directly after realization */
127 gtk_dialog_realized_callback( GtkWidget
*widget
, wxDialog
*win
)
130 wxapp_install_idle_handler();
132 /* I haven't been able to set the position of
133 the dialog before it is shown, so I set the
134 position in "realize" */
135 gtk_widget_set_uposition( widget
, win
->m_x
, win
->m_y
);
137 /* all this is for Motif Window Manager "hints" and is supposed to be
138 recognized by other WM as well. not tested. */
139 long decor
= (long) GDK_DECOR_BORDER
;
140 long func
= (long) GDK_FUNC_MOVE
;
142 /* Some WM don't display any border around the frame contents if
143 used with these hints, so we add a resize border around it,
144 without automatically allowinng it to be resized though.
146 This avoids the problem, but looks odd. What shall we do?
148 decor
|= GDK_DECOR_RESIZEH
;
150 if ((win
->GetWindowStyle() & wxCAPTION
) != 0)
151 decor
|= GDK_DECOR_TITLE
;
152 if ((win
->GetWindowStyle() & wxSYSTEM_MENU
) != 0)
154 decor
|= GDK_DECOR_MENU
;
155 func
|= GDK_FUNC_CLOSE
;
157 if ((win
->GetWindowStyle() & wxMINIMIZE_BOX
) != 0)
159 func
|= GDK_FUNC_MINIMIZE
;
160 decor
|= GDK_DECOR_MINIMIZE
;
162 if ((win
->GetWindowStyle() & wxMAXIMIZE_BOX
) != 0)
164 decor
|= GDK_DECOR_MAXIMIZE
;
165 func
|= GDK_FUNC_MAXIMIZE
;
167 if ((win
->GetWindowStyle() & wxRESIZE_BORDER
) != 0)
169 func
|= GDK_FUNC_RESIZE
;
170 decor
|= GDK_DECOR_RESIZEH
;
172 gdk_window_set_decorations( win
->m_widget
->window
, (GdkWMDecoration
)decor
);
173 gdk_window_set_functions( win
->m_widget
->window
, (GdkWMFunction
)func
);
175 /* GTK's shrinking/growing policy */
176 if ((win
->GetWindowStyle() & wxRESIZE_BORDER
) == 0)
177 gtk_window_set_policy(GTK_WINDOW(win
->m_widget
), 0, 0, 1);
179 gtk_window_set_policy(GTK_WINDOW(win
->m_widget
), 1, 1, 1);
182 gint flag
= 0; // GDK_HINT_POS;
183 if ((win
->GetMinWidth() != -1) || (win
->GetMinHeight() != -1)) flag
|= GDK_HINT_MIN_SIZE
;
184 if ((win
->GetMaxWidth() != -1) || (win
->GetMaxHeight() != -1)) flag
|= GDK_HINT_MAX_SIZE
;
187 gdk_window_set_hints( win
->m_widget
->window
,
189 win
->GetMinWidth(), win
->GetMinHeight(),
190 win
->GetMaxWidth(), win
->GetMaxHeight(),
195 if (win
->m_icon
!= wxNullIcon
)
197 wxIcon
icon( win
->m_icon
);
198 win
->m_icon
= wxNullIcon
;
199 win
->SetIcon( icon
);
205 //-----------------------------------------------------------------------------
206 // InsertChild for wxDialog
207 //-----------------------------------------------------------------------------
209 /* Callback for wxFrame. This very strange beast has to be used because
210 * C++ has no virtual methods in a constructor. We have to emulate a
211 * virtual function here as wxWindows requires different ways to insert
212 * a child in container classes. */
214 static void wxInsertChildInDialog( wxDialog
* parent
, wxWindow
* child
)
216 gtk_pizza_put( GTK_PIZZA(parent
->m_wxwindow
),
217 GTK_WIDGET(child
->m_widget
),
223 if (parent
->HasFlag(wxTAB_TRAVERSAL
))
225 /* we now allow a window to get the focus as long as it
226 doesn't have any children. */
227 GTK_WIDGET_UNSET_FLAGS( parent
->m_wxwindow
, GTK_CAN_FOCUS
);
231 //-----------------------------------------------------------------------------
233 //-----------------------------------------------------------------------------
235 BEGIN_EVENT_TABLE(wxDialog
,wxPanel
)
236 EVT_BUTTON (wxID_OK
, wxDialog::OnOK
)
237 EVT_BUTTON (wxID_CANCEL
, wxDialog::OnCancel
)
238 EVT_BUTTON (wxID_APPLY
, wxDialog::OnApply
)
239 EVT_SIZE (wxDialog::OnSize
)
240 EVT_CLOSE (wxDialog::OnCloseWindow
)
243 IMPLEMENT_DYNAMIC_CLASS(wxDialog
,wxPanel
)
245 void wxDialog::Init()
249 m_modalShowing
= FALSE
;
253 wxDialog::wxDialog( wxWindow
*parent
,
254 wxWindowID id
, const wxString
&title
,
255 const wxPoint
&pos
, const wxSize
&size
,
256 long style
, const wxString
&name
)
260 Create( parent
, id
, title
, pos
, size
, style
, name
);
263 bool wxDialog::Create( wxWindow
*parent
,
264 wxWindowID id
, const wxString
&title
,
265 const wxPoint
&pos
, const wxSize
&size
,
266 long style
, const wxString
&name
)
270 wxTopLevelWindows
.Append( this );
272 m_needParent
= FALSE
;
274 if (!PreCreation( parent
, pos
, size
) ||
275 !CreateBase( parent
, id
, pos
, size
, style
, wxDefaultValidator
, name
))
277 wxFAIL_MSG( wxT("wxDialog creation failed") );
281 // All dialogs should really have this style
282 m_windowStyle
|= wxTAB_TRAVERSAL
;
284 m_insertCallback
= (wxInsertChildFunction
) wxInsertChildInDialog
;
286 m_widget
= gtk_window_new( GTK_WINDOW_DIALOG
);
288 if ((m_parent
) && (GTK_IS_WINDOW(m_parent
->m_widget
)))
289 gtk_window_set_transient_for( GTK_WINDOW(m_widget
), GTK_WINDOW(m_parent
->m_widget
) );
292 gtk_window_set_wmclass( GTK_WINDOW(m_widget
), name
.mb_str(), name
.mb_str() );
294 GTK_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
296 gtk_signal_connect( GTK_OBJECT(m_widget
), "delete_event",
297 GTK_SIGNAL_FUNC(gtk_dialog_delete_callback
), (gpointer
)this );
299 m_wxwindow
= gtk_pizza_new();
300 gtk_widget_show( m_wxwindow
);
301 GTK_WIDGET_UNSET_FLAGS( m_wxwindow
, GTK_CAN_FOCUS
);
303 gtk_container_add( GTK_CONTAINER(m_widget
), m_wxwindow
);
307 if (m_parent
) m_parent
->AddChild( this );
311 /* we cannot set MWM hints before the widget has
312 been realized, so we do this directly after realization */
313 gtk_signal_connect( GTK_OBJECT(m_widget
), "realize",
314 GTK_SIGNAL_FUNC(gtk_dialog_realized_callback
), (gpointer
) this );
316 /* the user resized the frame by dragging etc. */
317 gtk_signal_connect( GTK_OBJECT(m_widget
), "size_allocate",
318 GTK_SIGNAL_FUNC(gtk_dialog_size_callback
), (gpointer
)this );
320 gtk_signal_connect( GTK_OBJECT(m_widget
), "configure_event",
321 GTK_SIGNAL_FUNC(gtk_dialog_configure_callback
), (gpointer
)this );
323 /* disable native tab traversal */
324 gtk_signal_connect( GTK_OBJECT(m_widget
), "focus",
325 GTK_SIGNAL_FUNC(gtk_dialog_focus_callback
), (gpointer
)this );
330 wxDialog::~wxDialog()
332 m_isBeingDeleted
= TRUE
;
334 wxTopLevelWindows
.DeleteObject( this );
336 if (wxTheApp
->GetTopWindow() == this)
338 wxTheApp
->SetTopWindow( (wxWindow
*) NULL
);
341 if (wxTopLevelWindows
.Number() == 0)
343 wxTheApp
->ExitMainLoop();
349 void wxDialog::SetTitle( const wxString
& title
)
352 if (m_title
.IsNull()) m_title
= wxT("");
353 gtk_window_set_title( GTK_WINDOW(m_widget
), m_title
.mbc_str() );
356 wxString
wxDialog::GetTitle() const
358 return (wxString
&)m_title
;
361 void wxDialog::OnApply( wxCommandEvent
&WXUNUSED(event
) )
363 if (Validate()) TransferDataFromWindow();
366 void wxDialog::OnCancel( wxCommandEvent
&WXUNUSED(event
) )
370 EndModal(wxID_CANCEL
);
374 SetReturnCode(wxID_CANCEL
);
379 void wxDialog::OnOK( wxCommandEvent
&WXUNUSED(event
) )
381 if (Validate() && TransferDataFromWindow())
389 SetReturnCode(wxID_OK
);
395 void wxDialog::OnPaint( wxPaintEvent
& WXUNUSED(event
) )
400 void wxDialog::OnCloseWindow(wxCloseEvent
& WXUNUSED(event
))
402 // We'll send a Cancel message by default,
403 // which may close the dialog.
404 // Check for looping if the Cancel event handler calls Close().
406 // Note that if a cancel button and handler aren't present in the dialog,
407 // nothing will happen when you close the dialog via the window manager, or
409 // We wouldn't want to destroy the dialog by default, since the dialog may have been
410 // created on the stack.
411 // However, this does mean that calling dialog->Close() won't delete the dialog
412 // unless the handler for wxID_CANCEL does so. So use Destroy() if you want to be
413 // sure to destroy the dialog.
414 // The default OnCancel (above) simply ends a modal dialog, and hides a modeless dialog.
416 static wxList s_closing
;
418 if (s_closing
.Member(this))
421 s_closing
.Append(this);
423 wxCommandEvent
cancelEvent(wxEVT_COMMAND_BUTTON_CLICKED
, wxID_CANCEL
);
424 cancelEvent
.SetEventObject( this );
425 GetEventHandler()->ProcessEvent(cancelEvent
);
426 s_closing
.DeleteObject(this);
429 bool wxDialog::Destroy()
431 if (!wxPendingDelete
.Member(this)) wxPendingDelete
.Append(this);
436 void wxDialog::OnSize( wxSizeEvent
&WXUNUSED(event
) )
438 wxASSERT_MSG( (m_widget
!= NULL
), wxT("invalid dialog") );
440 #if wxUSE_CONSTRAINTS
446 #endif // wxUSE_CONSTRAINTS
448 /* no child: go out ! */
449 if (!GetChildren().First()) return;
451 /* do we have exactly one child? */
452 wxWindow
*child
= (wxWindow
*) NULL
;
453 for(wxNode
*node
= GetChildren().First(); node
; node
= node
->Next())
455 wxWindow
*win
= (wxWindow
*)node
->Data();
456 if (!wxIS_KIND_OF(win
,wxFrame
) && !wxIS_KIND_OF(win
,wxDialog
))
458 /* it's the second one: do nothing */
464 /* yes: set it's size to fill all the frame */
465 int client_x
, client_y
;
466 GetClientSize( &client_x
, &client_y
);
467 child
->SetSize( 1, 1, client_x
-2, client_y
);
471 void wxDialog::DoSetSize( int x
, int y
, int width
, int height
, int sizeFlags
)
473 wxASSERT_MSG( (m_widget
!= NULL
), wxT("invalid dialog") );
474 wxASSERT_MSG( (m_wxwindow
!= NULL
), wxT("invalid dialog") );
476 if (m_resizing
) return; /* I don't like recursions */
482 int old_width
= m_width
;
483 int old_height
= m_height
;
485 if ((sizeFlags
& wxSIZE_ALLOW_MINUS_ONE
) == 0)
487 if (x
!= -1) m_x
= x
;
488 if (y
!= -1) m_y
= y
;
489 if (width
!= -1) m_width
= width
;
490 if (height
!= -1) m_height
= height
;
501 if ((sizeFlags & wxSIZE_AUTO_WIDTH) == wxSIZE_AUTO_WIDTH)
503 if (width == -1) m_width = 80;
506 if ((sizeFlags & wxSIZE_AUTO_HEIGHT) == wxSIZE_AUTO_HEIGHT)
508 if (height == -1) m_height = 26;
512 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
513 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
514 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_maxWidth
;
515 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_maxHeight
;
517 if ((m_x
!= -1) || (m_y
!= -1))
519 if ((m_x
!= old_x
) || (m_y
!= old_y
))
521 /* we set the position here and when showing the dialog
522 for the first time in idle time */
523 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
527 if ((m_width
!= old_width
) || (m_height
!= old_height
))
529 /* actual resizing is deferred to GtkOnSize in idle time and
530 when showing the dialog */
537 void wxDialog::GtkOnSize( int WXUNUSED(x
), int WXUNUSED(y
), int width
, int height
)
539 // due to a bug in gtk, x,y are always 0
543 if ((m_height
== height
) && (m_width
== width
) && (m_sizeSet
)) return;
544 if (!m_wxwindow
) return;
549 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
550 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
551 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_maxWidth
;
552 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_maxHeight
;
554 /* we actually set the size of a frame here and no-where else */
555 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
559 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
560 event
.SetEventObject( this );
561 GetEventHandler()->ProcessEvent( event
);
564 void wxDialog::OnInternalIdle()
566 if (!m_sizeSet
&& GTK_WIDGET_REALIZED(m_wxwindow
))
567 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
569 wxWindow::OnInternalIdle();
572 bool wxDialog::Show( bool show
)
574 if (!show
&& IsModal())
576 EndModal( wxID_CANCEL
);
579 if (show
&& !m_sizeSet
)
581 /* by calling GtkOnSize here, we don't have to call
582 either after showing the frame, which would entail
583 much ugly flicker nor from within the size_allocate
584 handler, because GTK 1.1.X forbids that. */
586 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
589 bool ret
= wxWindow::Show( show
);
591 if (show
) InitDialog();
596 bool wxDialog::IsModal() const
598 return m_modalShowing
;
601 void wxDialog::SetModal( bool WXUNUSED(flag
) )
605 m_windowStyle |= wxDIALOG_MODAL;
607 if (m_windowStyle & wxDIALOG_MODAL) m_windowStyle -= wxDIALOG_MODAL;
609 wxFAIL_MSG( wxT("wxDialog:SetModal obsolete now") );
612 int wxDialog::ShowModal()
616 wxFAIL_MSG( wxT("wxDialog:ShowModal called twice") );
617 return GetReturnCode();
620 wxBusyCursorSuspender cs
; // temporarily suppress the busy cursor
624 m_modalShowing
= TRUE
;
626 gtk_grab_add( m_widget
);
628 gtk_grab_remove( m_widget
);
630 return GetReturnCode();
633 void wxDialog::EndModal( int retCode
)
635 SetReturnCode( retCode
);
639 wxFAIL_MSG( wxT("wxDialog:EndModal called twice") );
643 m_modalShowing
= FALSE
;
650 void wxDialog::InitDialog()
652 wxWindow::InitDialog();
655 void wxDialog::SetIcon( const wxIcon
&icon
)
658 if (!icon
.Ok()) return;
660 if (!m_widget
->window
) return;
662 wxMask
*mask
= icon
.GetMask();
663 GdkBitmap
*bm
= (GdkBitmap
*) NULL
;
664 if (mask
) bm
= mask
->GetBitmap();
666 gdk_window_set_icon( m_widget
->window
, (GdkWindow
*) NULL
, icon
.GetPixmap(), bm
);