X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/46dc76ba3573649a9ed7c7aff6dc677f533eee11..4e15d1caa03346c126015019c1fdf093033ef40b:/samples/mdi/mdi.cpp?ds=sidebyside

diff --git a/samples/mdi/mdi.cpp b/samples/mdi/mdi.cpp
index 7d9ac5bc79..e68364cf01 100644
--- a/samples/mdi/mdi.cpp
+++ b/samples/mdi/mdi.cpp
@@ -2,402 +2,576 @@
 // Name:        mdi.cpp
 // Purpose:     MDI sample
 // Author:      Julian Smart
-// Modified by:
+// Modified by: 2008-10-31 Vadim Zeitlin: big clean up
 // Created:     04/01/98
 // RCS-ID:      $Id$
-// Copyright:   (c) Julian Smart and Markus Holzem
-// Licence:   	wxWindows license
+// Copyright:   (c) 1997 Julian Smart
+//              (c) 2008 Vadim Zeitlin
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
+// ===========================================================================
+// declarations
+// ===========================================================================
+
+// ---------------------------------------------------------------------------
+// headers
+// ---------------------------------------------------------------------------
+
 // For compilers that support precompilation, includes "wx/wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
-#pragma hdrstop
+    #pragma hdrstop
 #endif
 
 #ifndef WX_PRECOMP
-#include "wx/wx.h"
-#include "wx/mdi.h"
+    #include "wx/wx.h"
+    #include "wx/mdi.h"
 #endif
 
-#include <wx/toolbar.h>
+#include "wx/toolbar.h"
 
-#ifdef __WXGTK__
-#include "folder.xpm"
+#ifndef wxHAS_IMAGES_IN_RESOURCES
+    #include "../sample.xpm"
+    #include "chart.xpm"
 #endif
 
-#include "mdi.h"
+#include "bitmaps/new.xpm"
+#include "bitmaps/open.xpm"
+#include "bitmaps/save.xpm"
+#include "bitmaps/copy.xpm"
+#include "bitmaps/cut.xpm"
+#include "bitmaps/paste.xpm"
+#include "bitmaps/print.xpm"
+#include "bitmaps/help.xpm"
+
+// replace this 0 with 1 to build the sample using the generic MDI classes (you
+// may also need to add src/generic/mdig.cpp to the build)
+#if 0
+    #include "wx/generic/mdig.h"
+    #define wxMDIParentFrame wxGenericMDIParentFrame
+    #define wxMDIChildFrame wxGenericMDIChildFrame
+    #define wxMDIClientWindow wxGenericMDIClientWindow
+#endif
 
-MyFrame *frame = NULL;
-wxList my_children;
+#include "mdi.h"
 
 IMPLEMENT_APP(MyApp)
 
-// For drawing lines in a canvas
-long xpos = -1;
-long ypos = -1;
+// ---------------------------------------------------------------------------
+// event tables
+// ---------------------------------------------------------------------------
 
-int winNumber = 1;
+BEGIN_EVENT_TABLE(MyFrame, wxMDIParentFrame)
+    EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
+    EVT_MENU(wxID_NEW, MyFrame::OnNewWindow)
+    EVT_MENU(MDI_FULLSCREEN, MyFrame::OnFullScreen)
+    EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
 
-// Initialise this in OnInit, not statically
-bool MyApp::OnInit(void)
-{
-  // Create the main frame window
+    EVT_MENU(wxID_CLOSE_ALL, MyFrame::OnCloseAll)
 
-  frame = new MyFrame(NULL, -1, "MDI Demo", wxPoint(0, 0), wxSize(500, 400),
-   wxDEFAULT_FRAME | wxHSCROLL | wxVSCROLL);
+    EVT_CLOSE(MyFrame::OnClose)
+END_EVENT_TABLE()
 
-  // Give it an icon (this is ignored in MDI mode: uses resources)
-#ifdef __WXMSW__
-  frame->SetIcon(wxIcon("mdi_icn"));
-#endif
-#ifdef __X__
-  frame->SetIcon(wxIcon("aiai.xbm"));
-#endif
+// Note that wxID_NEW and wxID_ABOUT commands get passed
+// to the parent window for processing, so no need to
+// duplicate event handlers here.
+BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame)
+    EVT_MENU(wxID_CLOSE, MyChild::OnClose)
+    EVT_MENU(MDI_REFRESH, MyChild::OnRefresh)
+    EVT_MENU(MDI_CHANGE_TITLE, MyChild::OnChangeTitle)
+    EVT_MENU(MDI_CHANGE_POSITION, MyChild::OnChangePosition)
+    EVT_MENU(MDI_CHANGE_SIZE, MyChild::OnChangeSize)
 
