X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/47d67540a017101b3e46abe9ef0f55914d8de37e..836915e177aa750ca5c3bc19b4dbdedd36603e8d:/src/motif/mdi.cpp diff --git a/src/motif/mdi.cpp b/src/motif/mdi.cpp index 113f78c50a..4fa16b4cfe 100644 --- a/src/motif/mdi.cpp +++ b/src/motif/mdi.cpp @@ -6,100 +6,131 @@ // Created: 17/09/98 // RCS-ID: $Id$ // Copyright: (c) Julian Smart -// Licence: wxWindows licence +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// #ifdef __GNUG__ #pragma implementation "mdi.h" #endif +#ifdef __VMS +#define XtDisplay XTDISPLAY +#define XtWindow XTWINDOW +#endif + #include "wx/mdi.h" #include "wx/menu.h" #include "wx/settings.h" +#ifdef __VMS__ +#pragma message disable nosimpint +#endif +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#ifdef __VMS__ +#pragma message enable nosimpint +#endif + +#include "wx/motif/private.h" + extern wxList wxModelessWindows; -#if !USE_SHARED_LIBRARY +// Implemented in frame.cpp +extern void wxFrameFocusProc(Widget workArea, XtPointer clientData, + XmAnyCallbackStruct *cbs); + +#define wxID_NOTEBOOK_CLIENT_AREA wxID_HIGHEST + 100 + IMPLEMENT_DYNAMIC_CLASS(wxMDIParentFrame, wxFrame) IMPLEMENT_DYNAMIC_CLASS(wxMDIChildFrame, wxFrame) -IMPLEMENT_DYNAMIC_CLASS(wxMDIClientWindow, wxWindow) +IMPLEMENT_DYNAMIC_CLASS(wxMDIClientWindow, wxNotebook) BEGIN_EVENT_TABLE(wxMDIParentFrame, wxFrame) - EVT_SIZE(wxMDIParentFrame::OnSize) - EVT_ACTIVATE(wxMDIParentFrame::OnActivate) - EVT_SYS_COLOUR_CHANGED(wxMDIParentFrame::OnSysColourChanged) + EVT_SIZE(wxMDIParentFrame::OnSize) + EVT_ACTIVATE(wxMDIParentFrame::OnActivate) + EVT_SYS_COLOUR_CHANGED(wxMDIParentFrame::OnSysColourChanged) + EVT_MENU_HIGHLIGHT_ALL(wxMDIParentFrame::OnMenuHighlight) END_EVENT_TABLE() -BEGIN_EVENT_TABLE(wxMDIClientWindow, wxWindow) - EVT_SCROLL(wxMDIClientWindow::OnScroll) +BEGIN_EVENT_TABLE(wxMDIClientWindow, wxNotebook) + EVT_SCROLL(wxMDIClientWindow::OnScroll) + EVT_NOTEBOOK_PAGE_CHANGED(wxID_NOTEBOOK_CLIENT_AREA, wxMDIClientWindow::OnPageChanged) END_EVENT_TABLE() -#endif // Parent frame wxMDIParentFrame::wxMDIParentFrame() { + m_clientWindow = (wxMDIClientWindow*) NULL; + m_activeChild = (wxMDIChildFrame*) NULL; + m_activeMenuBar = (wxMenuBar*) NULL; } bool wxMDIParentFrame::Create(wxWindow *parent, - wxWindowID id, - const wxString& title, - const wxPoint& pos, - const wxSize& size, - long style, - const wxString& name) + wxWindowID id, + const wxString& title, + const wxPoint& pos, + const wxSize& size, + long style, + const wxString& name) { - if (!parent) - wxTopLevelWindows.Append(this); - - SetName(name); - m_windowStyle = style; - - if (parent) parent->AddChild(this); + m_clientWindow = (wxMDIClientWindow*) NULL; + m_activeChild = (wxMDIChildFrame*) NULL; + m_activeMenuBar = (wxMenuBar*) NULL; - if ( id > -1 ) - m_windowId = id; - else - m_windowId = (int)NewControlId(); + bool success = wxFrame::Create(parent, id, title, pos, size, style, name); + if (success) + { + // TODO: app cannot override OnCreateClient since + // wxMDIParentFrame::OnCreateClient will still be called + // (we're in the constructor). How to resolve? - // TODO: create MDI parent frame + m_clientWindow = OnCreateClient(); - wxModelessWindows.Append(this); + // Uses own style for client style + m_clientWindow->CreateClient(this, GetWindowStyleFlag()); - return TRUE; + int w, h; + GetClientSize(& w, & h); + m_clientWindow->SetSize(0, 0, w, h); + return TRUE; + } + else + return FALSE; } wxMDIParentFrame::~wxMDIParentFrame() { -} + // Make sure we delete the client window last of all + RemoveChild(m_clientWindow); -// Get size *available for subwindows* i.e. excluding menu bar. -void wxMDIParentFrame::GetClientSize(int *x, int *y) const -{ - // TODO + DestroyChildren(); + + delete m_clientWindow; + m_clientWindow = NULL; } void wxMDIParentFrame::SetMenuBar(wxMenuBar *menu_bar) { - // TODO - if (!menu_bar) - { - m_frameMenuBar = NULL; - return; - } - - if (menu_bar->m_menuBarFrame) - return; - m_frameMenuBar = menu_bar; + + SetChildMenuBar((wxMDIChildFrame*) NULL); } -void wxMDIParentFrame::OnSize(wxSizeEvent& event) +void wxMDIParentFrame::OnSize(wxSizeEvent& WXUNUSED(event)) { #if wxUSE_CONSTRAINTS if (GetAutoLayout()) - Layout(); + Layout(); #endif int x = 0; int y = 0; @@ -110,23 +141,121 @@ void wxMDIParentFrame::OnSize(wxSizeEvent& event) GetClientWindow()->SetSize(x, y, width, height); } -void wxMDIParentFrame::OnActivate(wxActivateEvent& event) +void wxMDIParentFrame::DoGetClientSize(int *width, int *height) const +{ + wxFrame::DoGetClientSize(width, height); +} + +void wxMDIParentFrame::OnActivate(wxActivateEvent& WXUNUSED(event)) { - // Do nothing + // Do nothing } // Returns the active MDI child window wxMDIChildFrame *wxMDIParentFrame::GetActiveChild() const { - // TODO - return NULL; + return m_activeChild; } // Create the client window class (don't Create the window, // just return a new class) wxMDIClientWindow *wxMDIParentFrame::OnCreateClient() { - return new wxMDIClientWindow ; + return new wxMDIClientWindow ; +} + +// Set the child's menu into the parent frame +void wxMDIParentFrame::SetChildMenuBar(wxMDIChildFrame* child) +{ + wxMenuBar* oldMenuBar = m_activeMenuBar; + + if (child == (wxMDIChildFrame*) NULL) // No child: use parent frame + { + if (GetMenuBar() && (GetMenuBar() != m_activeMenuBar)) + { + // if (m_activeMenuBar) + // m_activeMenuBar->DestroyMenuBar(); + + m_activeMenuBar = GetMenuBar(); + m_activeMenuBar->CreateMenuBar(this); + /* + if (oldMenuBar && XtIsManaged((Widget) oldMenuBar->GetMainWidget())) + XtUnmanageChild((Widget) oldMenuBar->GetMainWidget()); + */ + if (oldMenuBar && oldMenuBar->GetMainWidget()) + XtUnmapWidget((Widget) oldMenuBar->GetMainWidget()); + + } + } + else if (child->GetMenuBar() == (wxMenuBar*) NULL) // No child menu bar: use parent frame + { + if (GetMenuBar() && (GetMenuBar() != m_activeMenuBar)) + { + // if (m_activeMenuBar) + // m_activeMenuBar->DestroyMenuBar(); + m_activeMenuBar = GetMenuBar(); + m_activeMenuBar->CreateMenuBar(this); + /* + if (oldMenuBar && XtIsManaged((Widget) oldMenuBar->GetMainWidget())) + XtUnmanageChild((Widget) oldMenuBar->GetMainWidget()); + */ + if (oldMenuBar && oldMenuBar->GetMainWidget()) + XtUnmapWidget((Widget) oldMenuBar->GetMainWidget()); + } + } + else // The child has a menubar + { + if (child->GetMenuBar() != m_activeMenuBar) + { + // if (m_activeMenuBar) + // m_activeMenuBar->DestroyMenuBar(); + + m_activeMenuBar = child->GetMenuBar(); + m_activeMenuBar->CreateMenuBar(this); + /* + if (oldMenuBar && XtIsManaged((Widget) oldMenuBar->GetMainWidget())) + XtUnmanageChild((Widget) oldMenuBar->GetMainWidget()); + */ + if (oldMenuBar && oldMenuBar->GetMainWidget()) + XtUnmapWidget((Widget) oldMenuBar->GetMainWidget()); + } + } +} + +// Redirect events to active child first +bool wxMDIParentFrame::ProcessEvent(wxEvent& event) +{ + // Stops the same event being processed repeatedly + static wxEventType inEvent = wxEVT_NULL; + if (inEvent == event.GetEventType()) + return FALSE; + + inEvent = event.GetEventType(); + + bool res = FALSE; + if (m_activeChild && event.IsKindOf(CLASSINFO(wxCommandEvent))) + { + res = m_activeChild->GetEventHandler()->ProcessEvent(event); + } + + if (!res) + res = GetEventHandler()->wxEvtHandler::ProcessEvent(event); + + inEvent = wxEVT_NULL; + + return res; +} + +void wxMDIParentFrame::DoSetSize(int x, int y, + int width, int height, + int sizeFlags) +{ + wxWindow::DoSetSize(x, y, width, height, sizeFlags); +} + +void wxMDIParentFrame::DoSetClientSize(int width, int height) +{ + wxWindow::DoSetClientSize(width, height); } // Responds to colour changes, and passes event on to children. @@ -164,63 +293,261 @@ void wxMDIParentFrame::ActivatePrevious() // TODO } +// Default menu selection behaviour - display a help string +void wxMDIParentFrame::OnMenuHighlight(wxMenuEvent& event) +{ + if (GetStatusBar()) + { + if (event.GetMenuId() == -1) + SetStatusText(""); + else + { + wxMenuBar *menuBar = (wxMenuBar*) NULL; + if (GetActiveChild()) + menuBar = GetActiveChild()->GetMenuBar(); + else + menuBar = GetMenuBar(); + if (menuBar) + { + wxString helpString(menuBar->GetHelpString(event.GetMenuId())); + if (helpString != "") + SetStatusText(helpString); + } + } + } +} + // Child frame wxMDIChildFrame::wxMDIChildFrame() { + m_mdiParentFrame = (wxMDIParentFrame*) NULL; } bool wxMDIChildFrame::Create(wxMDIParentFrame *parent, - wxWindowID id, - const wxString& title, - const wxPoint& pos, - const wxSize& size, - long style, - const wxString& name) + wxWindowID id, + const wxString& title, + const wxPoint& pos, + const wxSize& size, + long style, + const wxString& name) { SetName(name); + SetWindowStyleFlag(style); + + m_backgroundColour = wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE); + m_foregroundColour = *wxBLACK; + m_font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT); if ( id > -1 ) m_windowId = id; else m_windowId = (int)NewControlId(); - if (parent) parent->AddChild(this); + wxMDIClientWindow* clientWindow = parent->GetClientWindow(); + + wxASSERT_MSG( (clientWindow != (wxWindow*) NULL), "Missing MDI client window."); + + if (clientWindow) clientWindow->AddChild(this); + + SetMDIParentFrame(parent); - // TODO: create child frame + int width = size.x; + int height = size.y; + if (width == -1) + width = 200; // TODO: give reasonable default + if (height == -1) + height = 200; // TODO: give reasonable default + + // We're deactivating the old child + wxMDIChildFrame* oldActiveChild = parent->GetActiveChild(); + if (oldActiveChild) + { + wxActivateEvent event(wxEVT_ACTIVATE, FALSE, oldActiveChild->GetId()); + event.SetEventObject( oldActiveChild ); + oldActiveChild->GetEventHandler()->ProcessEvent(event); + } + + // This is the currently active child + parent->SetActiveChild((wxMDIChildFrame*) this); + + // This time we'll try a bog-standard bulletin board for + // the 'frame'. A main window doesn't seem to work. + + m_mainWidget = (WXWidget) XtVaCreateWidget("client", + xmBulletinBoardWidgetClass, (Widget) clientWindow->GetTopWidget(), + XmNmarginWidth, 0, + XmNmarginHeight, 0, + /* + XmNrightAttachment, XmATTACH_FORM, + XmNleftAttachment, XmATTACH_FORM, + XmNtopAttachment, XmATTACH_FORM, + XmNbottomAttachment, XmATTACH_FORM, + */ + XmNresizePolicy, XmRESIZE_NONE, + NULL); + + XtAddEventHandler((Widget) m_mainWidget, ExposureMask,FALSE, + wxUniversalRepaintProc, (XtPointer) this); + + SetCanAddEventHandler(TRUE); + AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y); + + ChangeBackgroundColour(); + + XtManageChild((Widget) m_mainWidget); + + SetTitle(title); + + clientWindow->AddPage(this, title, TRUE); + clientWindow->Refresh(); + + // Positions the toolbar and status bar -- but we don't have any. + // PreResize(); wxModelessWindows.Append(this); - return FALSE; + return TRUE; } + wxMDIChildFrame::~wxMDIChildFrame() { + if (m_mainWidget) + XtRemoveEventHandler((Widget) m_mainWidget, ExposureMask,FALSE, + wxUniversalRepaintProc, (XtPointer) this); + + if (GetMDIParentFrame()) + { + wxMDIParentFrame* parentFrame = GetMDIParentFrame(); + + if (parentFrame->GetActiveChild() == this) + parentFrame->SetActiveChild((wxMDIChildFrame*) NULL); + wxMDIClientWindow* clientWindow = parentFrame->GetClientWindow(); + + // Remove page if still there + if (clientWindow->RemovePage(this)) + clientWindow->Refresh(); + + // Set the selection to the first remaining page + if (clientWindow->GetPageCount() > 0) + { + wxMDIChildFrame* child = (wxMDIChildFrame*) clientWindow->GetPage(0); + parentFrame->SetActiveChild(child); + parentFrame->SetChildMenuBar(child); + } + else + { + parentFrame->SetActiveChild((wxMDIChildFrame*) NULL); + parentFrame->SetChildMenuBar((wxMDIChildFrame*) NULL); + } + } } +#if 0 +// Implementation: intercept and act upon raise and lower commands. +void wxMDIChildFrame::OnRaise() +{ + wxMDIParentFrame* parentFrame = (wxMDIParentFrame*) GetParent() ; + wxMDIChildFrame* oldActiveChild = parentFrame->GetActiveChild(); + parentFrame->SetActiveChild(this); + + if (oldActiveChild) + { + wxActivateEvent event(wxEVT_ACTIVATE, FALSE, oldActiveChild->GetId()); + event.SetEventObject( oldActiveChild ); + oldActiveChild->GetEventHandler()->ProcessEvent(event); + } + + wxActivateEvent event(wxEVT_ACTIVATE, TRUE, this->GetId()); + event.SetEventObject( this ); + this->GetEventHandler()->ProcessEvent(event); +} + +void wxMDIChildFrame::OnLower() +{ + wxMDIParentFrame* parentFrame = (wxMDIParentFrame*) GetParent() ; + wxMDIChildFrame* oldActiveChild = parentFrame->GetActiveChild(); + + if (oldActiveChild == this) + { + wxActivateEvent event(wxEVT_ACTIVATE, FALSE, oldActiveChild->GetId()); + event.SetEventObject( oldActiveChild ); + oldActiveChild->GetEventHandler()->ProcessEvent(event); + } + // TODO: unfortunately we don't now know which is the top-most child, + // so make the active child NULL. + parentFrame->SetActiveChild((wxMDIChildFrame*) NULL); +} +#endif + // Set the client size (i.e. leave the calculation of borders etc. // to wxWindows) -void wxMDIChildFrame::SetClientSize(int width, int height) +void wxMDIChildFrame::DoSetClientSize(int width, int height) { - // TODO + wxWindow::DoSetClientSize(width, height); } -void wxMDIChildFrame::GetPosition(int *x, int *y) const +void wxMDIChildFrame::DoGetClientSize(int* width, int* height) const { - // TODO + wxWindow::DoGetSize(width, height); } -void wxMDIChildFrame::SetMenuBar(wxMenuBar *menu_bar) +void wxMDIChildFrame::DoSetSize(int x, int y, int width, int height, int sizeFlags) { - // TODO - if (!menu_bar) + wxWindow::DoSetSize(x, y, width, height, sizeFlags); +} + +void wxMDIChildFrame::DoGetSize(int* width, int* height) const +{ + wxWindow::DoGetSize(width, height); +} + +void wxMDIChildFrame::DoGetPosition(int *x, int *y) const +{ + wxWindow::DoGetPosition(x, y); +} + +bool wxMDIChildFrame::Show(bool show) +{ + m_visibleStatus = show; /* show-&-hide fix */ + return wxWindow::Show(show); +} + +void wxMDIChildFrame::SetMenuBar(wxMenuBar *menuBar) +{ + // Don't create the underlying menubar yet; need to recreate + // it every time the child is activated. + m_frameMenuBar = menuBar; + + // We make the assumption that if you're setting the menubar, + // this is the currently active child. + GetMDIParentFrame()->SetChildMenuBar(this); +} + +// Set icon +void wxMDIChildFrame::SetIcon(const wxIcon& icon) +{ + m_icons = wxIconBundle( icon ); + + if (icon.Ok()) { - m_frameMenuBar = NULL; - return; + // Not appropriate since there are no icons in + // a tabbed window } - - if (menu_bar->m_menuBarFrame) - return; - m_frameMenuBar = menu_bar; +} + +void wxMDIChildFrame::SetIcons(const wxIconBundle& icons) +{ + m_icons = icons; +} + +void wxMDIChildFrame::SetTitle(const wxString& title) +{ + m_title = title; + wxMDIClientWindow* clientWindow = GetMDIParentFrame()->GetClientWindow(); + int pageNo = clientWindow->FindPagePosition(this); + if (pageNo > -1) + clientWindow->SetPageText(pageNo, title); } // MDI operations @@ -229,6 +556,23 @@ void wxMDIChildFrame::Maximize() // TODO } +void wxMDIChildFrame::Iconize(bool WXUNUSED(iconize)) +{ + // TODO +} + +bool wxMDIChildFrame::IsIconized() const +{ + return FALSE; +} + +// Is it maximized? Always maximized under Motif, using the +// tabbed MDI implementation. +bool wxMDIChildFrame::IsMaximized(void) const +{ + return TRUE; +} + void wxMDIChildFrame::Restore() { // TODO @@ -239,6 +583,30 @@ void wxMDIChildFrame::Activate() // TODO } +void wxMDIChildFrame::CaptureMouse() +{ + wxWindow::CaptureMouse(); +} + +void wxMDIChildFrame::ReleaseMouse() +{ + wxWindow::ReleaseMouse(); +} + +void wxMDIChildFrame::Raise() +{ + wxWindow::Raise(); +} + +void wxMDIChildFrame::Lower(void) +{ + wxWindow::Raise(); +} + +void wxMDIChildFrame::SetSizeHints(int WXUNUSED(minW), int WXUNUSED(minH), int WXUNUSED(maxW), int WXUNUSED(maxH), int WXUNUSED(incW), int WXUNUSED(incH)) +{ +} + // Client window wxMDIClientWindow::wxMDIClientWindow() @@ -247,19 +615,94 @@ wxMDIClientWindow::wxMDIClientWindow() wxMDIClientWindow::~wxMDIClientWindow() { + // By the time this destructor is called, the child frames will have been + // deleted and removed from the notebook/client window. + DestroyChildren(); + + m_mainWidget = (WXWidget) 0; } bool wxMDIClientWindow::CreateClient(wxMDIParentFrame *parent, long style) { - // TODO create client window - m_backgroundColour = wxSystemSettings::GetSystemColour(wxSYS_COLOUR_APPWORKSPACE); + SetWindowStyleFlag(style); - return FALSE; + // m_windowParent = parent; + // m_backgroundColour = wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE); + + bool success = wxNotebook::Create(parent, wxID_NOTEBOOK_CLIENT_AREA, wxPoint(0, 0), wxSize(100, 100), 0); + if (success) + { + wxFont font(10, wxSWISS, wxNORMAL, wxNORMAL); + wxFont selFont(10, wxSWISS, wxNORMAL, wxBOLD); + GetTabView()->SetTabFont(font); + GetTabView()->SetSelectedTabFont(selFont); + GetTabView()->SetTabSize(120, 18); + GetTabView()->SetTabSelectionHeight(20); + return TRUE; + } + else + return FALSE; +} + +void wxMDIClientWindow::DoSetSize(int x, int y, int width, int height, int sizeFlags) +{ + wxWindow::DoSetSize(x, y, width, height, sizeFlags); +} + +void wxMDIClientWindow::DoSetClientSize(int width, int height) +{ + wxWindow::DoSetClientSize(width, height); +} + +void wxMDIClientWindow::DoGetClientSize(int *width, int *height) const +{ + wxWindow::DoGetClientSize(width, height); +} + +void wxMDIClientWindow::DoGetSize(int *width, int *height) const +{ + wxWindow::DoGetSize(width, height); +} + +void wxMDIClientWindow::DoGetPosition(int *x, int *y) const +{ + wxWindow::DoGetPosition(x, y); } -// Explicitly call default scroll behaviour void wxMDIClientWindow::OnScroll(wxScrollEvent& event) { - Default(); // Default processing + // Default(); // Default processing: OBSOLETE FUNCTION + event.Skip(); } +void wxMDIClientWindow::OnPageChanged(wxNotebookEvent& event) +{ + // Notify child that it has been activated + if (event.GetOldSelection() != -1) + { + wxMDIChildFrame* oldChild = (wxMDIChildFrame*) GetPage(event.GetOldSelection()); + if (oldChild) + { + wxActivateEvent event(wxEVT_ACTIVATE, FALSE, oldChild->GetId()); + event.SetEventObject( oldChild ); + oldChild->GetEventHandler()->ProcessEvent(event); + } + } + if (event.GetSelection() != -1) + { + wxMDIChildFrame* activeChild = (wxMDIChildFrame*) GetPage(event.GetSelection()); + if (activeChild) + { + wxActivateEvent event(wxEVT_ACTIVATE, TRUE, activeChild->GetId()); + event.SetEventObject( activeChild ); + activeChild->GetEventHandler()->ProcessEvent(event); + + if (activeChild->GetMDIParentFrame()) + { + activeChild->GetMDIParentFrame()->SetActiveChild(activeChild); + activeChild->GetMDIParentFrame()->SetChildMenuBar(activeChild); + } + } + } + event.Skip(); +}