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
;
97 //-----------------------------------------------------------------------------
99 //-----------------------------------------------------------------------------
101 BEGIN_EVENT_TABLE(wxFrame
, wxWindow
)
102 EVT_SIZE(wxFrame::OnSize
)
103 EVT_CLOSE(wxFrame::OnCloseWindow
)
104 EVT_IDLE(wxFrame::OnIdle
)
107 IMPLEMENT_DYNAMIC_CLASS(wxFrame
,wxWindow
)
111 m_frameMenuBar
= (wxMenuBar
*) NULL
;
112 m_frameStatusBar
= (wxStatusBar
*) NULL
;
113 m_frameToolBar
= (wxToolBar
*) NULL
;
119 wxFrame::wxFrame( wxWindow
*parent
, wxWindowID id
, const wxString
&title
,
120 const wxPoint
&pos
, const wxSize
&size
,
121 long style
, const wxString
&name
)
123 m_frameMenuBar
= (wxMenuBar
*) NULL
;
124 m_frameStatusBar
= (wxStatusBar
*) NULL
;
125 m_frameToolBar
= (wxToolBar
*) NULL
;
129 Create( parent
, id
, title
, pos
, size
, style
, name
);
132 bool wxFrame::Create( wxWindow
*parent
, wxWindowID id
, const wxString
&title
,
133 const wxPoint
&pos
, const wxSize
&size
,
134 long style
, const wxString
&name
)
136 wxTopLevelWindows
.Append( this );
138 m_needParent
= FALSE
;
140 PreCreation( parent
, id
, pos
, size
, style
, name
);
144 GtkWindowType win_type
= GTK_WINDOW_TOPLEVEL
;
145 if (style
& wxSIMPLE_BORDER
) win_type
= GTK_WINDOW_POPUP
;
147 m_widget
= gtk_window_new( win_type
);
150 debug_focus_in( m_widget
, "wxFrame::m_widget", name
);
153 if ((size
.x
!= -1) && (size
.y
!= -1))
154 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
155 if ((pos
.x
!= -1) && (pos
.y
!= -1))
156 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
158 gtk_window_set_title( GTK_WINDOW(m_widget
), title
);
159 GTK_WIDGET_UNSET_FLAGS( m_widget
, GTK_CAN_FOCUS
);
161 gtk_widget_set( m_widget
, "GtkWindow::allow_shrink", TRUE
, NULL
);
163 gtk_signal_connect( GTK_OBJECT(m_widget
), "delete_event",
164 GTK_SIGNAL_FUNC(gtk_frame_delete_callback
), (gpointer
)this );
166 m_wxwindow
= gtk_myfixed_new();
167 gtk_widget_show( m_wxwindow
);
168 GTK_WIDGET_UNSET_FLAGS( m_wxwindow
, GTK_CAN_FOCUS
);
171 debug_focus_in( m_wxwindow
, "wxFrame::m_wxwindow", name
);
174 gtk_container_add( GTK_CONTAINER(m_widget
), m_wxwindow
);
176 gtk_signal_connect( GTK_OBJECT(m_widget
), "size_allocate",
177 GTK_SIGNAL_FUNC(gtk_frame_size_callback
), (gpointer
)this );
179 gtk_signal_connect( GTK_OBJECT(m_widget
), "configure_event",
180 GTK_SIGNAL_FUNC(gtk_frame_configure_callback
), (gpointer
)this );
182 if (m_parent
) m_parent
->AddChild( this );
191 if (m_frameMenuBar
) delete m_frameMenuBar
;
192 if (m_frameStatusBar
) delete m_frameStatusBar
;
193 if (m_frameToolBar
) delete m_frameToolBar
;
195 wxTopLevelWindows
.DeleteObject( this );
197 if (wxTheApp
->GetTopWindow() == this)
199 wxTheApp
->SetTopWindow( (wxWindow
*) NULL
);
202 if (wxTopLevelWindows
.Number() == 0)
204 wxTheApp
->ExitMainLoop();
208 bool wxFrame::Show( bool show
)
210 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
212 if (show
&& !m_sizeSet
)
214 // by calling GtkOnSize here, we don't have to call
215 // either after showing the frame, which would entail
216 // much ugly flicker nor from within the size_allocate
217 // handler, because GTK 1.1.X forbids that.
219 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
222 return wxWindow::Show( show
);
225 void wxFrame::OnCloseWindow( wxCloseEvent
&event
)
227 if (GetEventHandler()->OnClose() || event
.GetForce()) this->Destroy();
230 bool wxFrame::Destroy()
232 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
234 if (!wxPendingDelete
.Member(this)) wxPendingDelete
.Append(this);
239 wxPoint
wxFrame::GetClientAreaOrigin() const
241 wxPoint
pt( m_miniEdge
, m_miniEdge
+ m_miniTitle
);
245 m_frameMenuBar
->GetSize( (int*)NULL
, &h
);
251 m_frameToolBar
->GetSize( (int*)NULL
, &h
);
257 void wxFrame::SetSize( int x
, int y
, int width
, int height
, int sizeFlags
)
259 wxASSERT_MSG( (m_widget
!= NULL
), "invalid window" );
261 // Don't do anything for children of wxMDIChildFrame
262 if (!m_wxwindow
) return;
264 if (m_resizing
) return; // I don't like recursions
269 int old_width
= m_width
;
270 int old_height
= m_height
;
272 if ((sizeFlags
& wxSIZE_USE_EXISTING
) == wxSIZE_USE_EXISTING
)
274 if (x
!= -1) m_x
= x
;
275 if (y
!= -1) m_y
= y
;
276 if (width
!= -1) m_width
= width
;
277 if (height
!= -1) m_height
= height
;
287 if ((sizeFlags
& wxSIZE_AUTO_WIDTH
) == wxSIZE_AUTO_WIDTH
)
289 if (width
== -1) m_width
= 80;
292 if ((sizeFlags
& wxSIZE_AUTO_HEIGHT
) == wxSIZE_AUTO_HEIGHT
)
294 if (height
== -1) m_height
= 26;
297 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
298 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
299 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_minWidth
;
300 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_minHeight
;
302 if ((m_x
!= -1) || (m_y
!= -1))
304 if ((m_x
!= old_x
) || (m_y
!= old_y
))
305 gtk_widget_set_uposition( m_widget
, m_x
, m_y
);
308 if ((m_width
!= old_width
) || (m_height
!= old_height
))
310 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
313 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
314 event
.SetEventObject( this );
315 GetEventHandler()->ProcessEvent( event
);
320 void wxFrame::SetSize( int width
, int height
)
322 SetSize( -1, -1, width
, height
, wxSIZE_USE_EXISTING
);
325 void wxFrame::Centre( int direction
)
327 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
332 if (direction
& wxHORIZONTAL
== wxHORIZONTAL
) x
= (gdk_screen_width () - m_width
) / 2;
333 if (direction
& wxVERTICAL
== wxVERTICAL
) y
= (gdk_screen_height () - m_height
) / 2;
338 void wxFrame::GetClientSize( int *width
, int *height
) const
340 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
342 wxWindow::GetClientSize( width
, height
);
345 if (m_frameMenuBar
) (*height
) -= wxMENU_HEIGHT
;
346 if (m_frameStatusBar
) (*height
) -= wxSTATUS_HEIGHT
;
350 m_frameToolBar
->GetSize( (int *) NULL
, &y
);
353 (*height
) -= m_miniEdge
*2 + m_miniTitle
;
357 (*width
) -= m_miniEdge
*2;
361 void wxFrame::SetClientSize( int const width
, int const height
)
363 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
366 if (m_frameMenuBar
) h
+= wxMENU_HEIGHT
;
367 if (m_frameStatusBar
) h
+= wxSTATUS_HEIGHT
;
371 m_frameToolBar
->GetSize( (int *) NULL
, &y
);
374 wxWindow::SetClientSize( width
+ m_miniEdge
*2, h
+ m_miniEdge
*2 + m_miniTitle
);
377 void wxFrame::GtkOnSize( int WXUNUSED(x
), int WXUNUSED(y
), int width
, int height
)
379 // due to a bug in gtk, x,y are always 0
383 if (m_resizing
) return;
386 if (!m_wxwindow
) return;
391 if ((m_minWidth
!= -1) && (m_width
< m_minWidth
)) m_width
= m_minWidth
;
392 if ((m_minHeight
!= -1) && (m_height
< m_minHeight
)) m_height
= m_minHeight
;
393 if ((m_maxWidth
!= -1) && (m_width
> m_maxWidth
)) m_width
= m_minWidth
;
394 if ((m_maxHeight
!= -1) && (m_height
> m_maxHeight
)) m_height
= m_minHeight
;
396 gtk_widget_set_usize( m_widget
, m_width
, m_height
);
398 // this emulates the new wxMSW behaviour of placing all
399 // frame-subwindows (menu, toolbar..) on one native window
400 // OK, this hurts in the eye, but I don't want to call SetSize()
401 // because I don't want to call any non-native functions here.
406 int yy
= m_miniEdge
+ m_miniTitle
;
407 int ww
= m_width
- 2*m_miniEdge
;
408 int hh
= wxMENU_HEIGHT
;
409 m_frameMenuBar
->m_x
= xx
;
410 m_frameMenuBar
->m_y
= yy
;
411 m_frameMenuBar
->m_width
= ww
;
412 m_frameMenuBar
->m_height
= hh
;
414 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameMenuBar
->m_widget
, xx
, yy
);
415 gtk_widget_set_usize( m_frameMenuBar
->m_widget
, ww
, hh
);
421 int yy
= m_miniEdge
+ m_miniTitle
;
422 if (m_frameMenuBar
) yy
+= wxMENU_HEIGHT
;
423 int ww
= m_width
- 2*m_miniEdge
;
424 int hh
= m_frameToolBar
->m_height
;
426 m_frameToolBar
->m_x
= xx
;
427 m_frameToolBar
->m_y
= yy
;
428 m_frameToolBar
->m_height
= hh
;
429 m_frameToolBar
->m_width
= ww
;
431 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameToolBar
->m_widget
, xx
, yy
);
432 gtk_widget_set_usize( m_frameToolBar
->m_widget
, ww
, hh
);
435 if (m_frameStatusBar
)
437 int xx
= 0 + m_miniEdge
;
438 int yy
= m_height
- wxSTATUS_HEIGHT
- m_miniEdge
;
439 int ww
= m_width
- 2*m_miniEdge
;
440 int hh
= wxSTATUS_HEIGHT
;
442 m_frameStatusBar
->m_x
= xx
;
443 m_frameStatusBar
->m_y
= yy
;
444 m_frameStatusBar
->m_width
= ww
;
445 m_frameStatusBar
->m_height
= hh
;
447 gtk_myfixed_move( GTK_MYFIXED(m_wxwindow
), m_frameStatusBar
->m_widget
, xx
, yy
);
448 gtk_widget_set_usize( m_frameStatusBar
->m_widget
, ww
, hh
);
453 wxSizeEvent
event( wxSize(m_width
,m_height
), GetId() );
454 event
.SetEventObject( this );
455 GetEventHandler()->ProcessEvent( event
);
460 void wxFrame::OnIdle(wxIdleEvent
& WXUNUSED(event
) )
463 GtkOnSize( m_x
, m_y
, m_width
, m_height
);
468 void wxFrame::OnSize( wxSizeEvent
&WXUNUSED(event
) )
470 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
478 // no child: go out !
479 if (!GetChildren().First()) return;
481 // do we have exactly one child?
482 wxWindow
*child
= (wxWindow
*) NULL
;
483 for(wxNode
*node
= GetChildren().First(); node
; node
= node
->Next())
485 wxWindow
*win
= (wxWindow
*)node
->Data();
486 if (!wxIS_KIND_OF(win
,wxFrame
) && !wxIS_KIND_OF(win
,wxDialog
)
487 #if 0 // not in m_children anyway ?
488 && (win
!= m_frameMenuBar
) &&
489 (win
!= m_frameToolBar
) &&
490 (win
!= m_frameStatusBar
)
494 // it's the second one: do nothing
500 // yes: set it's size to fill all the frame
501 int client_x
, client_y
;
502 GetClientSize( &client_x
, &client_y
);
503 child
->SetSize( 1, 1, client_x
-2, client_y
-2 );
507 static void SetInvokingWindow( wxMenu
*menu
, wxWindow
*win
)
509 menu
->SetInvokingWindow( win
);
510 wxNode
*node
= menu
->m_items
.First();
513 wxMenuItem
*menuitem
= (wxMenuItem
*)node
->Data();
514 if (menuitem
->IsSubMenu())
515 SetInvokingWindow( menuitem
->GetSubMenu(), win
);
520 void wxFrame::SetMenuBar( wxMenuBar
*menuBar
)
522 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
523 wxASSERT_MSG( (m_wxwindow
!= NULL
), "invalid frame" );
525 m_frameMenuBar
= menuBar
;
529 wxNode
*node
= m_frameMenuBar
->m_menus
.First();
532 wxMenu
*menu
= (wxMenu
*)node
->Data();
533 SetInvokingWindow( menu
, this );
537 if (m_frameMenuBar
->m_parent
!= this)
539 m_frameMenuBar
->m_parent
= this;
540 gtk_myfixed_put( GTK_MYFIXED(m_wxwindow
),
541 m_frameMenuBar
->m_widget
, m_frameMenuBar
->m_x
, m_frameMenuBar
->m_y
);
545 if (m_sizeSet
) GtkOnSize( m_x
, m_y
, m_width
, m_height
);
548 wxMenuBar
*wxFrame::GetMenuBar() const
550 return m_frameMenuBar
;
553 wxToolBar
* wxFrame::CreateToolBar(long style
, wxWindowID id
, const wxString
& name
)
555 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
557 wxCHECK_MSG( m_frameToolBar
== NULL
, FALSE
, "recreating toolbar in wxFrame" );
559 m_frameToolBar
= OnCreateToolBar( style
, id
, name
);
561 GetChildren().DeleteObject( m_frameToolBar
);
563 if (m_sizeSet
) GtkOnSize( m_x
, m_y
, m_width
, m_height
);
565 return m_frameToolBar
;
568 wxToolBar
* wxFrame::OnCreateToolBar( long style
, wxWindowID id
, const wxString
& name
)
570 return new wxToolBar( this, id
, wxDefaultPosition
, wxDefaultSize
, style
, name
);
573 wxToolBar
*wxFrame::GetToolBar() const
575 return m_frameToolBar
;
578 wxStatusBar
* wxFrame::CreateStatusBar( int number
, long style
, wxWindowID id
, const wxString
& name
)
580 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
582 wxCHECK_MSG( m_frameStatusBar
== NULL
, FALSE
, "recreating status bar in wxFrame" );
584 m_frameStatusBar
= OnCreateStatusBar( number
, style
, id
, name
);
586 if (m_sizeSet
) GtkOnSize( m_x
, m_y
, m_width
, m_height
);
588 return m_frameStatusBar
;
591 wxStatusBar
*wxFrame::OnCreateStatusBar( int number
, long style
, wxWindowID id
, const wxString
& name
)
593 wxStatusBar
*statusBar
= (wxStatusBar
*) NULL
;
595 statusBar
= new wxStatusBar(this, id
, wxPoint(0, 0), wxSize(100, 20), style
, name
);
597 // Set the height according to the font and the border size
598 wxClientDC
dc(statusBar
);
599 dc
.SetFont( statusBar
->GetFont() );
602 dc
.GetTextExtent( "X", &x
, &y
);
604 int height
= (int)( (y
* 1.1) + 2* statusBar
->GetBorderY());
606 statusBar
->SetSize( -1, -1, 100, height
);
608 statusBar
->SetFieldsCount( number
);
612 void wxFrame::SetStatusText(const wxString
& text
, int number
)
614 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
616 wxCHECK_RET( m_frameStatusBar
!= NULL
, "no statusbar to set text for" );
618 m_frameStatusBar
->SetStatusText(text
, number
);
621 void wxFrame::SetStatusWidths(int n
, const int widths_field
[] )
623 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
625 wxCHECK_RET( m_frameStatusBar
!= NULL
, "no statusbar to set widths for" );
627 m_frameStatusBar
->SetStatusWidths(n
, widths_field
);
630 wxStatusBar
*wxFrame::GetStatusBar() const
632 return m_frameStatusBar
;
635 void wxFrame::SetTitle( const wxString
&title
)
637 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
640 if (m_title
.IsNull()) m_title
= "";
641 gtk_window_set_title( GTK_WINDOW(m_widget
), title
);
644 void wxFrame::SetIcon( const wxIcon
&icon
)
646 wxASSERT_MSG( (m_widget
!= NULL
), "invalid frame" );
649 if (!icon
.Ok()) return;
651 wxMask
*mask
= icon
.GetMask();
652 GdkBitmap
*bm
= (GdkBitmap
*) NULL
;
653 if (mask
) bm
= mask
->GetBitmap();
655 gdk_window_set_icon( m_widget
->window
, (GdkWindow
*) NULL
, icon
.GetPixmap(), bm
);