samples/mdi/mdi.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        mdi.cpp
   3 // Purpose:     MDI sample
   4 // Author:      Julian Smart
   5 // Modified by: 2008-10-31 Vadim Zeitlin: big clean up
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1997 Julian Smart
   9 //              (c) 2008 Vadim Zeitlin
  10 // Licence:     wxWindows license
  11 /////////////////////////////////////////////////////////////////////////////
  12
  13 // ===========================================================================
  14 // declarations
  15 // ===========================================================================
  16
  17 // ---------------------------------------------------------------------------
  18 // headers
  19 // ---------------------------------------------------------------------------
  20
  21 // For compilers that support precompilation, includes "wx/wx.h".
  22 #include "wx/wxprec.h"
  23
  24 #ifdef __BORLANDC__
  25     #pragma hdrstop
  26 #endif
  27
  28 #ifndef WX_PRECOMP
  29     #include "wx/wx.h"
  30     #include "wx/mdi.h"
  31 #endif
  32
  33 #include "wx/toolbar.h"
  34
  35 #if !defined(__WXMSW__)
  36     #include "../sample.xpm"
  37     #include "chart.xpm"
  38 #endif
  39
  40 #include "bitmaps/new.xpm"
  41 #include "bitmaps/open.xpm"
  42 #include "bitmaps/save.xpm"
  43 #include "bitmaps/copy.xpm"
  44 #include "bitmaps/cut.xpm"
  45 #include "bitmaps/paste.xpm"
  46 #include "bitmaps/print.xpm"
  47 #include "bitmaps/help.xpm"
  48
  49 // replace this 0 with 1 to build the sample using the generic MDI classes (you
  50 // may also need to add src/generic/mdig.cpp to the build)
  51 #if 0
  52     #include "wx/generic/mdig.h"
  53     #define wxMDIParentFrame wxGenericMDIParentFrame
  54     #define wxMDIChildFrame wxGenericMDIChildFrame
  55     #define wxMDIClientWindow wxGenericMDIClientWindow
  56 #endif
  57
  58 #include "mdi.h"
  59
  60 IMPLEMENT_APP(MyApp)
  61
  62 // ---------------------------------------------------------------------------
  63 // event tables
  64 // ---------------------------------------------------------------------------
  65
  66 BEGIN_EVENT_TABLE(MyFrame, wxMDIParentFrame)
  67     EVT_MENU(wxID_ABOUT, MyFrame::OnAbout)
  68     EVT_MENU(wxID_NEW, MyFrame::OnNewWindow)
  69     EVT_MENU(wxID_EXIT, MyFrame::OnQuit)
  70
  71     EVT_CLOSE(MyFrame::OnClose)
  72 END_EVENT_TABLE()
  73
  74 // Note that wxID_NEW and wxID_ABOUT commands get passed
  75 // to the parent window for processing, so no need to
  76 // duplicate event handlers here.
  77 BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame)
  78     EVT_MENU(wxID_CLOSE, MyChild::OnClose)
  79     EVT_MENU(MDI_REFRESH, MyChild::OnRefresh)
  80     EVT_MENU(MDI_CHANGE_TITLE, MyChild::OnChangeTitle)
  81     EVT_MENU(MDI_CHANGE_POSITION, MyChild::OnChangePosition)
  82     EVT_MENU(MDI_CHANGE_SIZE, MyChild::OnChangeSize)
  83
  84 #if wxUSE_CLIPBOARD
  85     EVT_MENU(wxID_PASTE, MyChild::OnPaste)
  86     EVT_UPDATE_UI(wxID_PASTE, MyChild::OnUpdatePaste)
  87 #endif // wxUSE_CLIPBOARD
  88
  89     EVT_SIZE(MyChild::OnSize)
  90     EVT_MOVE(MyChild::OnMove)
  91
  92     EVT_CLOSE(MyChild::OnCloseWindow)
  93 END_EVENT_TABLE()
  94
  95 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
  96     EVT_MOUSE_EVENTS(MyCanvas::OnEvent)
  97 END_EVENT_TABLE()
  98
  99 // ===========================================================================
 100 // implementation
 101 // ===========================================================================
 102
 103 // ---------------------------------------------------------------------------
 104 // MyApp
 105 // ---------------------------------------------------------------------------
 106
 107 // Initialise this in OnInit, not statically
 108 bool MyApp::OnInit()
 109 {
 110     if ( !wxApp::OnInit() )
 111         return false;
 112
 113     // Create the main frame window
 114
 115     MyFrame *frame = new MyFrame;
 116
 117     frame->Show(true);
 118
 119     return true;
 120 }
 121
 122 // ---------------------------------------------------------------------------
 123 // MyFrame
 124 // ---------------------------------------------------------------------------
 125
 126 // Define my frame constructor
 127 MyFrame::MyFrame()
 128        : wxMDIParentFrame(NULL, wxID_ANY, "wxWidgets MDI Sample",
 129                           wxDefaultPosition, wxSize(500, 400))
 130 {
 131     SetIcon(wxICON(sample));
 132
 133     // Make a menubar
 134 #if wxUSE_MENUS
 135     wxMenu *file_menu = new wxMenu;
 136
 137     file_menu->Append(wxID_NEW, "&New window\tCtrl-N", "Create a new child window");
 138     file_menu->Append(wxID_EXIT, "&Exit\tAlt-X", "Quit the program");
 139
 140     wxMenu *help_menu = new wxMenu;
 141     help_menu->Append(wxID_ABOUT, "&About\tF1");
 142
 143     wxMenuBar *menu_bar = new wxMenuBar;
 144
 145     menu_bar->Append(file_menu, "&File");
 146     menu_bar->Append(help_menu, "&Help");
 147
 148     // Associate the menu bar with the frame
 149     SetMenuBar(menu_bar);
 150
 151 #if 0
 152     // Experimental: change the window menu
 153     wxMenu* windowMenu = new wxMenu;
 154     windowMenu->Append(5000, "My menu item!");
 155     frame->SetWindowMenu(windowMenu);
 156 #endif
 157 #endif // wxUSE_MENUS
 158
 159 #if wxUSE_STATUSBAR
 160     CreateStatusBar();
 161 #endif // wxUSE_STATUSBAR
 162
 163
 164     m_textWindow = new wxTextCtrl(this, wxID_ANY, "A help window",
 165                                   wxDefaultPosition, wxDefaultSize,
 166                                   wxTE_MULTILINE | wxSUNKEN_BORDER);
 167
 168 #if wxUSE_TOOLBAR
 169     CreateToolBar(wxNO_BORDER | wxTB_FLAT | wxTB_HORIZONTAL);
 170     InitToolBar(GetToolBar());
 171 #endif // wxUSE_TOOLBAR
 172
 173 #if wxUSE_ACCEL
 174     // Accelerators
 175     wxAcceleratorEntry entries[3];
 176     entries[0].Set(wxACCEL_CTRL, (int) 'N', wxID_NEW);
 177     entries[1].Set(wxACCEL_CTRL, (int) 'X', wxID_EXIT);
 178     entries[2].Set(wxACCEL_CTRL, (int) 'A', wxID_ABOUT);
 179     wxAcceleratorTable accel(3, entries);
 180     SetAcceleratorTable(accel);
 181 #endif // wxUSE_ACCEL
 182
 183     // connect it only now, after creating m_textWindow
 184     Connect(wxEVT_SIZE, wxSizeEventHandler(MyFrame::OnSize));
 185 }
 186
 187 MyFrame::~MyFrame()
 188 {
 189     // and disconnect it to prevent accessing already deleted m_textWindow in
 190     // the size event handler if it's called during destruction
 191     Disconnect(wxEVT_SIZE, wxSizeEventHandler(MyFrame::OnSize));
 192 }
 193
 194 void MyFrame::OnClose(wxCloseEvent& event)
 195 {
 196     unsigned numChildren = MyChild::GetChildrenCount();
 197     if ( event.CanVeto() && (numChildren > 0) )
 198     {
 199         wxString msg;
 200         msg.Printf("%d windows still open, close anyhow?", numChildren);
 201         if ( wxMessageBox(msg, "Please confirm",
 202                           wxICON_QUESTION | wxYES_NO) != wxYES )
 203         {
 204             event.Veto();
 205
 206             return;
 207         }
 208     }
 209
 210     event.Skip();
 211 }
 212
 213 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 214 {
 215     Close();
 216 }
 217
 218 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
 219 {
 220     (void)wxMessageBox("wxWidgets 2.0 MDI Demo\n"
 221                        "Author: Julian Smart (c) 1997\n"
 222                        "Usage: mdi.exe", "About MDI Demo");
 223 }
 224
 225 void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
 226 {
 227     // create and show another child frame
 228     MyChild *subframe = new MyChild(this);
 229     subframe->Show(true);
 230 }
 231
 232 void MyFrame::OnSize(wxSizeEvent&
 233                                   #ifdef __WXUNIVERSAL__
 234                                   event
 235                                   #else
 236                                   WXUNUSED(event)
 237                                   #endif
 238                                   )
 239 {
 240     int w, h;
 241     GetClientSize(&w, &h);
 242
 243     m_textWindow->SetSize(0, 0, 200, h);
 244     GetClientWindow()->SetSize(200, 0, w - 200, h);
 245
 246     // FIXME: On wxX11, we need the MDI frame to process this
 247     // event, but on other platforms this should not
 248     // be done.
 249 #ifdef __WXUNIVERSAL__
 250     event.Skip();
 251 #endif
 252 }
 253
 254 #if wxUSE_TOOLBAR
 255 void MyFrame::InitToolBar(wxToolBar* toolBar)
 256 {
 257     wxBitmap bitmaps[8];
 258
 259     bitmaps[0] = wxBitmap( new_xpm );
 260     bitmaps[1] = wxBitmap( open_xpm );
 261     bitmaps[2] = wxBitmap( save_xpm );
 262     bitmaps[3] = wxBitmap( copy_xpm );
 263     bitmaps[4] = wxBitmap( cut_xpm );
 264     bitmaps[5] = wxBitmap( paste_xpm );
 265     bitmaps[6] = wxBitmap( print_xpm );
 266     bitmaps[7] = wxBitmap( help_xpm );
 267
 268     toolBar->AddTool(wxID_NEW, "New", bitmaps[0], "New file");
 269     toolBar->AddTool(1, "Open", bitmaps[1], "Open file");
 270     toolBar->AddTool(2, "Save", bitmaps[2], "Save file");
 271     toolBar->AddSeparator();
 272     toolBar->AddTool(3, "Copy", bitmaps[3], "Copy");
 273     toolBar->AddTool(4, "Cut", bitmaps[4], "Cut");
 274     toolBar->AddTool(5, "Paste", bitmaps[5], "Paste");
 275     toolBar->AddSeparator();
 276     toolBar->AddTool(6, "Print", bitmaps[6], "Print");
 277     toolBar->AddSeparator();
 278     toolBar->AddTool(wxID_ABOUT, "About", bitmaps[7], "Help");
 279
 280     toolBar->Realize();
 281 }
 282 #endif // wxUSE_TOOLBAR
 283
 284 // ---------------------------------------------------------------------------
 285 // MyCanvas
 286 // ---------------------------------------------------------------------------
 287
 288 // Define a constructor for my canvas
 289 MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size)
 290         : wxScrolledWindow(parent, wxID_ANY, pos, size,
 291                            wxSUNKEN_BORDER |
 292                            wxNO_FULL_REPAINT_ON_RESIZE |
 293                            wxVSCROLL | wxHSCROLL)
 294 {
 295     SetBackgroundColour(wxColour("WHITE"));
 296     SetCursor(wxCursor(wxCURSOR_PENCIL));
 297
 298     SetScrollbars(20, 20, 50, 50);
 299
 300     m_dirty = false;
 301 }
 302
 303 // Define the repainting behaviour
 304 void MyCanvas::OnDraw(wxDC& dc)
 305 {
 306     if ( !m_text.empty() )
 307         dc.DrawText(m_text, 10, 10);
 308
 309     dc.SetFont(*wxSWISS_FONT);
 310     dc.SetPen(*wxGREEN_PEN);
 311     dc.DrawLine(0, 0, 200, 200);
 312     dc.DrawLine(200, 0, 0, 200);
 313
 314     dc.SetBrush(*wxCYAN_BRUSH);
 315     dc.SetPen(*wxRED_PEN);
 316     dc.DrawRectangle(100, 100, 100, 50);
 317     dc.DrawRoundedRectangle(150, 150, 100, 50, 20);
 318
 319     dc.DrawEllipse(250, 250, 100, 50);
 320 #if wxUSE_SPLINES
 321     dc.DrawSpline(50, 200, 50, 100, 200, 10);
 322 #endif // wxUSE_SPLINES
 323     dc.DrawLine(50, 230, 200, 230);
 324     dc.DrawText("This is a test string", 50, 230);
 325
 326     wxPoint points[3];
 327     points[0].x = 200; points[0].y = 300;
 328     points[1].x = 100; points[1].y = 400;
 329     points[2].x = 300; points[2].y = 400;
 330
 331     dc.DrawPolygon(3, points);
 332 }
 333
 334 // This implements a tiny doodling program! Drag the mouse using the left
 335 // button.
 336 void MyCanvas::OnEvent(wxMouseEvent& event)
 337 {
 338     wxClientDC dc(this);
 339     PrepareDC(dc);
 340
 341     wxPoint pt(event.GetLogicalPosition(dc));
 342
 343     static long xpos = -1;
 344     static long ypos = -1;
 345
 346     if (xpos > -1 && ypos > -1 && event.Dragging())
 347     {
 348         dc.SetPen(*wxBLACK_PEN);
 349         dc.DrawLine(xpos, ypos, pt.x, pt.y);
 350
 351         m_dirty = true;
 352     }
 353
 354     xpos = pt.x;
 355     ypos = pt.y;
 356 }
 357
 358 // ---------------------------------------------------------------------------
 359 // MyChild
 360 // ---------------------------------------------------------------------------
 361
 362 unsigned MyChild::ms_numChildren = 0;
 363
 364 MyChild::MyChild(wxMDIParentFrame *parent)
 365        : wxMDIChildFrame
 366          (
 367             parent,
 368             wxID_ANY,
 369             wxString::Format("Child %u", ++ms_numChildren)
 370          )
 371 {
 372     m_canvas = new MyCanvas(this, wxPoint(0, 0), GetClientSize());
 373
 374     SetIcon(wxICON(chart));
 375
 376     const bool canBeResized = !IsAlwaysMaximized();
 377
 378     // create our menubar: it will be shown instead of the main frame one when
 379     // we're active
 380 #if wxUSE_MENUS
 381     // Make a menubar
 382     wxMenu *file_menu = new wxMenu;
 383
 384     file_menu->Append(wxID_NEW, "&New window\tCtrl-N");
 385     file_menu->Append(wxID_CLOSE, "&Close child\tCtrl-W", "Close this window");
 386     file_menu->Append(wxID_EXIT, "&Exit\tAlt-X", "Quit the program");
 387
 388     wxMenu *option_menu = new wxMenu;
 389
 390     option_menu->Append(MDI_REFRESH, "&Refresh picture");
 391     option_menu->Append(MDI_CHANGE_TITLE, "Change &title...\tCtrl-T");
 392     if ( canBeResized )
 393     {
 394         option_menu->AppendSeparator();
 395         option_menu->Append(MDI_CHANGE_POSITION, "Move frame\tCtrl-M");
 396         option_menu->Append(MDI_CHANGE_SIZE, "Resize frame\tCtrl-S");
 397     }
 398 #if wxUSE_CLIPBOARD
 399     option_menu->AppendSeparator();
 400     option_menu->Append(wxID_PASTE, "Copy text from clipboard\tCtrl-V");
 401 #endif // wxUSE_CLIPBOARD
 402
 403     wxMenu *help_menu = new wxMenu;
 404     help_menu->Append(wxID_ABOUT, "&About");
 405
 406     wxMenuBar *menu_bar = new wxMenuBar;
 407
 408     menu_bar->Append(file_menu, "&File");
 409     menu_bar->Append(option_menu, "&Child");
 410     menu_bar->Append(help_menu, "&Help");
 411
 412     // Associate the menu bar with the frame
 413     SetMenuBar(menu_bar);
 414 #endif // wxUSE_MENUS
 415
 416     // this should work for MDI frames as well as for normal ones, provided
 417     // they can be resized at all
 418     if ( canBeResized )
 419         SetSizeHints(100, 100);
 420 }
 421
 422 MyChild::~MyChild()
 423 {
 424     ms_numChildren--;
 425 }
 426
 427 void MyChild::OnClose(wxCommandEvent& WXUNUSED(event))
 428 {
 429     Close(true);
 430 }
 431
 432 void MyChild::OnRefresh(wxCommandEvent& WXUNUSED(event))
 433 {
 434     if ( m_canvas )
 435         m_canvas->Refresh();
 436 }
 437
 438 void MyChild::OnChangePosition(wxCommandEvent& WXUNUSED(event))
 439 {
 440     Move(10, 10);
 441 }
 442
 443 void MyChild::OnChangeSize(wxCommandEvent& WXUNUSED(event))
 444 {
 445     SetClientSize(100, 100);
 446 }
 447
 448 void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event))
 449 {
 450 #if wxUSE_TEXTDLG
 451     static wxString s_title = "Canvas Frame";
 452
 453     wxString title = wxGetTextFromUser("Enter the new title for MDI child",
 454                                        "MDI sample question",
 455                                        s_title,
 456                                        GetParent()->GetParent());
 457     if ( !title )
 458         return;
 459
 460     s_title = title;
 461     SetTitle(s_title);
 462 #endif // wxUSE_TEXTDLG
 463 }
 464
 465 void MyChild::OnActivate(wxActivateEvent& event)
 466 {
 467     if ( event.GetActive() && m_canvas )
 468         m_canvas->SetFocus();
 469 }
 470
 471 void MyChild::OnMove(wxMoveEvent& event)
 472 {
 473     // VZ: here everything is totally wrong under MSW, the positions are
 474     //     different and both wrong (pos2 is off by 2 pixels for me which seems
 475     //     to be the width of the MDI canvas border)
 476     wxPoint pos1 = event.GetPosition(),
 477             pos2 = GetPosition();
 478     wxLogStatus("position from event: (%d, %d), from frame (%d, %d)",
 479                 pos1.x, pos1.y, pos2.x, pos2.y);
 480
 481     event.Skip();
 482 }
 483
 484 void MyChild::OnSize(wxSizeEvent& event)
 485 {
 486     // VZ: under MSW the size event carries the client size (quite
 487     //     unexpectedly) *except* for the very first one which has the full
 488     //     size... what should it really be? TODO: check under wxGTK
 489     wxSize size1 = event.GetSize(),
 490            size2 = GetSize(),
 491            size3 = GetClientSize();
 492     wxLogStatus("size from event: %dx%d, from frame %dx%d, client %dx%d",
 493                 size1.x, size1.y, size2.x, size2.y, size3.x, size3.y);
 494
 495     event.Skip();
 496 }
 497
 498 void MyChild::OnCloseWindow(wxCloseEvent& event)
 499 {
 500     if ( m_canvas && m_canvas->IsDirty() )
 501     {
 502         if ( wxMessageBox("Really close?", "Please confirm",
 503                           wxICON_QUESTION | wxYES_NO) != wxYES )
 504         {
 505             event.Veto();
 506
 507             return;
 508         }
 509     }
 510
 511     event.Skip();
 512 }
 513
 514 #if wxUSE_CLIPBOARD
 515
 516 #include "wx/clipbrd.h"
 517
 518 void MyChild::OnPaste(wxCommandEvent& WXUNUSED(event))
 519 {
 520     wxClipboardLocker lock;
 521     wxTextDataObject data;
 522     m_canvas->SetText(wxTheClipboard->GetData(data)
 523                         ? data.GetText()
 524                         : wxString("No text on clipboard"));
 525 }
 526
 527 void MyChild::OnUpdatePaste(wxUpdateUIEvent& event)
 528 {
 529     wxClipboardLocker lock;
 530     event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) );
 531 }
 532
 533 #endif // wxUSE_CLIPBOARD