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
)
108 EVT_MENU_HIGHLIGHT_ALL(wxFrame::OnMenuHighlight
)
111 IMPLEMENT_DYNAMIC_CLASS(wxFrame
,wxWindow
)
115 m_frameMenuBar
= (wxMenuBar
*) NULL
;
116 m_frameStatusBar
= (wxStatusBar
*) NULL
;
117 m_frameToolBar
= (wxToolBar
*) NULL
;
123 wxFrame::wxFrame( wxWindow
*parent
, wxWindowID id
, const wxString
&title
,
124 const wxPoint
&pos
, const wxSize
&size
,
125 long style
, const wxString
&name
)
127 m_frameMenuBar
= (wxMenuBar
*) NULL
;
128 m_frameStatusBar
= (wxStatusBar
*) NULL
;
129 m_frameToolBar
= (wxToolBar
*) NULL
;
133 Create( parent
, id
, title
, pos
, size
, style
, name
);
136 bool wxFrame::Create( wxWindow
*parent
, wxWindowID id
, const wxString
&title
,
137 const wxPoint
&pos
, const wxSize
&size
,
138 long style
, const wxString
&name
)
140 wxTopLevelWindows
.Append( this );
142 m_needParent
= FALSE
;
144 PreCreation( parent
, id
, pos
, size
, style
, name
);
148 GtkWindowType win_type
= GTK_WINDOW_TOPLEVEL
;
149 if (style
& wxSIMPLE_BORDER
) win_type
= GTK_WINDOW_POPUP
;
151 m_widget
= gtk_window_new( win_type
);
154 debug_focus_in( m_widget
, "wxFrame::m_widget", name
);
157 if ((size
.x
!= -1) && (size
.y
!= -1))
158 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
159 if ((pos
.x
!= -1) && (pos
.y
!= -1))
160 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
162 gtk_window_set_title( GTK_WINDOW(m_widget
), title
);
163 GTK_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
165 gtk_widget_set( m_widget
, "GtkWindow::allow_shrink", TRUE
, NULL
);
167 gtk_signal_connect( GTK_OBJECT(m_widget
), "delete_event",
168 GTK_SIGNAL_FUNC(gtk_frame_delete_callback
), (gpointer
)this );
170 m_wxwindow
= gtk_myfixed_new();
171 gtk_widget_show( m_wxwindow
);
172 GTK_WIDGET_UNSET_FLAGS( m_wxwindow
, GTK_CAN_FOCUS
);
175 debug_focus_in( m_wxwindow
, "wxFrame::m_wxwindow", name
);
178 gtk_container_add( GTK_CONTAINER(m_widget
), m_wxwindow
);
180 gtk_signal_connect( GTK_OBJECT(m_widget
), "size_allocate",
181 GTK_SIGNAL_FUNC(gtk_frame_size_callback
), (gpointer
)this );
183 gtk_signal_connect( GTK_OBJECT(m_widget
), "configure_event",
184 GTK_SIGNAL_FUNC(gtk_frame_configure_callback
), (gpointer
)this );
186 if (m_parent
) m_parent
->AddChild( this );
195 if (m_frameMenuBar
) delete m_frameMenuBar
;
196 if (m_frameStatusBar
) delete m_frameStatusBar
;
197 if (m_frameToolBar
) delete m_frameToolBar
;
199 wxTopLevelWindows
.DeleteObject( this );
201 if (wxTheApp
->GetTopWindow() == this)
203 wxTheApp
->SetTopWindow( (wxWindow
*) NULL
);
206 if (wxTopLevelWindows
.Number() == 0)
208 wxTheApp
->ExitMainLoop();
212 bool wxFrame::Show( bool show
)
214 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
216 if (show
&& !m_sizeSet
)
218 // by calling GtkOnSize here, we don't have to call
219 // either after showing the frame, which would entail
220 // much ugly flicker nor from within the size_allocate
221 // handler, because GTK 1.1.X forbids that.
223 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
226 return wxWindow::Show( show
);
229 void wxFrame::OnCloseWindow( wxCloseEvent
&event
)
231 if (GetEventHandler()->OnClose() || event
.GetForce()) this->Destroy();
234 bool wxFrame::Destroy()
236 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
238 if (!wxPendingDelete
.Member(this)) wxPendingDelete
.Append(this);
243 wxPoint
wxFrame::GetClientAreaOrigin() const
245 wxPoint
pt( m_miniEdge
, m_miniEdge
+ m_miniTitle
);
249 m_frameMenuBar
->GetSize( (int*)NULL
, &h
);
255 m_frameToolBar
->GetSize( (int*)NULL
, &h
);
261 void wxFrame::SetSize( int x
, int y
, int width
, int height
, int sizeFlags
)
263 wxASSERT_MSG( (m_widget
!= NULL
), "invalid window" );
265 // Don't do anything for children of wxMDIChildFrame
266 if (!m_wxwindow
) return;
268 if (m_resizing
) return; // I don't like recursions
273 int old_width
= m_width
;
274 int old_height
= m_height
;
276 if ((sizeFlags
& wxSIZE_USE_EXISTING
) == wxSIZE_USE_EXISTING
)
278 if (x
!= -1) m_x
= x
;
279 if (y
!= -1) m_y
= y
;
280 if (width
!= -1) m_width
= width
;
281 if (height
!= -1) m_height
= height
;
291 if ((sizeFlags
& wxSIZE_AUTO_WIDTH
) == wxSIZE_AUTO_WIDTH
)
293 if (width
== -1) m_width
= 80;
296 if ((sizeFlags
& wxSIZE_AUTO_HEIGHT
) == wxSIZE_AUTO_HEIGHT
)
298 if (height
== -1) m_height
= 26;
301 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
302 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
303 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_maxWidth
;
304 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_maxHeight
;
306 if ((m_x
!= -1) || (m_y
!= -1))
308 if ((m_x
!= old_x
) || (m_y
!= old_y
))
309 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
312 if ((m_width
!= old_width
) || (m_height
!= old_height
))
314 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
317 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
318 event
.SetEventObject( this );
319 GetEventHandler()->ProcessEvent( event
);
324 void wxFrame::SetSize( int width
, int height
)
326 SetSize( -1, -1, width
, height
, wxSIZE_USE_EXISTING
);
329 void wxFrame::Centre( int direction
)
331 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
336 if (direction
& wxHORIZONTAL
== wxHORIZONTAL
) x
= (gdk_screen_width () - m_width
) / 2;
337 if (direction
& wxVERTICAL
== wxVERTICAL
) y
= (gdk_screen_height () - m_height
) / 2;
342 void wxFrame::GetClientSize( int *width
, int *height
) const
344 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
346 wxWindow::GetClientSize( width
, height
);
349 if (m_frameMenuBar
) (*height
) -= wxMENU_HEIGHT
;
350 if (m_frameStatusBar
) (*height
) -= wxSTATUS_HEIGHT
;
354 m_frameToolBar
->GetSize( (int *) NULL
, &y
);
357 (*height
) -= m_miniEdge
*2 + m_miniTitle
;
361 (*width
) -= m_miniEdge
*2;
365 void wxFrame::SetClientSize( int const width
, int const height
)
367 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
370 if (m_frameMenuBar
) h
+= wxMENU_HEIGHT
;
371 if (m_frameStatusBar
) h
+= wxSTATUS_HEIGHT
;
375 m_frameToolBar
->GetSize( (int *) NULL
, &y
);
378 wxWindow::SetClientSize( width
+ m_miniEdge
*2, h
+ m_miniEdge
*2 + m_miniTitle
);
381 void wxFrame::GtkOnSize( int WXUNUSED(x
), int WXUNUSED(y
), int width
, int height
)
383 // due to a bug in gtk, x,y are always 0
387 if (m_resizing
) return;
390 if (!m_wxwindow
) return;
395 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
396 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
397 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_maxWidth
;
398 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_maxHeight
;
400 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
402 // this emulates the new wxMSW behaviour of placing all
403 // frame-subwindows (menu, toolbar..) on one native window
404 // OK, this hurts in the eye, but I don't want to call SetSize()
405 // because I don't want to call any non-native functions here.
410 int yy
= m_miniEdge
+ m_miniTitle
;
411 int ww
= m_width
- 2*m_miniEdge
;
412 int hh
= wxMENU_HEIGHT
;
413 m_frameMenuBar
->m_x
= xx
;
414 m_frameMenuBar
->m_y
= yy
;
415 m_frameMenuBar
->m_width
= ww
;
416 m_frameMenuBar
->m_height
= hh
;
418 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameMenuBar
->m_widget
, xx
, yy
);
419 gtk_widget_set_usize( m_frameMenuBar
->m_widget
, ww
, hh
);
425 int yy
= m_miniEdge
+ m_miniTitle
;
426 if (m_frameMenuBar
) yy
+= wxMENU_HEIGHT
;
427 int ww
= m_width
- 2*m_miniEdge
;
428 int hh
= m_frameToolBar
->m_height
;
430 m_frameToolBar
->m_x
= xx
;
431 m_frameToolBar
->m_y
= yy
;
432 m_frameToolBar
->m_height
= hh
;
433 m_frameToolBar
->m_width
= ww
;
435 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameToolBar
->m_widget
, xx
, yy
);
436 gtk_widget_set_usize( m_frameToolBar
->m_widget
, ww
, hh
);
439 if (m_frameStatusBar
)
441 int xx
= 0 + m_miniEdge
;
442 int yy
= m_height
- wxSTATUS_HEIGHT
- m_miniEdge
;
443 int ww
= m_width
- 2*m_miniEdge
;
444 int hh
= wxSTATUS_HEIGHT
;
446 m_frameStatusBar
->m_x
= xx
;
447 m_frameStatusBar
->m_y
= yy
;
448 m_frameStatusBar
->m_width
= ww
;
449 m_frameStatusBar
->m_height
= hh
;
451 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameStatusBar
->m_widget
, xx
, yy
);
452 gtk_widget_set_usize( m_frameStatusBar
->m_widget
, ww
, hh
);
457 /* send size event to frame */
459 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
460 event
.SetEventObject( this );
461 GetEventHandler()->ProcessEvent( event
);
463 /* send size event to status bar */
465 if (m_frameStatusBar
)
467 wxSizeEvent
event2( wxSize(m_frameStatusBar
->m_width
,m_frameStatusBar
->m_height
), m_frameStatusBar
->GetId() );
468 event2
.SetEventObject( m_frameStatusBar
);
469 m_frameStatusBar
->GetEventHandler()->ProcessEvent( event2
);
475 void wxFrame::OnInternalIdle()
478 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
483 void wxFrame::OnSize( wxSizeEvent
&WXUNUSED(event
) )
485 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
493 // no child: go out !
494 if (!GetChildren().First()) return;
496 // do we have exactly one child?
497 wxWindow
*child
= (wxWindow
*) NULL
;
498 for(wxNode
*node
= GetChildren().First(); node
; node
= node
->Next())
500 wxWindow
*win
= (wxWindow
*)node
->Data();
501 if (!wxIS_KIND_OF(win
,wxFrame
) && !wxIS_KIND_OF(win
,wxDialog
)
502 #if 0 // not in m_children anyway ?
503 && (win
!= m_frameMenuBar
) &&
504 (win
!= m_frameToolBar
) &&
505 (win
!= m_frameStatusBar
)
509 // it's the second one: do nothing
515 // yes: set it's size to fill all the frame
516 int client_x
, client_y
;
517 GetClientSize( &client_x
, &client_y
);
518 child
->SetSize( 1, 1, client_x
-2, client_y
-2 );
522 static void SetInvokingWindow( wxMenu
*menu
, wxWindow
*win
)
524 menu
->SetInvokingWindow( win
);
525 wxNode
*node
= menu
->m_items
.First();
528 wxMenuItem
*menuitem
= (wxMenuItem
*)node
->Data();
529 if (menuitem
->IsSubMenu())
530 SetInvokingWindow( menuitem
->GetSubMenu(), win
);
535 void wxFrame::SetMenuBar( wxMenuBar
*menuBar
)
537 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
538 wxASSERT_MSG( (m_wxwindow
!= NULL
), "invalid frame" );
540 m_frameMenuBar
= menuBar
;
544 wxNode
*node
= m_frameMenuBar
->m_menus
.First();
547 wxMenu
*menu
= (wxMenu
*)node
->Data();
548 SetInvokingWindow( menu
, this );
552 if (m_frameMenuBar
->m_parent
!= this)
554 m_frameMenuBar
->m_parent
= this;
555 gtk_myfixed_put( GTK_MYFIXED(m_wxwindow
),
556 m_frameMenuBar
->m_widget
, m_frameMenuBar
->m_x
, m_frameMenuBar
->m_y
);
563 wxMenuBar
*wxFrame::GetMenuBar() const
565 return m_frameMenuBar
;
568 void wxFrame::OnMenuHighlight(wxMenuEvent
& event
)
572 if (event
.GetMenuId() == -1)
578 wxMenuBar
*menuBar
= GetMenuBar();
581 int menuId
= event
.GetMenuId();
583 helpString
= menuBar
->GetHelpString(menuId
);
584 if (helpString
!= "")
585 SetStatusText(helpString
);
591 wxToolBar
* wxFrame::CreateToolBar(long style
, wxWindowID id
, const wxString
& name
)
593 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
595 wxCHECK_MSG( m_frameToolBar
== NULL
, FALSE
, "recreating toolbar in wxFrame" );
597 m_frameToolBar
= OnCreateToolBar( style
, id
, name
);
599 GetChildren().DeleteObject( m_frameToolBar
);
603 return m_frameToolBar
;
606 wxToolBar
* wxFrame::OnCreateToolBar( long style
, wxWindowID id
, const wxString
& name
)
608 return new wxToolBar( this, id
, wxDefaultPosition
, wxDefaultSize
, style
, name
);
611 wxToolBar
*wxFrame::GetToolBar() const
613 return m_frameToolBar
;
616 wxStatusBar
* wxFrame::CreateStatusBar( int number
, long style
, wxWindowID id
, const wxString
& name
)
618 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
620 wxCHECK_MSG( m_frameStatusBar
== NULL
, FALSE
, "recreating status bar in wxFrame" );
622 m_frameStatusBar
= OnCreateStatusBar( number
, style
, id
, name
);
626 return m_frameStatusBar
;
629 wxStatusBar
*wxFrame::OnCreateStatusBar( int number
, long style
, wxWindowID id
, const wxString
& name
)
631 wxStatusBar
*statusBar
= (wxStatusBar
*) NULL
;
633 statusBar
= new wxStatusBar(this, id
, wxPoint(0, 0), wxSize(100, 20), style
, name
);
635 // Set the height according to the font and the border size
636 wxClientDC
dc(statusBar
);
637 dc
.SetFont( statusBar
->GetFont() );
640 dc
.GetTextExtent( "X", &x
, &y
);
642 int height
= (int)( (y
* 1.1) + 2* statusBar
->GetBorderY());
644 statusBar
->SetSize( -1, -1, 100, height
);
646 statusBar
->SetFieldsCount( number
);
650 void wxFrame::SetStatusText(const wxString
& text
, int number
)
652 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
654 wxCHECK_RET( m_frameStatusBar
!= NULL
, "no statusbar to set text for" );
656 m_frameStatusBar
->SetStatusText(text
, number
);
659 void wxFrame::SetStatusWidths(int n
, const int widths_field
[] )
661 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
663 wxCHECK_RET( m_frameStatusBar
!= NULL
, "no statusbar to set widths for" );
665 m_frameStatusBar
->SetStatusWidths(n
, widths_field
);
668 wxStatusBar
*wxFrame::GetStatusBar() const
670 return m_frameStatusBar
;
673 void wxFrame::SetTitle( const wxString
&title
)
675 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
678 if (m_title
.IsNull()) m_title
= "";
679 gtk_window_set_title( GTK_WINDOW(m_widget
), title
);
682 void wxFrame::SetIcon( const wxIcon
&icon
)
684 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
687 if (!icon
.Ok()) return;
689 wxMask
*mask
= icon
.GetMask();
690 GdkBitmap
*bm
= (GdkBitmap
*) NULL
;
691 if (mask
) bm
= mask
->GetBitmap();
693 gdk_window_set_icon( m_widget
->window
, (GdkWindow
*) NULL
, icon
.GetPixmap(), bm
);