+#include "wx/dcclient.h"
+
+#if wxUSE_TOOLBAR
+ #include "wx/toolbar.h"
+#endif
+#if wxUSE_STATUSBAR
+ #include "wx/statusbr.h"
+#endif
+
+// ----------------------------------------------------------------------------
+// event table
+// ----------------------------------------------------------------------------
+
+BEGIN_EVENT_TABLE(wxFrameBase, wxWindow)
+ EVT_IDLE(wxFrameBase::OnIdle)
+ EVT_CLOSE(wxFrameBase::OnCloseWindow)
+ EVT_MENU_HIGHLIGHT_ALL(wxFrameBase::OnMenuHighlight)
+ EVT_SIZE(wxFrameBase::OnSize)
+END_EVENT_TABLE()
+
+// ============================================================================
+// implementation
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// construction/destruction
+// ----------------------------------------------------------------------------
+
+wxFrameBase::wxFrameBase()
+{
+ m_frameMenuBar = NULL;
+
+#if wxUSE_TOOLBAR
+ m_frameToolBar = NULL;
+#endif // wxUSE_TOOLBAR
+
+#if wxUSE_STATUSBAR
+ m_frameStatusBar = NULL;
+#endif // wxUSE_STATUSBAR
+}
+
+bool wxFrameBase::Destroy()
+{
+ // delayed destruction: the frame will be deleted during the next idle
+ // loop iteration
+ if ( !wxPendingDelete.Member(this) )
+ wxPendingDelete.Append(this);
+
+ return TRUE;
+}
+
+wxFrame *wxFrameBase::New(wxWindow *parent,
+ wxWindowID id,
+ const wxString& title,
+ const wxPoint& pos,
+ const wxSize& size,
+ long style,
+ const wxString& name)
+{
+ return new wxFrame(parent, id, title, pos, size, style, name);
+}
+
+void wxFrameBase::DeleteAllBars()
+{
+ if ( m_frameMenuBar )
+ {
+ delete m_frameMenuBar;
+ m_frameMenuBar = (wxMenuBar *) NULL;
+ }
+
+#if wxUSE_STATUSBAR
+ if ( m_frameStatusBar )
+ {
+ delete m_frameStatusBar;
+ m_frameStatusBar = (wxStatusBar *) NULL;
+ }
+#endif // wxUSE_STATUSBAR
+
+#if wxUSE_TOOLBAR
+ if ( m_frameToolBar )
+ {
+ delete m_frameToolBar;
+ m_frameToolBar = (wxToolBar *) NULL;
+ }
+#endif // wxUSE_TOOLBAR
+}
+
+// ----------------------------------------------------------------------------
+// wxFrame size management: we exclude the areas taken by menu/status/toolbars
+// from the client area, so the client area is what's really available for the
+// frame contents
+// ----------------------------------------------------------------------------
+
+// get the origin of the client area in the client coordinates
+wxPoint wxFrameBase::GetClientAreaOrigin() const
+{
+ wxPoint pt(0, 0);
+
+#if wxUSE_TOOLBAR
+ if ( GetToolBar() && GetToolBar()->IsShown() )
+ {
+ int w, h;
+ GetToolBar()->GetSize(& w, & h);
+
+ if ( GetToolBar()->GetWindowStyleFlag() & wxTB_VERTICAL )
+ {
+ pt.x += w;
+ }
+ else
+ {
+ pt.y += h;
+ }
+ }
+#endif // wxUSE_TOOLBAR
+
+ return pt;
+}
+
+void wxFrameBase::DoScreenToClient(int *x, int *y) const
+{
+ wxWindow::DoScreenToClient(x, y);
+
+ // We may be faking the client origin.
+ // So a window that's really at (0, 30) may appear
+ // (to wxWin apps) to be at (0, 0).
+ wxPoint pt(GetClientAreaOrigin());
+ *x -= pt.x;
+ *y -= pt.y;
+}
+
+void wxFrameBase::DoClientToScreen(int *x, int *y) const
+{
+ // We may be faking the client origin.
+ // So a window that's really at (0, 30) may appear
+ // (to wxWin apps) to be at (0, 0).
+ wxPoint pt1(GetClientAreaOrigin());
+ *x += pt1.x;
+ *y += pt1.y;
+
+ wxWindow::DoClientToScreen(x, y);
+}
+
+// ----------------------------------------------------------------------------
+// misc
+// ----------------------------------------------------------------------------
+
+// make the window modal (all other windows unresponsive)
+void wxFrameBase::MakeModal(bool modal)
+{
+ if ( modal )
+ {
+ wxEnableTopLevelWindows(FALSE);
+ Enable(TRUE); // keep this window enabled
+ }
+ else
+ {
+ wxEnableTopLevelWindows(TRUE);
+ }
+}
+
+bool wxFrameBase::ProcessCommand(int id)
+{
+ wxMenuBar *bar = GetMenuBar();
+ if ( !bar )
+ return FALSE;
+
+ wxCommandEvent commandEvent(wxEVT_COMMAND_MENU_SELECTED, id);
+ commandEvent.SetEventObject(this);
+
+ wxMenuItem *item = bar->FindItem(id);
+ if ( item && item->IsCheckable() )
+ {
+ item->Toggle();
+
+ // use the new value
+ commandEvent.SetInt(item->IsChecked());
+ }
+
+ return GetEventHandler()->ProcessEvent(commandEvent);
+}
+
+// ----------------------------------------------------------------------------
+// event handlers
+// ----------------------------------------------------------------------------
+
+// default resizing behaviour - if only ONE subwindow, resize to fill the
+// whole client area
+void wxFrameBase::OnSize(wxSizeEvent& WXUNUSED(event))
+{
+ // if we're using constraints - do use them
+#if wxUSE_CONSTRAINTS
+ if ( GetAutoLayout() )
+ {
+ Layout();
+ }
+ else
+#endif
+ {
+ // do we have _exactly_ one child?
+ wxWindow *child = (wxWindow *)NULL;
+ for ( wxWindowList::Node *node = GetChildren().GetFirst();
+ node;
+ node = node->GetNext() )
+ {
+ wxWindow *win = node->GetData();
+
+ // exclude top level and managed windows (status bar isn't
+ // currently in the children list except under wxMac anyhow, but
+ // it makes no harm to test for it)
+ if ( !win->IsTopLevel()
+#if wxUSE_STATUSBAR
+ && (win != GetStatusBar())
+#endif // wxUSE_STATUSBAR
+#if wxUSE_TOOLBAR
+ && (win != GetToolBar())
+#endif // wxUSE_TOOLBAR
+ )
+ {
+ if ( child )
+ {
+ return; // it's our second subwindow - nothing to do
+ }
+
+ child = win;
+ }
+ }
+
+ // do we have any children at all?
+ if ( child )
+ {
+ // exactly one child - set it's size to fill the whole frame
+ int clientW, clientH;
+ DoGetClientSize(&clientW, &clientH);
+
+ // for whatever reasons, wxGTK wants to have a small offset - it
+ // probably looks better with it?
+#ifdef __WXGTK__
+ static const int ofs = 1;
+#else
+ static const int ofs = 0;
+#endif
+
+ child->SetSize(ofs, ofs, clientW - 2*ofs, clientH - 2*ofs);
+ }
+ }
+}
+
+// The default implementation for the close window event.
+void wxFrameBase::OnCloseWindow(wxCloseEvent& WXUNUSED(event))
+{
+ Destroy();
+}
+
+void wxFrameBase::OnMenuHighlight(wxMenuEvent& event)
+{
+#if wxUSE_STATUSBAR
+ (void)ShowMenuHelp(GetStatusBar(), event.GetMenuId());
+#endif // wxUSE_STATUSBAR
+}
+
+// ----------------------------------------------------------------------------
+// status bar stuff
+// ----------------------------------------------------------------------------
+
+#if wxUSE_STATUSBAR
+
+wxStatusBar* wxFrameBase::CreateStatusBar(int number,
+ long style,
+ wxWindowID id,
+ const wxString& name)
+{
+ // the main status bar can only be created once (or else it should be
+ // deleted before calling CreateStatusBar() again)
+ wxCHECK_MSG( !m_frameStatusBar, (wxStatusBar *)NULL,
+ wxT("recreating status bar in wxFrame") );
+
+ m_frameStatusBar = OnCreateStatusBar( number, style, id, name );
+ if ( m_frameStatusBar )
+ PositionStatusBar();
+
+ return m_frameStatusBar;
+}
+
+wxStatusBar *wxFrameBase::OnCreateStatusBar(int number,
+ long style,
+ wxWindowID id,
+ const wxString& name)
+{
+ wxStatusBar *statusBar = new wxStatusBar(this, id, style, name);
+
+ // Set the height according to the font and the border size
+ wxClientDC dc(statusBar);
+ dc.SetFont(statusBar->GetFont());
+
+ wxCoord y;
+ dc.GetTextExtent( "X", NULL, &y );
+
+ int height = (int)( (11*y)/10 + 2*statusBar->GetBorderY());
+
+ statusBar->SetSize( -1, -1, -1, height );
+
+ statusBar->SetFieldsCount(number);
+
+ return statusBar;
+}