///////////////////////////////////////////////////////////////////////////// // Name: mdi.cpp // Purpose: MDI sample // Author: Julian Smart // Modified by: // Created: 04/01/98 // RCS-ID: $Id$ // Copyright: (c) Julian Smart // Licence: wxWindows license ///////////////////////////////////////////////////////////////////////////// // =========================================================================== // declarations // =========================================================================== // --------------------------------------------------------------------------- // headers // --------------------------------------------------------------------------- // For compilers that support precompilation, includes "wx/wx.h". #include "wx/wxprec.h" #ifdef __BORLANDC__ #pragma hdrstop #endif #ifndef WX_PRECOMP #include "wx/wx.h" #include "wx/mdi.h" #endif #include "wx/toolbar.h" #if !defined(__WXMSW__) #include "../sample.xpm" #include "chart.xpm" #endif #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" #include "mdi.h" IMPLEMENT_APP(MyApp) // --------------------------------------------------------------------------- // global variables // --------------------------------------------------------------------------- MyFrame *frame = (MyFrame *) NULL; wxList my_children; // For drawing lines in a canvas static long xpos = -1; static long ypos = -1; static int gs_nFrames = 0; // --------------------------------------------------------------------------- // event tables // --------------------------------------------------------------------------- BEGIN_EVENT_TABLE(MyFrame, wxMDIParentFrame) EVT_MENU(MDI_ABOUT, MyFrame::OnAbout) EVT_MENU(MDI_NEW_WINDOW, MyFrame::OnNewWindow) EVT_MENU(MDI_QUIT, MyFrame::OnQuit) EVT_CLOSE(MyFrame::OnClose) EVT_SIZE(MyFrame::OnSize) END_EVENT_TABLE() // 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. BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame) EVT_MENU(MDI_CHILD_QUIT, MyChild::OnQuit) 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) #if wxUSE_CLIPBOARD EVT_MENU(wxID_PASTE, MyChild::OnPaste) EVT_UPDATE_UI(wxID_PASTE, MyChild::OnUpdatePaste) #endif // wxUSE_CLIPBOARD EVT_SIZE(MyChild::OnSize) EVT_MOVE(MyChild::OnMove) EVT_CLOSE(MyChild::OnClose) END_EVENT_TABLE() BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow) EVT_MOUSE_EVENTS(MyCanvas::OnEvent) END_EVENT_TABLE() // =========================================================================== // implementation // =========================================================================== // --------------------------------------------------------------------------- // MyApp // --------------------------------------------------------------------------- // Initialise this in OnInit, not statically bool MyApp::OnInit() { if ( !wxApp::OnInit() ) return false; // Create the main frame window frame = new MyFrame((wxFrame *)NULL, wxID_ANY, _T("MDI Demo"), wxDefaultPosition, wxSize(500, 400), wxDEFAULT_FRAME_STYLE | wxHSCROLL | wxVSCROLL); #if 0 // Experimental: change the window menu wxMenu* windowMenu = new wxMenu; windowMenu->Append(5000, _T("My menu item!")); frame->SetWindowMenu(windowMenu); #endif // Give it an icon frame->SetIcon(wxICON(sample)); // Make a menubar wxMenu *file_menu = new wxMenu; file_menu->Append(MDI_NEW_WINDOW, _T("&New window\tCtrl-N"), _T("Create a new child window")); file_menu->Append(MDI_QUIT, _T("&Exit\tAlt-X"), _T("Quit the program")); wxMenu *help_menu = new wxMenu; help_menu->Append(MDI_ABOUT, _T("&About\tF1")); wxMenuBar *menu_bar = new wxMenuBar; menu_bar->Append(file_menu, _T("&File")); menu_bar->Append(help_menu, _T("&Help")); // Associate the menu bar with the frame frame->SetMenuBar(menu_bar); #if wxUSE_STATUSBAR frame->CreateStatusBar(); #endif // wxUSE_STATUSBAR frame->Show(true); SetTopWindow(frame); return true; } // --------------------------------------------------------------------------- // 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) { textWindow = new wxTextCtrl(this, wxID_ANY, _T("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', MDI_NEW_WINDOW); entries[1].Set(wxACCEL_CTRL, (int) 'X', MDI_QUIT); entries[2].Set(wxACCEL_CTRL, (int) 'A', MDI_ABOUT); wxAcceleratorTable accel(3, entries); SetAcceleratorTable(accel); #endif // wxUSE_ACCEL } void MyFrame::OnClose(wxCloseEvent& event) { if ( event.CanVeto() && (gs_nFrames > 0) ) { wxString msg; msg.Printf(_T("%d windows still open, close anyhow?"), gs_nFrames); if ( wxMessageBox(msg, _T("Please confirm"), wxICON_QUESTION | wxYES_NO) != wxYES ) { event.Veto(); return; } } event.Skip(); } void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event)) { Close(); } void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) ) { (void)wxMessageBox(_T("wxWidgets 2.0 MDI Demo\n") _T("Author: Julian Smart (c) 1997\n") _T("Usage: mdi.exe"), _T("About MDI Demo")); } void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) ) { // Make another frame, containing a canvas MyChild *subframe = new MyChild(frame, _T("Canvas Frame")); wxString title; title.Printf(_T("Canvas Frame %d"), ++gs_nFrames); subframe->SetTitle(title); // Give it an icon subframe->SetIcon(wxICON(chart)); #if wxUSE_MENUS // Make a menubar wxMenu *file_menu = new wxMenu; file_menu->Append(MDI_NEW_WINDOW, _T("&New window")); file_menu->Append(MDI_CHILD_QUIT, _T("&Close child"), _T("Close this window")); file_menu->Append(MDI_QUIT, _T("&Exit")); wxMenu *option_menu = new wxMenu; option_menu->Append(MDI_REFRESH, _T("&Refresh picture")); option_menu->Append(MDI_CHANGE_TITLE, _T("Change &title...\tCtrl-T")); option_menu->AppendSeparator(); option_menu->Append(MDI_CHANGE_POSITION, _T("Move frame\tCtrl-M")); option_menu->Append(MDI_CHANGE_SIZE, _T("Resize frame\tCtrl-S")); #if wxUSE_CLIPBOARD option_menu->AppendSeparator(); option_menu->Append(wxID_PASTE, _T("Copy text from clipboard\tCtrl-V")); #endif // wxUSE_CLIPBOARD wxMenu *help_menu = new wxMenu; help_menu->Append(MDI_ABOUT, _T("&About")); wxMenuBar *menu_bar = new wxMenuBar; menu_bar->Append(file_menu, _T("&File")); menu_bar->Append(option_menu, _T("&Child")); menu_bar->Append(help_menu, _T("&Help")); // Associate the menu bar with the frame subframe->SetMenuBar(menu_bar); #endif // wxUSE_MENUS 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; // Give it scrollbars canvas->SetScrollbars(20, 20, 50, 50); subframe->Show(true); } void MyFrame::OnSize(wxSizeEvent& #ifdef __WXUNIVERSAL__ event #else WXUNUSED(event) #endif ) { int w, h; GetClientSize(&w, &h); textWindow->SetSize(0, 0, 200, h); GetClientWindow()->SetSize(200, 0, w - 200, h); // 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(); #endif } #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(MDI_NEW_WINDOW, _T("New"), bitmaps[0], _T("New file")); toolBar->AddTool(1, _T("Open"), bitmaps[1], _T("Open file")); toolBar->AddTool(2, _T("Save"), bitmaps[2], _T("Save file")); toolBar->AddSeparator(); toolBar->AddTool(3, _T("Copy"), bitmaps[3], _T("Copy")); toolBar->AddTool(4, _T("Cut"), bitmaps[4], _T("Cut")); toolBar->AddTool(5, _T("Paste"), bitmaps[5], _T("Paste")); toolBar->AddSeparator(); toolBar->AddTool(6, _T("Print"), bitmaps[6], _T("Print")); toolBar->AddSeparator(); toolBar->AddTool(MDI_ABOUT, _T("About"), bitmaps[7], _T("Help")); toolBar->Realize(); } #endif // wxUSE_TOOLBAR // --------------------------------------------------------------------------- // MyCanvas // --------------------------------------------------------------------------- // Define a constructor for my canvas 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(_T("WHITE"))); m_dirty = false; } // Define the repainting behaviour void MyCanvas::OnDraw(wxDC& dc) { 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(_T("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. 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); m_dirty = true; } xpos = pt.x; ypos = pt.y; } // --------------------------------------------------------------------------- // MyChild // --------------------------------------------------------------------------- MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title) : wxMDIChildFrame(parent, wxID_ANY, title, wxDefaultPosition, wxDefaultSize, wxDEFAULT_FRAME_STYLE | wxNO_FULL_REPAINT_ON_RESIZE) { canvas = (MyCanvas *) NULL; my_children.Append(this); // this should work for MDI frames as well as for normal ones SetSizeHints(100, 100); } MyChild::~MyChild() { my_children.DeleteObject(this); } void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event)) { Close(true); } void MyChild::OnRefresh(wxCommandEvent& WXUNUSED(event)) { if ( canvas ) canvas->Refresh(); } void MyChild::OnChangePosition(wxCommandEvent& WXUNUSED(event)) { Move(10, 10); } void MyChild::OnChangeSize(wxCommandEvent& WXUNUSED(event)) { SetClientSize(100, 100); } void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event)) { #if wxUSE_TEXTDLG static wxString s_title = _T("Canvas Frame"); wxString title = wxGetTextFromUser(_T("Enter the new title for MDI child"), _T("MDI sample question"), s_title, GetParent()->GetParent()); if ( !title ) return; s_title = title; SetTitle(s_title); #endif // wxUSE_TEXTDLG } void MyChild::OnActivate(wxActivateEvent& event) { if ( event.GetActive() && canvas ) canvas->SetFocus(); } void MyChild::OnMove(wxMoveEvent& event) { // 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(wxT("position from event: (%d, %d), from frame (%d, %d)"), pos1.x, pos1.y, pos2.x, pos2.y); event.Skip(); } 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(wxT("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(); } void MyChild::OnClose(wxCloseEvent& event) { if ( canvas && canvas->IsDirty() ) { if ( wxMessageBox(_T("Really close?"), _T("Please confirm"), wxICON_QUESTION | wxYES_NO) != wxYES ) { event.Veto(); return; } } gs_nFrames--; event.Skip(); } #if wxUSE_CLIPBOARD #include "wx/clipbrd.h" void MyChild::OnPaste(wxCommandEvent& WXUNUSED(event)) { wxClipboardLocker lock; wxTextDataObject data; canvas->SetText( ( wxTheClipboard->GetData(data) ? data.GetText() : wxString("No text on clipboard") ).c_str() ); } void MyChild::OnUpdatePaste(wxUpdateUIEvent& event) { wxClipboardLocker lock; event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) ); } #endif // wxUSE_CLIPBOARD