-  // Make a menubar
-  wxMenu *file_menu = new wxMenu;
+#if wxUSE_CLIPBOARD
+    EVT_MENU(wxID_PASTE, MyChild::OnPaste)
+    EVT_UPDATE_UI(wxID_PASTE, MyChild::OnUpdatePaste)
+#endif // wxUSE_CLIPBOARD
 
-  file_menu->Append(MDI_NEW_WINDOW, "&New window");
-  file_menu->Append(MDI_QUIT, "&Exit");
+    EVT_SIZE(MyChild::OnSize)
+    EVT_MOVE(MyChild::OnMove)
 
-  wxMenu *help_menu = new wxMenu;
-  help_menu->Append(MDI_ABOUT, "&About");
+    EVT_CLOSE(MyChild::OnCloseWindow)
+END_EVENT_TABLE()
 
-  wxMenuBar *menu_bar = new wxMenuBar;
+BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
+    EVT_MOUSE_EVENTS(MyCanvas::OnEvent)
+END_EVENT_TABLE()
 
-  menu_bar->Append(file_menu, "&File");
-  menu_bar->Append(help_menu, "&Help");
+BEGIN_EVENT_TABLE(MyChild::EventHandler, wxEvtHandler)
+    EVT_MENU(MDI_REFRESH, MyChild::EventHandler::OnRefresh)
+END_EVENT_TABLE()
 
-  // Associate the menu bar with the frame
-  frame->SetMenuBar(menu_bar);
+// ===========================================================================
+// implementation
+// ===========================================================================
 
-  frame->CreateStatusBar();
+// ---------------------------------------------------------------------------
+// MyApp
+// ---------------------------------------------------------------------------
+
+// Initialise this in OnInit, not statically
+bool MyApp::OnInit()
+{
+    if ( !wxApp::OnInit() )
+        return false;
 
-  frame->Show(TRUE);
+    // Create the main frame window
 
-  SetTopWindow(frame);
+    MyFrame *frame = new MyFrame;
 
-  return TRUE;
+    frame->Show(true);
+
+    return true;
 }
 
-BEGIN_EVENT_TABLE(MyFrame, wxMDIParentFrame)
-    EVT_MENU(MDI_ABOUT, MyFrame::OnAbout)
-    EVT_MENU(MDI_NEW_WINDOW, MyFrame::OnNewWindow)
-    EVT_SIZE(MyFrame::OnSize)
-    EVT_MENU(MDI_QUIT, MyFrame::OnQuit)
-END_EVENT_TABLE()
+// ---------------------------------------------------------------------------
+// MyFrame
+// ---------------------------------------------------------------------------
 
 // Define my frame constructor
-MyFrame::MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title, const wxPoint& pos, const wxSize& size,
-	const long style):
-  wxMDIParentFrame(parent, id, title, pos, size, style)
+MyFrame::MyFrame()
+       : wxMDIParentFrame(NULL, wxID_ANY, "wxWidgets MDI Sample",
+                          wxDefaultPosition, wxSize(500, 400))
 {
-    textWindow = new wxTextCtrl(this, -1, "", wxDefaultPosition, wxDefaultSize,
-        wxTE_MULTILINE|wxSUNKEN_BORDER);
-    textWindow->SetValue("A help window");
+    SetIcon(wxICON(sample));
 
-    toolBar = new TestRibbon(this, 0, 0, 100, 30, wxNO_BORDER, wxVERTICAL, 1);
-    SetToolBar(toolBar);
-}
+    // Make a menubar
+#if wxUSE_MENUS
+    // Associate the menu bar with the frame
+    SetMenuBar(CreateMainMenubar());
 
