src/motif/mdi.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        mdi.cpp
   3 // Purpose:     MDI classes
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     17/09/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // For compilers that support precompilation, includes "wx.h".
  13 #include "wx/wxprec.h"
  14
  15 #ifdef __VMS
  16 #define XtDisplay XTDISPLAY
  17 #define XtWindow XTWINDOW
  18 #endif
  19
  20 #include "wx/mdi.h"
  21 #include "wx/menu.h"
  22 #include "wx/settings.h"
  23 #include "wx/icon.h"
  24
  25 #ifdef __VMS__
  26 #pragma message disable nosimpint
  27 #endif
  28 #include <Xm/Xm.h>
  29 #include <Xm/BulletinB.h>
  30 #include <Xm/Form.h>
  31 #include <Xm/MainW.h>
  32 #include <Xm/RowColumn.h>
  33 #include <Xm/CascadeBG.h>
  34 #include <Xm/Text.h>
  35 #include <Xm/PushBG.h>
  36 #include <Xm/AtomMgr.h>
  37 #include <Xm/Protocols.h>
  38 #ifdef __VMS__
  39 #pragma message enable nosimpint
  40 #endif
  41
  42 #include "wx/motif/private.h"
  43
  44 extern wxList wxModelessWindows;
  45
  46 // Implemented in frame.cpp
  47 extern void wxFrameFocusProc(Widget workArea, XtPointer clientData,
  48                              XmAnyCallbackStruct *cbs);
  49
  50 #define wxID_NOTEBOOK_CLIENT_AREA wxID_HIGHEST + 100
  51
  52 IMPLEMENT_DYNAMIC_CLASS(wxMDIParentFrame, wxFrame)
  53 IMPLEMENT_DYNAMIC_CLASS(wxMDIChildFrame, wxFrame)
  54 IMPLEMENT_DYNAMIC_CLASS(wxMDIClientWindow, wxNotebook)
  55
  56 BEGIN_EVENT_TABLE(wxMDIParentFrame, wxFrame)
  57     EVT_SIZE(wxMDIParentFrame::OnSize)
  58     EVT_ACTIVATE(wxMDIParentFrame::OnActivate)
  59     EVT_SYS_COLOUR_CHANGED(wxMDIParentFrame::OnSysColourChanged)
  60     EVT_MENU_HIGHLIGHT_ALL(wxMDIParentFrame::OnMenuHighlight)
  61 END_EVENT_TABLE()
  62
  63 BEGIN_EVENT_TABLE(wxMDIClientWindow, wxNotebook)
  64     EVT_SCROLL(wxMDIClientWindow::OnScroll)
  65     EVT_NOTEBOOK_PAGE_CHANGED(wxID_NOTEBOOK_CLIENT_AREA, wxMDIClientWindow::OnPageChanged)
  66 END_EVENT_TABLE()
  67
  68
  69 // Parent frame
  70
  71 wxMDIParentFrame::wxMDIParentFrame()
  72 {
  73     m_clientWindow = (wxMDIClientWindow*) NULL;
  74     m_activeChild = (wxMDIChildFrame*) NULL;
  75     m_activeMenuBar = (wxMenuBar*) NULL;
  76 }
  77
  78 bool wxMDIParentFrame::Create(wxWindow *parent,
  79                               wxWindowID id,
  80                               const wxString& title,
  81                               const wxPoint& pos,
  82                               const wxSize& size,
  83                               long style,
  84                               const wxString& name)
  85 {
  86     m_clientWindow = (wxMDIClientWindow*) NULL;
  87     m_activeChild = (wxMDIChildFrame*) NULL;
  88     m_activeMenuBar = (wxMenuBar*) NULL;
  89
  90     bool success = wxFrame::Create(parent, id, title, pos, size, style, name);
  91     if (success)
  92     {
  93         // TODO: app cannot override OnCreateClient since
  94         // wxMDIParentFrame::OnCreateClient will still be called
  95         // (we're in the constructor). How to resolve?
  96
  97         m_clientWindow = OnCreateClient();
  98
  99         // Uses own style for client style
 100         m_clientWindow->CreateClient(this, GetWindowStyleFlag());
 101
 102         int w, h;
 103         GetClientSize(& w, & h);
 104         m_clientWindow->SetSize(0, 0, w, h);
 105         return true;
 106     }
 107     else
 108         return false;
 109 }
 110
 111 wxMDIParentFrame::~wxMDIParentFrame()
 112 {
 113     // Make sure we delete the client window last of all
 114     RemoveChild(m_clientWindow);
 115
 116     DestroyChildren();
 117
 118     delete m_clientWindow;
 119     m_clientWindow = NULL;
 120 }
 121
 122 void wxMDIParentFrame::SetMenuBar(wxMenuBar *menu_bar)
 123 {
 124     m_frameMenuBar = menu_bar;
 125
 126     SetChildMenuBar((wxMDIChildFrame*) NULL);
 127 }
 128
 129 void wxMDIParentFrame::OnSize(wxSizeEvent& WXUNUSED(event))
 130 {
 131 #if wxUSE_CONSTRAINTS
 132     if (GetAutoLayout())
 133         Layout();
 134 #endif
 135     int x = 0;
 136     int y = 0;
 137     int width, height;
 138     GetClientSize(&width, &height);
 139
 140     if ( GetClientWindow() )
 141         GetClientWindow()->SetSize(x, y, width, height);
 142 }
 143
 144 void wxMDIParentFrame::DoGetClientSize(int *width, int *height) const
 145 {
 146     wxFrame::DoGetClientSize(width, height);
 147 }
 148
 149 void wxMDIParentFrame::OnActivate(wxActivateEvent& WXUNUSED(event))
 150 {
 151     // Do nothing
 152 }
 153
 154 // Returns the active MDI child window
 155 wxMDIChildFrame *wxMDIParentFrame::GetActiveChild() const
 156 {
 157     return m_activeChild;
 158 }
 159
 160 // Create the client window class (don't Create the window,
 161 // just return a new class)
 162 wxMDIClientWindow *wxMDIParentFrame::OnCreateClient()
 163 {
 164     return new wxMDIClientWindow ;
 165 }
 166
 167 // Set the child's menu into the parent frame
 168 void wxMDIParentFrame::SetChildMenuBar(wxMDIChildFrame* child)
 169 {
 170     wxMenuBar* oldMenuBar = m_activeMenuBar;
 171
 172     if (child == (wxMDIChildFrame*) NULL)  // No child: use parent frame
 173     {
 174         if (GetMenuBar() && (GetMenuBar() != m_activeMenuBar))
 175         {
 176             //            if (m_activeMenuBar)
 177             //                m_activeMenuBar->DestroyMenuBar();
 178
 179             m_activeMenuBar = GetMenuBar();
 180             m_activeMenuBar->CreateMenuBar(this);
 181             /*
 182             if (oldMenuBar && XtIsManaged((Widget) oldMenuBar->GetMainWidget()))
 183             XtUnmanageChild((Widget) oldMenuBar->GetMainWidget());
 184             */
 185             if (oldMenuBar && oldMenuBar->GetMainWidget())
 186                 XtUnmapWidget((Widget) oldMenuBar->GetMainWidget());
 187
 188         }
 189     }
 190     else if (child->GetMenuBar() == (wxMenuBar*) NULL) // No child menu bar: use parent frame
 191     {
 192         if (GetMenuBar() && (GetMenuBar() != m_activeMenuBar))
 193         {
 194             //            if (m_activeMenuBar)
 195             //                m_activeMenuBar->DestroyMenuBar();
 196             m_activeMenuBar = GetMenuBar();
 197             m_activeMenuBar->CreateMenuBar(this);
 198             /*
 199             if (oldMenuBar && XtIsManaged((Widget) oldMenuBar->GetMainWidget()))
 200             XtUnmanageChild((Widget) oldMenuBar->GetMainWidget());
 201             */
 202             if (oldMenuBar && oldMenuBar->GetMainWidget())
 203                 XtUnmapWidget((Widget) oldMenuBar->GetMainWidget());
 204         }
 205     }
 206     else // The child has a menubar
 207     {
 208         if (child->GetMenuBar() != m_activeMenuBar)
 209         {
 210             //            if (m_activeMenuBar)
 211             //                m_activeMenuBar->DestroyMenuBar();
 212
 213             m_activeMenuBar = child->GetMenuBar();
 214             m_activeMenuBar->CreateMenuBar(this);
 215             /*
 216             if (oldMenuBar && XtIsManaged((Widget) oldMenuBar->GetMainWidget()))
 217             XtUnmanageChild((Widget) oldMenuBar->GetMainWidget());
 218             */
 219             if (oldMenuBar && oldMenuBar->GetMainWidget())
 220                 XtUnmapWidget((Widget) oldMenuBar->GetMainWidget());
 221         }
 222     }
 223 }
 224
 225 // Redirect events to active child first
 226 bool wxMDIParentFrame::ProcessEvent(wxEvent& event)
 227 {
 228     // Stops the same event being processed repeatedly
 229     static wxEventType inEvent = wxEVT_NULL;
 230     if (inEvent == event.GetEventType())
 231         return false;
 232
 233     inEvent = event.GetEventType();
 234
 235     bool res = false;
 236     if (m_activeChild && event.IsKindOf(CLASSINFO(wxCommandEvent)))
 237     {
 238         res = m_activeChild->GetEventHandler()->ProcessEvent(event);
 239     }
 240
 241     if (!res)
 242         res = GetEventHandler()->wxEvtHandler::ProcessEvent(event);
 243
 244     inEvent = wxEVT_NULL;
 245
 246     return res;
 247 }
 248
 249 void wxMDIParentFrame::DoSetSize(int x, int y,
 250                                  int width, int height,
 251                                  int sizeFlags)
 252 {
 253     wxWindow::DoSetSize(x, y, width, height, sizeFlags);
 254 }
 255
 256 void wxMDIParentFrame::DoSetClientSize(int width, int height)
 257 {
 258     wxWindow::DoSetClientSize(width, height);
 259 }
 260
 261 // Responds to colour changes, and passes event on to children.
 262 void wxMDIParentFrame::OnSysColourChanged(wxSysColourChangedEvent& event)
 263 {
 264     // TODO
 265
 266     // Propagate the event to the non-top-level children
 267     wxFrame::OnSysColourChanged(event);
 268 }
 269
 270 // MDI operations
 271 void wxMDIParentFrame::Cascade()
 272 {
 273     // TODO
 274 }
 275
 276 void wxMDIParentFrame::Tile(wxOrientation WXUNUSED(orient))
 277 {
 278     // TODO
 279 }
 280
 281 void wxMDIParentFrame::ArrangeIcons()
 282 {
 283     // TODO
 284 }
 285
 286 void wxMDIParentFrame::ActivateNext()
 287 {
 288     // TODO
 289 }
 290
 291 void wxMDIParentFrame::ActivatePrevious()
 292 {
 293     // TODO
 294 }
 295
 296 // Default menu selection behaviour - display a help string
 297 void wxMDIParentFrame::OnMenuHighlight(wxMenuEvent& event)
 298 {
 299     if (GetStatusBar())
 300     {
 301         if (event.GetMenuId() == -1)
 302             SetStatusText("");
 303         else
 304         {
 305             wxMenuBar *menuBar = (wxMenuBar*) NULL;
 306             if (GetActiveChild())
 307               menuBar = GetActiveChild()->GetMenuBar();
 308             else
 309               menuBar = GetMenuBar();
 310             if (menuBar)
 311             {
 312                 wxString helpString(menuBar->GetHelpString(event.GetMenuId()));
 313                 if (helpString != "")
 314                     SetStatusText(helpString);
 315             }
 316         }
 317     }
 318 }
 319
 320 // Child frame
 321
 322 wxMDIChildFrame::wxMDIChildFrame()
 323 {
 324     m_mdiParentFrame = (wxMDIParentFrame*) NULL;
 325 }
 326
 327 bool wxMDIChildFrame::Create(wxMDIParentFrame *parent,
 328                              wxWindowID id,
 329                              const wxString& title,
 330                              const wxPoint& pos,
 331                              const wxSize& size,
 332                              long style,
 333                              const wxString& name)
 334 {
 335     SetName(name);
 336     SetWindowStyleFlag(style);
 337
 338     m_backgroundColour = wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE);
 339     m_foregroundColour = *wxBLACK;
 340     m_font = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
 341
 342     if ( id > -1 )
 343         m_windowId = id;
 344     else
 345         m_windowId = (int)NewControlId();
 346
 347     wxMDIClientWindow* clientWindow = parent->GetClientWindow();
 348
 349     wxASSERT_MSG( (clientWindow != (wxWindow*) NULL), "Missing MDI client window.");
 350
 351     if (clientWindow) clientWindow->AddChild(this);
 352
 353     SetMDIParentFrame(parent);
 354
 355     int width = size.x;
 356     int height = size.y;
 357     if (width == -1)
 358         width = 200; // TODO: give reasonable default
 359     if (height == -1)
 360         height = 200; // TODO: give reasonable default
 361
 362     // We're deactivating the old child
 363     wxMDIChildFrame* oldActiveChild = parent->GetActiveChild();
 364     if (oldActiveChild)
 365     {
 366         wxActivateEvent event(wxEVT_ACTIVATE, false, oldActiveChild->GetId());
 367         event.SetEventObject( oldActiveChild );
 368         oldActiveChild->GetEventHandler()->ProcessEvent(event);
 369     }
 370
 371     // This is the currently active child
 372     parent->SetActiveChild((wxMDIChildFrame*) this);
 373
 374     // This time we'll try a bog-standard bulletin board for
 375     // the 'frame'. A main window doesn't seem to work.
 376
 377     m_mainWidget = (WXWidget) XtVaCreateWidget("client",
 378         xmBulletinBoardWidgetClass, (Widget) clientWindow->GetTopWidget(),
 379         XmNmarginWidth, 0,
 380         XmNmarginHeight, 0,
 381         /*
 382         XmNrightAttachment, XmATTACH_FORM,
 383         XmNleftAttachment, XmATTACH_FORM,
 384         XmNtopAttachment, XmATTACH_FORM,
 385         XmNbottomAttachment, XmATTACH_FORM,
 386         */
 387         XmNresizePolicy, XmRESIZE_NONE,
 388         NULL);
 389
 390     XtAddEventHandler((Widget) m_mainWidget, ExposureMask,False,
 391         wxUniversalRepaintProc, (XtPointer) this);
 392
 393     AttachWidget (parent, m_mainWidget, (WXWidget) NULL, pos.x, pos.y, size.x, size.y);
 394
 395     ChangeBackgroundColour();
 396
 397     XtManageChild((Widget) m_mainWidget);
 398
 399     SetTitle(title);
 400
 401     clientWindow->AddPage(this, title, true);
 402     clientWindow->Refresh();
 403
 404     // Positions the toolbar and status bar -- but we don't have any.
 405     //    PreResize();
 406
 407     wxModelessWindows.Append(this);
 408     return true;
 409 }
 410
 411
 412 wxMDIChildFrame::~wxMDIChildFrame()
 413 {
 414     if (m_mainWidget)
 415       XtRemoveEventHandler((Widget) m_mainWidget, ExposureMask,False,
 416         wxUniversalRepaintProc, (XtPointer) this);
 417
 418     if (GetMDIParentFrame())
 419     {
 420         wxMDIParentFrame* parentFrame = GetMDIParentFrame();
 421
 422         if (parentFrame->GetActiveChild() == this)
 423             parentFrame->SetActiveChild((wxMDIChildFrame*) NULL);
 424         wxMDIClientWindow* clientWindow = parentFrame->GetClientWindow();
 425
 426         // Remove page if still there
 427         {
 428             int i = clientWindow->FindPage(this);
 429
 430             if (i != -1)
 431             {
 432                 clientWindow->RemovePage(i);
 433                 clientWindow->Refresh();
 434             }
 435         }
 436
 437         // Set the selection to the first remaining page
 438         if (clientWindow->GetPageCount() > 0)
 439         {
 440             wxMDIChildFrame* child = (wxMDIChildFrame*)  clientWindow->GetPage(0);
 441             parentFrame->SetActiveChild(child);
 442             parentFrame->SetChildMenuBar(child);
 443         }
 444         else
 445         {
 446             parentFrame->SetActiveChild((wxMDIChildFrame*) NULL);
 447             parentFrame->SetChildMenuBar((wxMDIChildFrame*) NULL);
 448         }
 449     }
 450 }
 451
 452 #if 0
 453 // Implementation: intercept and act upon raise and lower commands.
 454 void wxMDIChildFrame::OnRaise()
 455 {
 456     wxMDIParentFrame* parentFrame = (wxMDIParentFrame*) GetParent() ;
 457     wxMDIChildFrame* oldActiveChild = parentFrame->GetActiveChild();
 458     parentFrame->SetActiveChild(this);
 459
 460     if (oldActiveChild)
 461     {
 462         wxActivateEvent event(wxEVT_ACTIVATE, false, oldActiveChild->GetId());
 463         event.SetEventObject( oldActiveChild );
 464         oldActiveChild->GetEventHandler()->ProcessEvent(event);
 465     }
 466
 467     wxActivateEvent event(wxEVT_ACTIVATE, true, this->GetId());
 468     event.SetEventObject( this );
 469     this->GetEventHandler()->ProcessEvent(event);
 470 }
 471
 472 void wxMDIChildFrame::OnLower()
 473 {
 474     wxMDIParentFrame* parentFrame = (wxMDIParentFrame*) GetParent() ;
 475     wxMDIChildFrame* oldActiveChild = parentFrame->GetActiveChild();
 476
 477     if (oldActiveChild == this)
 478     {
 479         wxActivateEvent event(wxEVT_ACTIVATE, false, oldActiveChild->GetId());
 480         event.SetEventObject( oldActiveChild );
 481         oldActiveChild->GetEventHandler()->ProcessEvent(event);
 482     }
 483     // TODO: unfortunately we don't now know which is the top-most child,
 484     // so make the active child NULL.
 485     parentFrame->SetActiveChild((wxMDIChildFrame*) NULL);
 486 }
 487 #endif
 488
 489 // Set the client size (i.e. leave the calculation of borders etc.
 490 // to wxWidgets)
 491 void wxMDIChildFrame::DoSetClientSize(int width, int height)
 492 {
 493     wxWindow::DoSetClientSize(width, height);
 494 }
 495
 496 void wxMDIChildFrame::DoGetClientSize(int* width, int* height) const
 497 {
 498     wxWindow::DoGetSize(width, height);
 499 }
 500
 501 void wxMDIChildFrame::DoSetSize(int x, int y, int width, int height, int sizeFlags)
 502 {
 503     wxWindow::DoSetSize(x, y, width, height, sizeFlags);
 504 }
 505
 506 void wxMDIChildFrame::DoGetSize(int* width, int* height) const
 507 {
 508     wxWindow::DoGetSize(width, height);
 509 }
 510
 511 void wxMDIChildFrame::DoGetPosition(int *x, int *y) const
 512 {
 513     wxWindow::DoGetPosition(x, y);
 514 }
 515
 516 bool wxMDIChildFrame::Show(bool show)
 517 {
 518     SetVisibleStatus( show );
 519     return wxWindow::Show(show);
 520 }
 521
 522 void wxMDIChildFrame::SetMenuBar(wxMenuBar *menuBar)
 523 {
 524     // Don't create the underlying menubar yet; need to recreate
 525     // it every time the child is activated.
 526     m_frameMenuBar = menuBar;
 527
 528     // We make the assumption that if you're setting the menubar,
 529     // this is the currently active child.
 530     GetMDIParentFrame()->SetChildMenuBar(this);
 531 }
 532
 533 // Set icon
 534 void wxMDIChildFrame::SetIcon(const wxIcon& icon)
 535 {
 536     m_icons = wxIconBundle( icon );
 537
 538     if (icon.Ok())
 539     {
 540         // Not appropriate since there are no icons in
 541         // a tabbed window
 542     }
 543 }
 544
 545 void wxMDIChildFrame::SetIcons(const wxIconBundle& icons)
 546 {
 547     m_icons = icons;
 548 }
 549
 550 void wxMDIChildFrame::SetTitle(const wxString& title)
 551 {
 552     wxTopLevelWindow::SetTitle( title );
 553     wxMDIClientWindow* clientWindow = GetMDIParentFrame()->GetClientWindow();
 554
 555     // Remove page if still there
 556     {
 557         int i = clientWindow->FindPage(this);
 558
 559         if (i != -1)
 560             clientWindow->SetPageText(i, title);
 561     }
 562 }
 563
 564 // MDI operations
 565 void wxMDIChildFrame::Maximize()
 566 {
 567     // TODO
 568 }
 569
 570 void wxMDIChildFrame::Iconize(bool WXUNUSED(iconize))
 571 {
 572     // TODO
 573 }
 574
 575 bool wxMDIChildFrame::IsIconized() const
 576 {
 577     return false;
 578 }
 579
 580 // Is it maximized? Always maximized under Motif, using the
 581 // tabbed MDI implementation.
 582 bool wxMDIChildFrame::IsMaximized(void) const
 583 {
 584     return true;
 585 }
 586
 587 void wxMDIChildFrame::Restore()
 588 {
 589     // TODO
 590 }
 591
 592 void wxMDIChildFrame::Activate()
 593 {
 594     // TODO
 595 }
 596
 597 void wxMDIChildFrame::CaptureMouse()
 598 {
 599     wxWindow::CaptureMouse();
 600 }
 601
 602 void wxMDIChildFrame::ReleaseMouse()
 603 {
 604     wxWindow::ReleaseMouse();
 605 }
 606
 607 void wxMDIChildFrame::Raise()
 608 {
 609     wxWindow::Raise();
 610 }
 611
 612 void wxMDIChildFrame::Lower(void)
 613 {
 614     wxWindow::Raise();
 615 }
 616
 617 void wxMDIChildFrame::DoSetSizeHints(int WXUNUSED(minW), int WXUNUSED(minH), int WXUNUSED(maxW), int WXUNUSED(maxH), int WXUNUSED(incW), int WXUNUSED(incH))
 618 {
 619 }
 620
 621 // Client window
 622
 623 wxMDIClientWindow::wxMDIClientWindow()
 624 {
 625 }
 626
 627 wxMDIClientWindow::~wxMDIClientWindow()
 628 {
 629     // By the time this destructor is called, the child frames will have been
 630     // deleted and removed from the notebook/client window.
 631     DestroyChildren();
 632
 633     m_mainWidget = (WXWidget) 0;
 634 }
 635
 636 bool wxMDIClientWindow::CreateClient(wxMDIParentFrame *parent, long style)
 637 {
 638     SetWindowStyleFlag(style);
 639
 640     //    m_windowParent = parent;
 641     //    m_backgroundColour = wxSystemSettings::GetColour(wxSYS_COLOUR_APPWORKSPACE);
 642
 643     bool success = wxNotebook::Create(parent, wxID_NOTEBOOK_CLIENT_AREA, wxPoint(0, 0), wxSize(100, 100), 0);
 644     if (success)
 645     {
 646         wxFont font(10, wxSWISS, wxNORMAL, wxNORMAL);
 647         SetFont(font);
 648         return true;
 649     }
 650     else
 651         return false;
 652 }
 653
 654 int wxMDIClientWindow::FindPage(const wxNotebookPage* page)
 655 {
 656     for (int i = GetPageCount() - 1; i >= 0; --i)
 657     {
 658         if (GetPage(i) == page)
 659             return i;
 660     }
 661
 662     return -1;
 663 }
 664
 665 void wxMDIClientWindow::DoSetSize(int x, int y, int width, int height, int sizeFlags)
 666 {
 667     wxWindow::DoSetSize(x, y, width, height, sizeFlags);
 668 }
 669
 670 void wxMDIClientWindow::DoSetClientSize(int width, int height)
 671 {
 672     wxWindow::DoSetClientSize(width, height);
 673 }
 674
 675 void wxMDIClientWindow::DoGetClientSize(int *width, int *height) const
 676 {
 677     wxWindow::DoGetClientSize(width, height);
 678 }
 679
 680 void wxMDIClientWindow::DoGetSize(int *width, int *height) const
 681 {
 682     wxWindow::DoGetSize(width, height);
 683 }
 684
 685 void wxMDIClientWindow::DoGetPosition(int *x, int *y) const
 686 {
 687     wxWindow::DoGetPosition(x, y);
 688 }
 689
 690 void wxMDIClientWindow::OnScroll(wxScrollEvent& event)
 691 {
 692     //    Default(); // Default processing: OBSOLETE FUNCTION
 693     event.Skip();
 694 }
 695
 696 void wxMDIClientWindow::OnPageChanged(wxNotebookEvent& event)
 697 {
 698     // Notify child that it has been activated
 699     if (event.GetOldSelection() != -1)
 700     {
 701         wxMDIChildFrame* oldChild = (wxMDIChildFrame*) GetPage(event.GetOldSelection());
 702         if (oldChild)
 703         {
 704             wxActivateEvent event(wxEVT_ACTIVATE, false, oldChild->GetId());
 705             event.SetEventObject( oldChild );
 706             oldChild->GetEventHandler()->ProcessEvent(event);
 707         }
 708     }
 709     if (event.GetSelection() != -1)
 710     {
 711         wxMDIChildFrame* activeChild = (wxMDIChildFrame*) GetPage(event.GetSelection());
 712         if (activeChild)
 713         {
 714             wxActivateEvent event(wxEVT_ACTIVATE, true, activeChild->GetId());
 715             event.SetEventObject( activeChild );
 716             activeChild->GetEventHandler()->ProcessEvent(event);
 717
 718             if (activeChild->GetMDIParentFrame())
 719             {
 720                 activeChild->GetMDIParentFrame()->SetActiveChild(activeChild);
 721                 activeChild->GetMDIParentFrame()->SetChildMenuBar(activeChild);
 722             }
 723         }
 724     }
 725     event.Skip();
 726 }