1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Robert Roebling
6 // Copyright: (c) 1998 Robert Roebling
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
11 #pragma implementation "frame.h"
15 #include "wx/dialog.h"
16 #include "wx/control.h"
19 #include "wx/toolbar.h"
20 #include "wx/statusbr.h"
21 #include "wx/dcclient.h"
26 #include "wx/gtk/win_gtk.h"
28 //-----------------------------------------------------------------------------
30 //-----------------------------------------------------------------------------
32 const int wxMENU_HEIGHT
= 27;
33 const int wxSTATUS_HEIGHT
= 25;
35 //-----------------------------------------------------------------------------
37 //-----------------------------------------------------------------------------
39 extern wxList wxTopLevelWindows
;
40 extern wxList wxPendingDelete
;
42 //-----------------------------------------------------------------------------
44 //-----------------------------------------------------------------------------
46 static void gtk_frame_size_callback( GtkWidget
*WXUNUSED(widget
), GtkAllocation
* alloc
, wxFrame
*win
)
48 if (!win
->HasVMT()) return;
51 printf( "OnFrameResize from " );
52 if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
53 printf( win->GetClassInfo()->GetClassName() );
57 if ((win
->m_width
!= alloc
->width
) || (win
->m_height
!= alloc
->height
))
59 win
->m_sizeSet
= FALSE
;
60 win
->m_width
= alloc
->width
;
61 win
->m_height
= alloc
->height
;
65 //-----------------------------------------------------------------------------
67 //-----------------------------------------------------------------------------
69 static gint
gtk_frame_delete_callback( GtkWidget
*WXUNUSED(widget
), GdkEvent
*WXUNUSED(event
), wxFrame
*win
)
72 printf( "OnDelete from " );
73 if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
74 printf( win->GetClassInfo()->GetClassName() );
83 //-----------------------------------------------------------------------------
85 //-----------------------------------------------------------------------------
87 static gint
gtk_frame_configure_callback( GtkWidget
*WXUNUSED(widget
), GdkEventConfigure
*event
, wxFrame
*win
)
89 if (!win
->HasVMT()) return FALSE
;
94 wxMoveEvent
mevent( wxPoint(win
->m_x
,win
->m_y
), win
->GetId() );
95 mevent
.SetEventObject( win
);
96 win
->GetEventHandler()->ProcessEvent( mevent
);
101 //-----------------------------------------------------------------------------
103 //-----------------------------------------------------------------------------
105 BEGIN_EVENT_TABLE(wxFrame
, wxWindow
)
106 EVT_SIZE(wxFrame::OnSize
)
107 EVT_CLOSE(wxFrame::OnCloseWindow
)
110 IMPLEMENT_DYNAMIC_CLASS(wxFrame
,wxWindow
)
114 m_frameMenuBar
= (wxMenuBar
*) NULL
;
115 m_frameStatusBar
= (wxStatusBar
*) NULL
;
116 m_frameToolBar
= (wxToolBar
*) NULL
;
122 wxFrame::wxFrame( wxWindow
*parent
, wxWindowID id
, const wxString
&title
,
123 const wxPoint
&pos
, const wxSize
&size
,
124 long style
, const wxString
&name
)
126 m_frameMenuBar
= (wxMenuBar
*) NULL
;
127 m_frameStatusBar
= (wxStatusBar
*) NULL
;
128 m_frameToolBar
= (wxToolBar
*) NULL
;
132 Create( parent
, id
, title
, pos
, size
, style
, name
);
135 bool wxFrame::Create( wxWindow
*parent
, wxWindowID id
, const wxString
&title
,
136 const wxPoint
&pos
, const wxSize
&size
,
137 long style
, const wxString
&name
)
139 wxTopLevelWindows
.Append( this );
141 m_needParent
= FALSE
;
143 PreCreation( parent
, id
, pos
, size
, style
, name
);
147 GtkWindowType win_type
= GTK_WINDOW_TOPLEVEL
;
148 if (style
& wxSIMPLE_BORDER
) win_type
= GTK_WINDOW_POPUP
;
150 m_widget
= gtk_window_new( win_type
);
153 debug_focus_in( m_widget
, "wxFrame::m_widget", name
);
156 if ((size
.x
!= -1) && (size
.y
!= -1))
157 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
158 if ((pos
.x
!= -1) && (pos
.y
!= -1))
159 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
161 gtk_window_set_title( GTK_WINDOW(m_widget
), title
);
162 GTK_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
164 gtk_widget_set( m_widget
, "GtkWindow::allow_shrink", TRUE
, NULL
);
166 gtk_signal_connect( GTK_OBJECT(m_widget
), "delete_event",
167 GTK_SIGNAL_FUNC(gtk_frame_delete_callback
), (gpointer
)this );
169 m_wxwindow
= gtk_myfixed_new();
170 gtk_widget_show( m_wxwindow
);
171 GTK_WIDGET_UNSET_FLAGS( m_wxwindow
, GTK_CAN_FOCUS
);
174 debug_focus_in( m_wxwindow
, "wxFrame::m_wxwindow", name
);
177 gtk_container_add( GTK_CONTAINER(m_widget
), m_wxwindow
);
179 gtk_signal_connect( GTK_OBJECT(m_widget
), "size_allocate",
180 GTK_SIGNAL_FUNC(gtk_frame_size_callback
), (gpointer
)this );
182 gtk_signal_connect( GTK_OBJECT(m_widget
), "configure_event",
183 GTK_SIGNAL_FUNC(gtk_frame_configure_callback
), (gpointer
)this );
185 if (m_parent
) m_parent
->AddChild( this );
194 if (m_frameMenuBar
) delete m_frameMenuBar
;
195 if (m_frameStatusBar
) delete m_frameStatusBar
;
196 if (m_frameToolBar
) delete m_frameToolBar
;
198 wxTopLevelWindows
.DeleteObject( this );
200 if (wxTheApp
->GetTopWindow() == this)
202 wxTheApp
->SetTopWindow( (wxWindow
*) NULL
);
205 if (wxTopLevelWindows
.Number() == 0)
207 wxTheApp
->ExitMainLoop();
211 bool wxFrame::Show( bool show
)
213 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
215 if (show
&& !m_sizeSet
)
217 // by calling GtkOnSize here, we don't have to call
218 // either after showing the frame, which would entail
219 // much ugly flicker nor from within the size_allocate
220 // handler, because GTK 1.1.X forbids that.
222 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
225 return wxWindow::Show( show
);
228 void wxFrame::OnCloseWindow( wxCloseEvent
&event
)
230 if (GetEventHandler()->OnClose() || event
.GetForce()) this->Destroy();
233 bool wxFrame::Destroy()
235 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
237 if (!wxPendingDelete
.Member(this)) wxPendingDelete
.Append(this);
242 wxPoint
wxFrame::GetClientAreaOrigin() const
244 wxPoint
pt( m_miniEdge
, m_miniEdge
+ m_miniTitle
);
248 m_frameMenuBar
->GetSize( (int*)NULL
, &h
);
254 m_frameToolBar
->GetSize( (int*)NULL
, &h
);
260 void wxFrame::SetSize( int x
, int y
, int width
, int height
, int sizeFlags
)
262 wxASSERT_MSG( (m_widget
!= NULL
), "invalid window" );
264 // Don't do anything for children of wxMDIChildFrame
265 if (!m_wxwindow
) return;
267 if (m_resizing
) return; // I don't like recursions
272 int old_width
= m_width
;
273 int old_height
= m_height
;
275 if ((sizeFlags
& wxSIZE_USE_EXISTING
) == wxSIZE_USE_EXISTING
)
277 if (x
!= -1) m_x
= x
;
278 if (y
!= -1) m_y
= y
;
279 if (width
!= -1) m_width
= width
;
280 if (height
!= -1) m_height
= height
;
290 if ((sizeFlags
& wxSIZE_AUTO_WIDTH
) == wxSIZE_AUTO_WIDTH
)
292 if (width
== -1) m_width
= 80;
295 if ((sizeFlags
& wxSIZE_AUTO_HEIGHT
) == wxSIZE_AUTO_HEIGHT
)
297 if (height
== -1) m_height
= 26;
300 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
301 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
302 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_maxWidth
;
303 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_maxHeight
;
305 if ((m_x
!= -1) || (m_y
!= -1))
307 if ((m_x
!= old_x
) || (m_y
!= old_y
))
308 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
311 if ((m_width
!= old_width
) || (m_height
!= old_height
))
313 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
316 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
317 event
.SetEventObject( this );
318 GetEventHandler()->ProcessEvent( event
);
323 void wxFrame::SetSize( int width
, int height
)
325 SetSize( -1, -1, width
, height
, wxSIZE_USE_EXISTING
);
328 void wxFrame::Centre( int direction
)
330 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
335 if (direction
& wxHORIZONTAL
== wxHORIZONTAL
) x
= (gdk_screen_width () - m_width
) / 2;
336 if (direction
& wxVERTICAL
== wxVERTICAL
) y
= (gdk_screen_height () - m_height
) / 2;
341 void wxFrame::GetClientSize( int *width
, int *height
) const
343 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
345 wxWindow::GetClientSize( width
, height
);
348 if (m_frameMenuBar
) (*height
) -= wxMENU_HEIGHT
;
349 if (m_frameStatusBar
) (*height
) -= wxSTATUS_HEIGHT
;
353 m_frameToolBar
->GetSize( (int *) NULL
, &y
);
356 (*height
) -= m_miniEdge
*2 + m_miniTitle
;
360 (*width
) -= m_miniEdge
*2;
364 void wxFrame::SetClientSize( int const width
, int const height
)
366 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
369 if (m_frameMenuBar
) h
+= wxMENU_HEIGHT
;
370 if (m_frameStatusBar
) h
+= wxSTATUS_HEIGHT
;
374 m_frameToolBar
->GetSize( (int *) NULL
, &y
);
377 wxWindow::SetClientSize( width
+ m_miniEdge
*2, h
+ m_miniEdge
*2 + m_miniTitle
);
380 void wxFrame::GtkOnSize( int WXUNUSED(x
), int WXUNUSED(y
), int width
, int height
)
382 // due to a bug in gtk, x,y are always 0
386 if (m_resizing
) return;
389 if (!m_wxwindow
) return;
394 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
395 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
396 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_maxWidth
;
397 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_maxHeight
;
399 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
401 // this emulates the new wxMSW behaviour of placing all
402 // frame-subwindows (menu, toolbar..) on one native window
403 // OK, this hurts in the eye, but I don't want to call SetSize()
404 // because I don't want to call any non-native functions here.
409 int yy
= m_miniEdge
+ m_miniTitle
;
410 int ww
= m_width
- 2*m_miniEdge
;
411 int hh
= wxMENU_HEIGHT
;
412 m_frameMenuBar
->m_x
= xx
;
413 m_frameMenuBar
->m_y
= yy
;
414 m_frameMenuBar
->m_width
= ww
;
415 m_frameMenuBar
->m_height
= hh
;
417 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameMenuBar
->m_widget
, xx
, yy
);
418 gtk_widget_set_usize( m_frameMenuBar
->m_widget
, ww
, hh
);
424 int yy
= m_miniEdge
+ m_miniTitle
;
425 if (m_frameMenuBar
) yy
+= wxMENU_HEIGHT
;
426 int ww
= m_width
- 2*m_miniEdge
;
427 int hh
= m_frameToolBar
->m_height
;
429 m_frameToolBar
->m_x
= xx
;
430 m_frameToolBar
->m_y
= yy
;
431 m_frameToolBar
->m_height
= hh
;
432 m_frameToolBar
->m_width
= ww
;
434 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameToolBar
->m_widget
, xx
, yy
);
435 gtk_widget_set_usize( m_frameToolBar
->m_widget
, ww
, hh
);
438 if (m_frameStatusBar
)
440 int xx
= 0 + m_miniEdge
;
441 int yy
= m_height
- wxSTATUS_HEIGHT
- m_miniEdge
;
442 int ww
= m_width
- 2*m_miniEdge
;
443 int hh
= wxSTATUS_HEIGHT
;
445 m_frameStatusBar
->m_x
= xx
;
446 m_frameStatusBar
->m_y
= yy
;
447 m_frameStatusBar
->m_width
= ww
;
448 m_frameStatusBar
->m_height
= hh
;
450 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameStatusBar
->m_widget
, xx
, yy
);
451 gtk_widget_set_usize( m_frameStatusBar
->m_widget
, ww
, hh
);
456 /* send size event to frame */
458 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
459 event
.SetEventObject( this );
460 GetEventHandler()->ProcessEvent( event
);
462 /* send size event to status bar */
464 if (m_frameStatusBar
)
466 wxSizeEvent
event2( wxSize(m_frameStatusBar
->m_width
,m_frameStatusBar
->m_height
), m_frameStatusBar
->GetId() );
467 event2
.SetEventObject( m_frameStatusBar
);
468 m_frameStatusBar
->GetEventHandler()->ProcessEvent( event2
);
474 void wxFrame::OnInternalIdle()
477 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
482 void wxFrame::OnSize( wxSizeEvent
&WXUNUSED(event
) )
484 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
492 // no child: go out !
493 if (!GetChildren().First()) return;
495 // do we have exactly one child?
496 wxWindow
*child
= (wxWindow
*) NULL
;
497 for(wxNode
*node
= GetChildren().First(); node
; node
= node
->Next())
499 wxWindow
*win
= (wxWindow
*)node
->Data();
500 if (!wxIS_KIND_OF(win
,wxFrame
) && !wxIS_KIND_OF(win
,wxDialog
)
501 #if 0 // not in m_children anyway ?
502 && (win
!= m_frameMenuBar
) &&
503 (win
!= m_frameToolBar
) &&
504 (win
!= m_frameStatusBar
)
508 // it's the second one: do nothing
514 // yes: set it's size to fill all the frame
515 int client_x
, client_y
;
516 GetClientSize( &client_x
, &client_y
);
517 child
->SetSize( 1, 1, client_x
-2, client_y
-2 );
521 static void SetInvokingWindow( wxMenu
*menu
, wxWindow
*win
)
523 menu
->SetInvokingWindow( win
);
524 wxNode
*node
= menu
->m_items
.First();
527 wxMenuItem
*menuitem
= (wxMenuItem
*)node
->Data();
528 if (menuitem
->IsSubMenu())
529 SetInvokingWindow( menuitem
->GetSubMenu(), win
);
534 void wxFrame::SetMenuBar( wxMenuBar
*menuBar
)
536 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
537 wxASSERT_MSG( (m_wxwindow
!= NULL
), "invalid frame" );
539 m_frameMenuBar
= menuBar
;
543 wxNode
*node
= m_frameMenuBar
->m_menus
.First();
546 wxMenu
*menu
= (wxMenu
*)node
->Data();
547 SetInvokingWindow( menu
, this );
551 if (m_frameMenuBar
->m_parent
!= this)
553 m_frameMenuBar
->m_parent
= this;
554 gtk_myfixed_put( GTK_MYFIXED(m_wxwindow
),
555 m_frameMenuBar
->m_widget
, m_frameMenuBar
->m_x
, m_frameMenuBar
->m_y
);
562 wxMenuBar
*wxFrame::GetMenuBar() const
564 return m_frameMenuBar
;
567 wxToolBar
* wxFrame::CreateToolBar(long style
, wxWindowID id
, const wxString
& name
)
569 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
571 wxCHECK_MSG( m_frameToolBar
== NULL
, FALSE
, "recreating toolbar in wxFrame" );
573 m_frameToolBar
= OnCreateToolBar( style
, id
, name
);
575 GetChildren().DeleteObject( m_frameToolBar
);
579 return m_frameToolBar
;
582 wxToolBar
* wxFrame::OnCreateToolBar( long style
, wxWindowID id
, const wxString
& name
)
584 return new wxToolBar( this, id
, wxDefaultPosition
, wxDefaultSize
, style
, name
);
587 wxToolBar
*wxFrame::GetToolBar() const
589 return m_frameToolBar
;
592 wxStatusBar
* wxFrame::CreateStatusBar( int number
, long style
, wxWindowID id
, const wxString
& name
)
594 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
596 wxCHECK_MSG( m_frameStatusBar
== NULL
, FALSE
, "recreating status bar in wxFrame" );
598 m_frameStatusBar
= OnCreateStatusBar( number
, style
, id
, name
);
602 return m_frameStatusBar
;
605 wxStatusBar
*wxFrame::OnCreateStatusBar( int number
, long style
, wxWindowID id
, const wxString
& name
)
607 wxStatusBar
*statusBar
= (wxStatusBar
*) NULL
;
609 statusBar
= new wxStatusBar(this, id
, wxPoint(0, 0), wxSize(100, 20), style
, name
);
611 // Set the height according to the font and the border size
612 wxClientDC
dc(statusBar
);
613 dc
.SetFont( statusBar
->GetFont() );
616 dc
.GetTextExtent( "X", &x
, &y
);
618 int height
= (int)( (y
* 1.1) + 2* statusBar
->GetBorderY());
620 statusBar
->SetSize( -1, -1, 100, height
);
622 statusBar
->SetFieldsCount( number
);
626 void wxFrame::SetStatusText(const wxString
& text
, int number
)
628 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
630 wxCHECK_RET( m_frameStatusBar
!= NULL
, "no statusbar to set text for" );
632 m_frameStatusBar
->SetStatusText(text
, number
);
635 void wxFrame::SetStatusWidths(int n
, const int widths_field
[] )
637 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
639 wxCHECK_RET( m_frameStatusBar
!= NULL
, "no statusbar to set widths for" );
641 m_frameStatusBar
->SetStatusWidths(n
, widths_field
);
644 wxStatusBar
*wxFrame::GetStatusBar() const
646 return m_frameStatusBar
;
649 void wxFrame::SetTitle( const wxString
&title
)
651 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
654 if (m_title
.IsNull()) m_title
= "";
655 gtk_window_set_title( GTK_WINDOW(m_widget
), title
);
658 void wxFrame::SetIcon( const wxIcon
&icon
)
660 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
663 if (!icon
.Ok()) return;
665 wxMask
*mask
= icon
.GetMask();
666 GdkBitmap
*bm
= (GdkBitmap
*) NULL
;
667 if (mask
) bm
= mask
->GetBitmap();
669 gdk_window_set_icon( m_widget
->window
, (GdkWindow
*) NULL
, icon
.GetPixmap(), bm
);