-void MyFrame::OnQuit(wxCommandEvent& event)
-{
-      Close(TRUE);
+
+    // This shows that the standard window menu may be customized:
+    wxMenu * const windowMenu = GetWindowMenu();
+    if ( windowMenu )
+    {
+        // we can change the labels of standard items (which also means we can
+        // set up accelerators for them as they're part of the label)
+        windowMenu->SetLabel(wxID_MDI_WINDOW_TILE_HORZ,
+                             "&Tile horizontally\tCtrl-Shift-H");
+        windowMenu->SetLabel(wxID_MDI_WINDOW_TILE_VERT,
+                             "&Tile vertically\tCtrl-Shift-V");
+
+        // we can also change the help string
+        windowMenu->SetHelpString(wxID_MDI_WINDOW_CASCADE,
+                                  "Arrange windows in cascade");
+
+        // we can remove some items
+        windowMenu->Delete(wxID_MDI_WINDOW_ARRANGE_ICONS);
+
+        // and we can add completely custom commands -- but then we must handle
+        // them ourselves, see OnCloseAll()
+        windowMenu->AppendSeparator();
+        windowMenu->Append(wxID_CLOSE_ALL, "&Close all windows\tCtrl-Shift-C",
+                           "Close all open windows");
+
+        SetWindowMenu(windowMenu);
+    }
+#endif // wxUSE_MENUS
+
+#if wxUSE_STATUSBAR
+    CreateStatusBar();
+#endif // wxUSE_STATUSBAR
+
+
+    m_textWindow = new wxTextCtrl(this, wxID_ANY, "A help window",
+                                  wxDefaultPosition, wxDefaultSize,
+                                  wxTE_MULTILINE | wxSUNKEN_BORDER);
+
+#if wxUSE_TOOLBAR
+    CreateToolBar(wxNO_BORDER | wxTB_FLAT | wxTB_HORIZONTAL);
+    InitToolBar(GetToolBar());
+#endif // wxUSE_TOOLBAR
+
+#if wxUSE_ACCEL
+    // Accelerators
+    wxAcceleratorEntry entries[3];
+    entries[0].Set(wxACCEL_CTRL, (int) 'N', wxID_NEW);
+    entries[1].Set(wxACCEL_CTRL, (int) 'X', wxID_EXIT);
+    entries[2].Set(wxACCEL_CTRL, (int) 'A', wxID_ABOUT);
+    wxAcceleratorTable accel(3, entries);
+    SetAcceleratorTable(accel);
+#endif // wxUSE_ACCEL
+
+    // connect it only now, after creating m_textWindow
+    Connect(wxEVT_SIZE, wxSizeEventHandler(MyFrame::OnSize));
 }
 
-void MyFrame::OnAbout(wxCommandEvent& event)
+MyFrame::~MyFrame()
 {
-      (void)wxMessageBox("wxWindows 2.0 MDI Demo\nAuthor: Julian Smart (c) 1997\nUsage: mdi.exe", "About MDI Demo");
+    // and disconnect it to prevent accessing already deleted m_textWindow in
+    // the size event handler if it's called during destruction
+    Disconnect(wxEVT_SIZE, wxSizeEventHandler(MyFrame::OnSize));
 }
 
