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