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