-void MyFrame::OnNewWindow(wxCommandEvent& event)
+#if wxUSE_MENUS
+/* static */
+wxMenuBar *MyFrame::CreateMainMenubar()
 {
-      // Make another frame, containing a canvas
-      MyChild *subframe = new MyChild(frame, "Canvas Frame", wxPoint(10, 10), wxSize(300, 300),
-                             wxDEFAULT_FRAME);
-
-      char titleBuf[100];
-      sprintf(titleBuf, "Canvas Frame %d", winNumber);
-      subframe->SetTitle(titleBuf);
-      winNumber ++;
-
-      // Give it an icon (this is ignored in MDI mode: uses resources)
-#ifdef __WXMSW__
-      subframe->SetIcon(wxIcon("chrt_icn"));
-#endif
-#ifdef __X__
-      subframe->SetIcon(wxIcon("aiai.xbm"));
-#endif
+    wxMenu *menuFile = new wxMenu;
 
-      // Give it a status line
-      subframe->CreateStatusBar();
+    menuFile->Append(wxID_NEW, "&New window\tCtrl-N", "Create a new child window");
+    menuFile->AppendCheckItem(MDI_FULLSCREEN, "Show &full screen\tCtrl-F");
+    menuFile->Append(wxID_EXIT, "&Exit\tAlt-X", "Quit the program");
 
-      // Make a menubar
-      wxMenu *file_menu = new wxMenu;
+    wxMenu *menuHelp = new wxMenu;
+    menuHelp->Append(wxID_ABOUT, "&About\tF1");
 
-      file_menu->Append(MDI_NEW_WINDOW, "&New window");
-      file_menu->Append(MDI_CHILD_QUIT, "&Close child");
-      file_menu->Append(MDI_QUIT, "&Exit");
+    wxMenuBar *mbar = new wxMenuBar;
+    mbar->Append(menuFile, "&File");
+    mbar->Append(menuHelp, "&Help");
 
-      wxMenu *option_menu = new wxMenu;
+    return mbar;
+}
+#endif // wxUSE_MENUS
+
+void MyFrame::OnClose(wxCloseEvent& event)
+{
+    unsigned numChildren = MyChild::GetChildrenCount();
+    if ( event.CanVeto() && (numChildren > 0) )
+    {
+        wxString msg;
+        msg.Printf("%d windows still open, close anyhow?", numChildren);
+        if ( wxMessageBox(msg, "Please confirm",
+                          wxICON_QUESTION | wxYES_NO) != wxYES )
+        {
+            event.Veto();
+
+            return;
+        }
+    }
+
+    event.Skip();
+}
+
+void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
+{
+    Close();
+}
 
-      // Dummy option
-      option_menu->Append(MDI_REFRESH, "&Refresh picture");
+void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
+{
+    (void)wxMessageBox("wxWidgets 2.0 MDI Demo\n"
+                       "Author: Julian Smart (c) 1997\n"
+                       "Usage: mdi.exe", "About MDI Demo");
+}
 
-      wxMenu *help_menu = new wxMenu;
-      help_menu->Append(MDI_ABOUT, "&About");
+void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
+{
+    // create and show another child frame
+    MyChild *subframe = new MyChild(this);
+    subframe->Show(true);
+}
 
-      wxMenuBar *menu_bar = new wxMenuBar;
+void MyFrame::OnFullScreen(wxCommandEvent& event)
+{
+    ShowFullScreen(event.IsChecked());
+}
 
-      menu_bar->Append(file_menu, "&File");
-      menu_bar->Append(option_menu, "&Options");
-      menu_bar->Append(help_menu, "&Help");
+void MyFrame::OnCloseAll(wxCommandEvent& WXUNUSED(event))
+{
+    for ( wxWindowList::const_iterator i = GetChildren().begin();
+          i != GetChildren().end();
+          ++i )
+    {
+        if ( wxDynamicCast(*i, wxMDIChildFrame) )
+            (*i)->Close();
+    }
+}
 
-      // Associate the menu bar with the frame
-      subframe->SetMenuBar(menu_bar);
+void MyFrame::OnSize(wxSizeEvent& event)
+{
+    int w, h;
+    GetClientSize(&w, &h);
 
-      int width, height;
-      subframe->GetClientSize(&width, &height);
-      MyCanvas *canvas = new MyCanvas(subframe, wxPoint(0, 0), wxSize(width, height));
-      canvas->SetCursor(wxCursor(wxCURSOR_PENCIL));
-      subframe->canvas = canvas;
+    m_textWindow->SetSize(0, 0, 200, h);
+    GetClientWindow()->SetSize(200, 0, w - 200, h);
 
-      // Give it scrollbars
-      canvas->SetScrollbars(20, 20, 50, 50);
+    // FIXME: On wxX11, we need the MDI frame to process this
+    // event, but on other platforms this should not
+    // be done.
+#ifdef __WXUNIVERSAL__
+    event.Skip();
+#else
+    wxUnusedVar(event);
+#endif
+}
 
