// Modified by:
// Created: 04/01/98
// RCS-ID: $Id$
-// Copyright: (c) Julian Smart and Markus Holzem
-// Licence: wxWindows license
+// 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
+ #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"
+
+#if !defined(__WXMSW__)
+ #include "../sample.xpm"
+ #include "chart.xpm"
+#endif
-#if defined(__WXGTK__) || defined(__WXMOTIF__)
-#include "mondrian.xpm"
#include "bitmaps/new.xpm"
#include "bitmaps/open.xpm"
#include "bitmaps/save.xpm"
#include "bitmaps/paste.xpm"
#include "bitmaps/print.xpm"
#include "bitmaps/help.xpm"
-#endif
#include "mdi.h"
+IMPLEMENT_APP(MyApp)
+
+// ---------------------------------------------------------------------------
+// global variables
+// ---------------------------------------------------------------------------
+
MyFrame *frame = (MyFrame *) NULL;
wxList my_children;
-IMPLEMENT_APP(MyApp)
-
// For drawing lines in a canvas
-long xpos = -1;
-long ypos = -1;
+static long xpos = -1;
+static long ypos = -1;
-int winNumber = 1;
+static int gs_nFrames = 0;
-// Initialise this in OnInit, not statically
-bool MyApp::OnInit(void)
-{
- // Create the main frame window
+// ---------------------------------------------------------------------------
+// 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
- frame = new MyFrame((wxFrame *) NULL, -1, (char *) "MDI Demo", wxPoint(-1, -1), wxSize(500, 400),
- wxDEFAULT_FRAME | wxHSCROLL | wxVSCROLL);
+ EVT_SIZE(MyChild::OnSize)
+ EVT_MOVE(MyChild::OnMove)
- // Give it an icon
-#ifdef __WXMSW__
- frame->SetIcon(wxIcon("mdi_icn"));
-#else
- frame->SetIcon(wxIcon( mondrian_xpm ));
+ 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
- // Make a menubar
- wxMenu *file_menu = new wxMenu;
+ // Give it an icon
+ frame->SetIcon(wxICON(sample));
+
+ // Make a menubar
+ wxMenu *file_menu = new wxMenu;
- file_menu->Append(MDI_NEW_WINDOW, "&New window");
- file_menu->Append(MDI_QUIT, "&Exit");
+ 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, "&About");
+ wxMenu *help_menu = new wxMenu;
+ help_menu->Append(MDI_ABOUT, _T("&About\tF1"));
- wxMenuBar *menu_bar = new wxMenuBar;
+ wxMenuBar *menu_bar = new wxMenuBar;
- menu_bar->Append(file_menu, "&File");
- menu_bar->Append(help_menu, "&Help");
+ 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);
+ // Associate the menu bar with the frame
+ frame->SetMenuBar(menu_bar);
- frame->CreateStatusBar();
+#if wxUSE_STATUSBAR
+ frame->CreateStatusBar();
+#endif // wxUSE_STATUSBAR
- frame->Show(TRUE);
+ frame->Show(true);
- SetTopWindow(frame);
+ SetTopWindow(frame);
- return 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(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, -1, "", wxDefaultPosition, wxDefaultSize,
- wxTE_MULTILINE|wxSUNKEN_BORDER);
- textWindow->SetValue("A help window");
+ textWindow = new wxTextCtrl(this, wxID_ANY, _T("A help window"),
+ wxDefaultPosition, wxDefaultSize,
+ wxTE_MULTILINE | wxSUNKEN_BORDER);
- CreateToolBar(wxNO_BORDER|wxTB_FLAT|wxTB_HORIZONTAL);
+#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[2].Set(wxACCEL_CTRL, (int) 'A', MDI_ABOUT);
wxAcceleratorTable accel(3, entries);
SetAcceleratorTable(accel);
+#endif // wxUSE_ACCEL
}
-void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event) )
+void MyFrame::OnClose(wxCloseEvent& event)
{
- Close(TRUE);
+ 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("wxWindows 2.0 MDI Demo\nAuthor: Julian Smart (c) 1997\nUsage: mdi.exe", "About MDI Demo");
+ (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, "Canvas Frame", wxPoint(-1, -1), wxSize(-1, -1),
- wxDEFAULT_FRAME);
-
- wxString title;
- title.Printf("Canvas Frame %d", winNumber);
- subframe->SetTitle(title);
- winNumber ++;
-
- // Give it an icon
-#ifdef __WXMSW__
- subframe->SetIcon(wxIcon("chrt_icn"));
-#else
- subframe->SetIcon(wxIcon( mondrian_xpm ));
-#endif
+ // Make another frame, containing a canvas
+ MyChild *subframe = new MyChild(frame, _T("Canvas Frame"));
- // Make a menubar
- wxMenu *file_menu = new wxMenu;
+ wxString title;
+ title.Printf(_T("Canvas Frame %d"), ++gs_nFrames);
- file_menu->Append(MDI_NEW_WINDOW, "&New window");
- file_menu->Append(MDI_CHILD_QUIT, "&Close child");
- file_menu->Append(MDI_QUIT, "&Exit");
+ subframe->SetTitle(title);
- wxMenu *option_menu = new wxMenu;
+ // Give it an icon
+ subframe->SetIcon(wxICON(chart));
- // Dummy option
- option_menu->Append(MDI_REFRESH, "&Refresh picture");
+#if wxUSE_MENUS
+ // Make a menubar
+ wxMenu *file_menu = new wxMenu;
- wxMenu *help_menu = new wxMenu;
- help_menu->Append(MDI_ABOUT, "&About");
+ 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"));
- wxMenuBar *menu_bar = new wxMenuBar;
+ wxMenu *option_menu = new wxMenu;
- menu_bar->Append(file_menu, "&File");
- menu_bar->Append(option_menu, "&Options");
- menu_bar->Append(help_menu, "&Help");
+ 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
- // Associate the menu bar with the frame
- subframe->SetMenuBar(menu_bar);
+ wxMenu *help_menu = new wxMenu;
+ help_menu->Append(MDI_ABOUT, _T("&About"));
- 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;
+ wxMenuBar *menu_bar = new wxMenuBar;
- // Give it scrollbars
- canvas->SetScrollbars(20, 20, 50, 50);
+ menu_bar->Append(file_menu, _T("&File"));
+ menu_bar->Append(option_menu, _T("&Child"));
+ menu_bar->Append(help_menu, _T("&Help"));
- subframe->Show(TRUE);
+ // Associate the menu bar with the frame
+ subframe->SetMenuBar(menu_bar);
+#endif // wxUSE_MENUS
+
+#if wxUSE_STATUSBAR
+ subframe->CreateStatusBar();
+ subframe->SetStatusText(title);
+#endif // wxUSE_STATUSBAR
+
+ 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);
}
-BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
- EVT_MOUSE_EVENTS(MyCanvas::OnEvent)
-END_EVENT_TABLE()
+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, -1, pos, size, wxSUNKEN_BORDER|wxVSCROLL|wxHSCROLL)
+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"));
+ SetBackgroundColour(wxColour(_T("WHITE")));
+
+ 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(_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.
+// 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);
+
+ 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;
}
-// Define the behaviour for the frame closing
-// - must delete all frames except for the main one.
-bool MyFrame::OnClose(void)
+// ---------------------------------------------------------------------------
+// MyChild
+// ---------------------------------------------------------------------------
+
+MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title)
+ : wxMDIChildFrame(parent, wxID_ANY, title, wxDefaultPosition, wxDefaultSize,
+ wxDEFAULT_FRAME_STYLE | wxNO_FULL_REPAINT_ON_RESIZE)
{
- // 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;
+ canvas = (MyCanvas *) NULL;
+ my_children.Append(this);
+
+ // this should work for MDI frames as well as for normal ones
+ SetSizeHints(100, 100);
}
-void MyFrame::OnSize(wxSizeEvent& WXUNUSED(event) )
+MyChild::~MyChild()
{
- int w, h;
- GetClientSize(&w, &h);
-
- textWindow->SetSize(0, 0, 200, h);
- GetClientWindow()->SetSize(200, 0, w - 200, h);
+ my_children.DeleteObject(this);
}
-// 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.
+void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
+{
+ Close(true);
+}
-BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame)
- EVT_MENU(MDI_CHILD_QUIT, MyChild::OnQuit)
-END_EVENT_TABLE()
+void MyChild::OnRefresh(wxCommandEvent& WXUNUSED(event))
+{
+ if ( canvas )
+ canvas->Refresh();
+}
-MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title, const wxPoint& pos, const wxSize& size,
-const long style):
- wxMDIChildFrame(parent, -1, title, pos, size, style)
+void MyChild::OnChangePosition(wxCommandEvent& WXUNUSED(event))
{
- canvas = (MyCanvas *) NULL;
- my_children.Append(this);
+ Move(10, 10);
}
-MyChild::~MyChild(void)
+void MyChild::OnChangeSize(wxCommandEvent& WXUNUSED(event))
{
- my_children.DeleteObject(this);
+ SetClientSize(100, 100);
}
-void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
+void MyChild::OnChangeTitle(wxCommandEvent& WXUNUSED(event))
{
- Close(TRUE);
+#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();
+ if ( event.GetActive() && canvas )
+ canvas->SetFocus();
}
-bool MyChild::OnClose(void)
+void MyChild::OnMove(wxMoveEvent& event)
{
- return TRUE;
+ // 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 MyFrame::InitToolBar(wxToolBar* toolBar)
+void MyChild::OnSize(wxSizeEvent& 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( new_xpm );
- bitmaps[1] = new wxBitmap( open_xpm );
- bitmaps[2] = new wxBitmap( save_xpm );
- bitmaps[3] = new wxBitmap( copy_xpm );
- bitmaps[4] = new wxBitmap( cut_xpm );
- bitmaps[5] = new wxBitmap( paste_xpm );
- bitmaps[6] = new wxBitmap( print_xpm );
- bitmaps[7] = new wxBitmap( help_xpm );
-#endif
+ // 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();
+}
-#ifdef __WXMSW__
- int width = 24;
-#else
- int width = 16;
-#endif
- int currentX = 5;
-
- toolBar->AddTool( MDI_NEW_WINDOW, *(bitmaps[0]), wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "New file");
- currentX += width + 5;
- toolBar->AddTool(1, *bitmaps[1], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "Open file");
- currentX += width + 5;
- toolBar->AddTool(2, *bitmaps[2], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "Save file");
- currentX += width + 5;
- toolBar->AddSeparator();
- toolBar->AddTool(3, *bitmaps[3], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "Copy");
- currentX += width + 5;
- toolBar->AddTool(4, *bitmaps[4], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "Cut");
- currentX += width + 5;
- toolBar->AddTool(5, *bitmaps[5], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "Paste");
- currentX += width + 5;
- toolBar->AddSeparator();
- toolBar->AddTool(6, *bitmaps[6], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, "Print");
- currentX += width + 5;
- toolBar->AddSeparator();
- toolBar->AddTool(7, *bitmaps[7], wxNullBitmap, TRUE, currentX, -1, (wxObject *) NULL, "Help");
-
- toolBar->Realize();
-
- int i;
- for (i = 0; i < 8; i++)
- delete bitmaps[i];
+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().c_str()
+ : _T("No text on clipboard"));
+}
+
+void MyChild::OnUpdatePaste(wxUpdateUIEvent& event)
+{
+ wxClipboardLocker lock;
+ event.Enable( wxTheClipboard->IsSupported(wxDF_TEXT) );
}
+#endif // wxUSE_CLIPBOARD