-      subframe->Show(TRUE);
+#if wxUSE_TOOLBAR
+void MyFrame::InitToolBar(wxToolBar* toolBar)
+{
+    wxBitmap bitmaps[8];
+
+    bitmaps[0] = wxBitmap( new_xpm );
+    bitmaps[1] = wxBitmap( open_xpm );
+    bitmaps[2] = wxBitmap( save_xpm );
+    bitmaps[3] = wxBitmap( copy_xpm );
+    bitmaps[4] = wxBitmap( cut_xpm );
+    bitmaps[5] = wxBitmap( paste_xpm );
+    bitmaps[6] = wxBitmap( print_xpm );
+    bitmaps[7] = wxBitmap( help_xpm );
+
+    toolBar->AddTool(wxID_NEW, "New", bitmaps[0], "New file");
+    toolBar->AddTool(1, "Open", bitmaps[1], "Open file");
+    toolBar->AddTool(2, "Save", bitmaps[2], "Save file");
+    toolBar->AddSeparator();
+    toolBar->AddTool(3, "Copy", bitmaps[3], "Copy");
+    toolBar->AddTool(4, "Cut", bitmaps[4], "Cut");
+    toolBar->AddTool(5, "Paste", bitmaps[5], "Paste");
+    toolBar->AddSeparator();
+    toolBar->AddTool(6, "Print", bitmaps[6], "Print");
+    toolBar->AddSeparator();
+    toolBar->AddTool(wxID_ABOUT, "About", bitmaps[7], "Help");
+
+    toolBar->Realize();
 }
+#endif // wxUSE_TOOLBAR
 
-BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
-	EVT_MOUSE_EVENTS(MyCanvas::OnEvent)
-END_EVENT_TABLE()
+// ---------------------------------------------------------------------------
+// MyCanvas
+// ---------------------------------------------------------------------------
 
 // Define a constructor for my canvas
-MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size):
- wxScrolledWindow(parent, -1, pos, size, wxSUNKEN_BORDER)
+MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size)
+        : wxScrolledWindow(parent, wxID_ANY, pos, size,
+                           wxSUNKEN_BORDER |
+                           wxNO_FULL_REPAINT_ON_RESIZE |
+                           wxVSCROLL | wxHSCROLL)
 {
+    SetBackgroundColour(wxColour("WHITE"));
+    SetCursor(wxCursor(wxCURSOR_PENCIL));
+
+    SetScrollbars(20, 20, 50, 50);
+
+    m_dirty = false;
 }
 
 // Define the repainting behaviour
 void MyCanvas::OnDraw(wxDC& dc)
 {
-  dc.SetFont(*wxSWISS_FONT);
-  dc.SetPen(*wxGREEN_PEN);
-  dc.DrawLine(0, 0, 200, 200);
-  dc.DrawLine(200, 0, 0, 200);
-
-  dc.SetBrush(*wxCYAN_BRUSH);
-  dc.SetPen(*wxRED_PEN);
-  dc.DrawRectangle(100, 100, 100, 50);
-  dc.DrawRoundedRectangle(150, 150, 100, 50, 20);
-
-  dc.DrawEllipse(250, 250, 100, 50);
-  dc.DrawSpline(50, 200, 50, 100, 200, 10);
-  dc.DrawLine(50, 230, 200, 230);
-  dc.DrawText("This is a test string", 50, 230);
-
-  wxPoint points[3];
-  points[0].x = 200; points[0].y = 300;
-  points[1].x = 100; points[1].y = 400;
-  points[2].x = 300; points[2].y = 400;
-  
-  dc.DrawPolygon(3, points);
+    if ( !m_text.empty() )
+        dc.DrawText(m_text, 10, 10);
+
+    dc.SetFont(*wxSWISS_FONT);
+    dc.SetPen(*wxGREEN_PEN);
+    dc.DrawLine(0, 0, 200, 200);
+    dc.DrawLine(200, 0, 0, 200);
+
+    dc.SetBrush(*wxCYAN_BRUSH);
+    dc.SetPen(*wxRED_PEN);
+    dc.DrawRectangle(100, 100, 100, 50);
+    dc.DrawRoundedRectangle(150, 150, 100, 50, 20);
+
+    dc.DrawEllipse(250, 250, 100, 50);
+#if wxUSE_SPLINES
+    dc.DrawSpline(50, 200, 50, 100, 200, 10);
+#endif // wxUSE_SPLINES
+    dc.DrawLine(50, 230, 200, 230);
+    dc.DrawText("This is a test string", 50, 230);
+
+    wxPoint points[3];
+    points[0].x = 200; points[0].y = 300;
+    points[1].x = 100; points[1].y = 400;
+    points[2].x = 300; points[2].y = 400;
+
+    dc.DrawPolygon(3, points);
 }
 
-// This implements a tiny doodling program! Drag the mouse using
-// the left button.
+// This implements a tiny doodling program! Drag the mouse using the left
+// button.
 void MyCanvas::OnEvent(wxMouseEvent& event)
 {
-  wxClientDC dc(this);
-  PrepareDC(dc);
-
-  wxPoint pt(event.GetLogicalPosition(dc));
-
-  if (xpos > -1 && ypos > -1 && event.Dragging())
-  {
-    dc.SetPen(*wxBLACK_PEN);
-    dc.DrawLine(xpos, ypos, pt.x, pt.y);
-  }
-  xpos = pt.x;
-  ypos = pt.y;
-}
+    wxClientDC dc(this);
+    PrepareDC(dc);
 
-// Define the behaviour for the frame closing
-// - must delete all frames except for the main one.
-bool MyFrame::OnClose(void)
-{
-  // Must delete children
-  wxNode *node = my_children.First();
-  while (node)
-  {
-    MyChild *child = (MyChild *)node->Data();
-    wxNode *next = node->Next();
-    child->OnClose();
-    delete child;
-    node = next;
-  }
-  return TRUE;
+    wxPoint pt(event.GetLogicalPosition(dc));
+
+    static long xpos = -1;
+    static long ypos = -1;
+
+    if (xpos > -1 && ypos > -1 && event.Dragging())
+    {
+        dc.SetPen(*wxBLACK_PEN);
+        dc.DrawLine(xpos, ypos, pt.x, pt.y);
+
+        m_dirty = true;
+    }
+
+    xpos = pt.x;
+    ypos = pt.y;
 }
 
-void MyFrame::OnSize(wxSizeEvent& event)
+// ---------------------------------------------------------------------------
+// MyChild
+// ---------------------------------------------------------------------------
+
+unsigned MyChild::ms_numChildren = 0;
+
+MyChild::MyChild(wxMDIParentFrame *parent)
+       : wxMDIChildFrame
+         (
+            parent,
+            wxID_ANY,
+            wxString::Format("Child %u", ++ms_numChildren)
+         )
 {
-    int w, h;
-    GetClientSize(&w, &h);
-    int tw = 0;
-    int th = 0;
-    
-    wxWindow* tbar = GetToolBar();
-    if (tbar)
+    m_canvas = new MyCanvas(this, wxPoint(0, 0), GetClientSize());
+
+    SetIcon(wxICON(chart));
+
+    const bool canBeResized = !IsAlwaysMaximized();
+
+    // create our menu bar: it will be shown instead of the main frame one when
+    // we're active
+#if wxUSE_MENUS
+    wxMenuBar *mbar = MyFrame::CreateMainMenubar();
+    mbar->GetMenu(0)->Insert(1, wxID_CLOSE, "&Close child\tCtrl-W",
+                             "Close this window");
+
+    wxMenu *menuChild = new wxMenu;
+
+    menuChild->Append(MDI_REFRESH, "&Refresh picture");
+    menuChild->Append(MDI_CHANGE_TITLE, "Change &title...\tCtrl-T");
+    if ( canBeResized )
     {
-        tbar->GetSize(&tw, &th);
-        tbar->SetSize(w, th);
+        menuChild->AppendSeparator();
+        menuChild->Append(MDI_CHANGE_POSITION, "Move frame\tCtrl-M");
+        menuChild->Append(MDI_CHANGE_SIZE, "Resize frame\tCtrl-S");
     }
+#if wxUSE_CLIPBOARD
+    menuChild->AppendSeparator();
+    menuChild->Append(wxID_PASTE, "Copy text from clipboard\tCtrl-V");
+#endif // wxUSE_CLIPBOARD
 
-    textWindow->SetSize(0, th, 200, h-th);
-    GetClientWindow()->SetSize(200, th, w - 200, h-th);
-}
+    mbar->Insert(1, menuChild, "&Child");
 
-// Note that MDI_NEW_WINDOW and MDI_ABOUT commands get passed
-// to the parent window for processing, so no need to
-// duplicate event handlers here.
+    // Associate the menu bar with the frame
+    SetMenuBar(mbar);
+#endif // wxUSE_MENUS
 
-BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame)
-  EVT_SIZE( MyChild::OnSize)
-  EVT_MENU(MDI_CHILD_QUIT, MyChild::OnQuit)
-END_EVENT_TABLE()
+    // this should work for MDI frames as well as for normal ones, provided
+    // they can be resized at all
+    if ( canBeResized )
+        SetSizeHints(100, 100);
 
-MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title, const wxPoint& pos, const wxSize& size,
-const long style):
-  wxMDIChildFrame(parent, -1, title, pos, size, style)
+    // test that event handlers pushed on top of MDI children do work (this
+    // used to be broken, see #11225)
+    PushEventHandler(new EventHandler(ms_numChildren));
+}
+
+MyChild::~MyChild()
 {
-  canvas = NULL;
-  my_children.Append(this);
+    PopEventHandler(true);
+
+    ms_numChildren--;
 }
 
-MyChild::~MyChild(void)
+void MyChild::OnClose(wxCommandEvent& WXUNUSED(event))
 {
-  my_children.DeleteObject(this);
+    Close(true);
 }
 
-void MyChild::OnSize(wxSizeEvent& WXUNUSED(event))
+void MyChild::OnRefresh(wxCommandEvent& WXUNUSED(event))
 {
-  int x = 0;
-  int y = 0;
-  GetClientSize( &x, &y );
-  if (canvas) canvas->SetSize( x, y );
+    if ( m_canvas )
+        m_canvas->Refresh();
 }
 
-void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
+void MyChild::OnChangePosition(wxCommandEvent& WXUNUSED(event))
 {
-      Close(TRUE);
+    Move(10, 10);
 }
 
-void MyChild::OnActivate(wxActivateEvent& event)
+void MyChild::OnChangeSize(wxCommandEvent& WXUNUSED(event))
 {
-  if (event.GetActive() && canvas)
-    canvas->SetFocus();
+    SetClientSize(100, 100);
 }
 
-bool MyChild::OnClose(void)
+void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event))
 {
-  return TRUE;
+#if wxUSE_TEXTDLG
+    static wxString s_title = "Canvas Frame";
+
+    wxString title = wxGetTextFromUser("Enter the new title for MDI child",
+                                       "MDI sample question",
+                                       s_title,
+                                       GetParent()->GetParent());
+    if ( !title )
+        return;
+
+    s_title = title;
+    SetTitle(s_title);
+#endif // wxUSE_TEXTDLG
 }
 
-BEGIN_EVENT_TABLE(TestRibbon, wxToolBar)
-    EVT_PAINT(TestRibbon::OnPaint)
-END_EVENT_TABLE()
+void MyChild::OnActivate(wxActivateEvent& event)
+{
+    if ( event.GetActive() && m_canvas )
+        m_canvas->SetFocus();
+}
 
-TestRibbon::TestRibbon(wxFrame *frame, int x, int y, int w, int h,
-            long style, int direction, int RowsOrColumns):
-  wxToolBar(frame, -1, wxPoint(x, y), wxSize(w, h), style, direction, RowsOrColumns)
+void MyChild::OnMove(wxMoveEvent& event)
 {
-    wxBitmap* bitmaps[8];
-
-#ifdef __WXMSW__
-    bitmaps[0] = new wxBitmap("icon1", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[1] = new wxBitmap("icon2", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[2] = new wxBitmap("icon3", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[3] = new wxBitmap("icon4", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[4] = new wxBitmap("icon5", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[5] = new wxBitmap("icon6", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[6] = new wxBitmap("icon7", wxBITMAP_TYPE_RESOURCE);
-    bitmaps[7] = new wxBitmap("icon8", wxBITMAP_TYPE_RESOURCE);
-#else
-    bitmaps[0] = new wxBitmap( folder_xpm );
-    bitmaps[1] = new wxBitmap( folder_xpm );
-    bitmaps[2] = new wxBitmap( folder_xpm );
-    bitmaps[3] = new wxBitmap( folder_xpm );
-    bitmaps[4] = new wxBitmap( folder_xpm );
-    bitmaps[5] = new wxBitmap( folder_xpm );
-    bitmaps[6] = new wxBitmap( folder_xpm );
-    bitmaps[7] = new wxBitmap( folder_xpm );
-#endif
+    // VZ: here everything is totally wrong under MSW, the positions are
+    //     different and both wrong (pos2 is off by 2 pixels for me which seems
+    //     to be the width of the MDI canvas border)
+    wxPoint pos1 = event.GetPosition(),
+            pos2 = GetPosition();
+    wxLogStatus("position from event: (%d, %d), from frame (%d, %d)",
+                pos1.x, pos1.y, pos2.x, pos2.y);
+
+    event.Skip();
+}
 
-#ifdef __WXMSW__
-  int width = 24;
-#else
-  int width = 16;
-#endif
-  int offX = 5;
-  int currentX = 5;
-
-  AddTool(0, *bitmaps[0], wxNullBitmap, FALSE, currentX, -1, NULL, "New file");
-  currentX += width + 5;
-  AddTool(1, *bitmaps[1], wxNullBitmap, FALSE, currentX, -1, NULL, "Open file");
-  currentX += width + 5;
-  AddTool(2, *bitmaps[2], wxNullBitmap, FALSE, currentX, -1, NULL, "Save file");
-  currentX += width + 5;
-  AddSeparator();
-  AddTool(3, *bitmaps[3], wxNullBitmap, FALSE, currentX, -1, NULL, "Copy");
-  currentX += width + 5;
-  AddTool(4, *bitmaps[4], wxNullBitmap, FALSE, currentX, -1, NULL, "Cut");
-  currentX += width + 5;
-  AddTool(5, *bitmaps[5], wxNullBitmap, FALSE, currentX, -1, NULL, "Paste");
-  currentX += width + 5;
-  AddSeparator();
-  AddTool(6, *bitmaps[6], wxNullBitmap, FALSE, currentX, -1, NULL, "Print");
-  currentX += width + 5;
-  AddSeparator();
-  AddTool(7, *bitmaps[7], wxNullBitmap, TRUE, currentX, -1, NULL, "Help");
-
-  CreateTools();
-
-  int i;
-  for (i = 0; i < 8; i++)
-    delete bitmaps[i];
+void MyChild::OnSize(wxSizeEvent& event)
+{
+    // VZ: under MSW the size event carries the client size (quite
+    //     unexpectedly) *except* for the very first one which has the full
+    //     size... what should it really be? TODO: check under wxGTK
+    wxSize size1 = event.GetSize(),
+           size2 = GetSize(),
+           size3 = GetClientSize();
+    wxLogStatus("size from event: %dx%d, from frame %dx%d, client %dx%d",
+                size1.x, size1.y, size2.x, size2.y, size3.x, size3.y);
+
+    event.Skip();
 }
 
-bool TestRibbon::OnLeftClick(int toolIndex, bool toggled)
+void MyChild::OnCloseWindow(wxCloseEvent& event)
 {
-  char buf[200];
-  sprintf(buf, "Clicked on tool %d", toolIndex);
-  frame->SetStatusText(buf);
-  return TRUE;
+    if ( m_canvas && m_canvas->IsDirty() )
+    {
+        if ( wxMessageBox("Really close?", "Please confirm",
+                          wxICON_QUESTION | wxYES_NO) != wxYES )
+        {
+            event.Veto();
+
+            return;
+        }
+    }
+
+    event.Skip();
 }
 
-void TestRibbon::OnMouseEnter(int toolIndex)
+#if wxUSE_CLIPBOARD
+
+#include "wx/clipbrd.h"
+
+void MyChild::OnPaste(wxCommandEvent& WXUNUSED(event))
 {
-  char buf[200];
-  if (toolIndex > -1)
-  {
-    sprintf(buf, "This is tool number %d", toolIndex);
-    frame->SetStatusText(buf);
-  }
-  else frame->SetStatusText("");
+    wxClipboardLocker lock;
+    wxTextDataObject data;
+    m_canvas->SetText(wxTheClipboard->GetData(data)
+                        ? data.GetText()
+                        : wxString("No text on clipboard"));
 }
 
-void TestRibbon::OnPaint(wxPaintEvent& event)
+void MyChild::OnUpdatePaste(wxUpdateUIEvent& event)
 {
-  wxToolBar::OnPaint(event);
-
-  wxPaintDC dc(this);
-  
-  int w, h;
-  GetSize(&w, &h);
-  dc.SetPen(*wxBLACK_PEN);
-  dc.SetBrush(*wxTRANSPARENT_BRUSH);
-  dc.DrawLine(0, h-1, w, h-1);
+    wxClipboardLocker lock;
+    event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) );
 }
 
+#endif // wxUSE_CLIPBOARD