]> git.saurik.com Git - wxWidgets.git/blob - samples/svg/svgtest.cpp
Implement NSMenuValidation protocol for the wxNSMenuItemTarget
[wxWidgets.git] / samples / svg / svgtest.cpp
1 // biol75@york.ac.uk (Chris Elliott) March 2000
2
3 #ifdef __BIDE__
4 #define _NO_VCL
5 #include "condefs.h"
6 USERC("svg.rc");
7 //---------------------------------------------------------------------------
8 #define WinMain WinMain
9 #endif
10 /////////////////////////////////////////////////////////////////////////////
11 // Name: svgtest.cpp
12 // Purpose: SVG sample
13 // Author: Chris Elliott
14 // Modified by:
15 // RCS-ID: $Id$
16 // Licence: wxWindows license
17 /////////////////////////////////////////////////////////////////////////////
18
19 // ===========================================================================
20 // declarations
21 // ===========================================================================
22
23 // ---------------------------------------------------------------------------
24 // headers
25 // ---------------------------------------------------------------------------
26
27 // For compilers that support precompilation, includes "wx/wx.h".
28 #include "wx/wxprec.h"
29
30 #ifdef __BORLANDC__
31 #pragma hdrstop
32 #endif
33
34 #ifndef WX_PRECOMP
35 #include "wx/wx.h"
36 #include "wx/mdi.h"
37 #endif
38
39 #include <wx/toolbar.h>
40 #include <wx/svg/dcsvg.h>
41
42 #ifndef __WXMSW__
43 #include "mondrian.xpm"
44 #endif
45 #include "bitmaps/new.xpm"
46 #include "bitmaps/save.xpm"
47 #include "bitmaps/help.xpm"
48 #include "SVGlogo24.xpm"
49
50 class MyChild;
51
52 // Define a new application
53 class MyApp : public wxApp
54 {
55 public:
56 bool OnInit();
57 };
58
59 // Define a new frame
60 class MyFrame : public wxMDIParentFrame
61 {
62 public:
63 int nWinCreated;
64
65 wxList m_children;
66
67 MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title,
68 const wxPoint& pos, const wxSize& size, const long style);
69
70 void InitToolBar(wxToolBar* toolBar);
71
72 void OnSize(wxSizeEvent& event);
73 void OnAbout(wxCommandEvent& event);
74 void OnNewWindow(wxCommandEvent& event);
75 void OnQuit(wxCommandEvent& event);
76 void OnClose(wxCloseEvent& event);
77 void FileSavePicture (wxCommandEvent & WXUNUSED(event) ) ;
78
79 DECLARE_EVENT_TABLE()
80 };
81
82
83 class MyCanvas : public wxScrolledWindow
84 {
85 public:
86 int m_index ;
87
88 MyChild * m_child ;
89 MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size);
90 virtual void OnDraw(wxDC& dc);
91
92 DECLARE_EVENT_TABLE()
93 };
94
95 class MyChild: public wxMDIChildFrame
96 {
97 public:
98 MyCanvas *m_canvas;
99 MyFrame *m_frame ;
100
101 //////////////////// Methods
102
103 MyChild(wxMDIParentFrame *parent, const wxString& title, const wxPoint& pos, const wxSize& size, const long style);
104 ~MyChild();
105
106 void OnActivate(wxActivateEvent& event);
107 void OnQuit(wxCommandEvent& event);
108 void OnClose(wxCloseEvent& event);
109 bool OnSave(wxString filename) ;
110
111 DECLARE_EVENT_TABLE()
112 };
113
114 // menu items ids
115 enum
116 {
117 MDI_QUIT = 100,
118 MDI_NEW_WINDOW,
119 MDI_SAVE,
120 MDI_REFRESH,
121 MDI_CHILD_QUIT,
122 MDI_ABOUT
123 };
124
125
126 IMPLEMENT_APP(MyApp)
127
128 // ---------------------------------------------------------------------------
129 // global variables
130 // ---------------------------------------------------------------------------
131
132 MyFrame *frame = (MyFrame *) NULL;
133
134 // ---------------------------------------------------------------------------
135 // event tables
136 // ---------------------------------------------------------------------------
137
138 BEGIN_EVENT_TABLE(MyFrame, wxMDIParentFrame)
139 EVT_MENU(MDI_ABOUT, MyFrame::OnAbout)
140 EVT_MENU(MDI_NEW_WINDOW, MyFrame::OnNewWindow)
141 EVT_MENU(MDI_QUIT, MyFrame::OnQuit)
142 EVT_MENU (MDI_SAVE, MyFrame::FileSavePicture)
143 EVT_CLOSE(MyFrame::OnClose)
144
145 EVT_SIZE(MyFrame::OnSize)
146 END_EVENT_TABLE()
147
148 // ===========================================================================
149 // implementation
150 // ===========================================================================
151
152 // ---------------------------------------------------------------------------
153 // MyApp
154 // ---------------------------------------------------------------------------
155
156 // Initialise this in OnInit, not statically
157 bool MyApp::OnInit()
158 {
159 // Create the main frame window
160
161 frame = new MyFrame((wxFrame *)NULL, -1, wxT("SVG Demo"),
162 wxPoint(-1, -1), wxSize(500, 400),
163 wxDEFAULT_FRAME_STYLE | wxHSCROLL | wxVSCROLL);
164
165
166 // Make a menubar
167 wxMenu *file_menu = new wxMenu;
168
169 file_menu->Append(MDI_NEW_WINDOW, wxT("&New test\tCtrl+N"));
170 file_menu->Append(MDI_QUIT, wxT("&Exit\tAlt+X"));
171
172 wxMenu *help_menu = new wxMenu;
173 help_menu->Append(MDI_ABOUT, wxT("&About"));
174
175 wxMenuBar *menu_bar = new wxMenuBar;
176
177 menu_bar->Append(file_menu, wxT("&File"));
178 menu_bar->Append(help_menu, wxT("&Help"));
179
180 // Associate the menu bar with the frame
181 frame->SetMenuBar(menu_bar);
182
183 frame->CreateStatusBar();
184
185 frame->Show(TRUE);
186
187 SetTopWindow(frame);
188
189 return TRUE;
190 }
191
192
193 // ---------------------------------------------------------------------------
194 // MyFrame
195 // ---------------------------------------------------------------------------
196
197 // Define my frame constructor
198 MyFrame::MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title,
199 const wxPoint& pos, const wxSize& size, const long style)
200 : wxMDIParentFrame(parent, id, title, pos, size, style)
201 {
202 nWinCreated = 0 ;
203
204 // Give it an icon
205 SetIcon(wxICON(mondrian));
206
207 CreateToolBar(wxNO_BORDER | wxTB_FLAT | wxTB_HORIZONTAL);
208 InitToolBar(GetToolBar());
209
210 }
211
212
213 void MyFrame::OnClose(wxCloseEvent& event)
214 {
215 if ( !event.CanVeto() )
216 {
217 event.Skip();
218 return ;
219 }
220 if ( m_children.Number () < 1 )
221 {
222 event.Skip();
223 return ;
224 }
225 // now try the children
226 wxNode * pNode = m_children.GetFirst ();
227 wxNode * pNext ;
228 MyChild * pChild ;
229 while ( pNode )
230 {
231 pNext = pNode -> GetNext ();
232 pChild = (MyChild*) pNode -> Data ();
233 if (pChild -> Close ())
234 {
235 delete pNode ;
236 }
237 else
238 {
239 event.Veto();
240 return;
241 }
242 pNode = pNext ;
243 }
244 event.Skip();
245 }
246
247
248 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
249 {
250 Close();
251 }
252
253
254 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
255 {
256 (void)wxMessageBox(wxT("wxWindows 2.0 SVG 1.0 Test\n"
257 "Author: Chris Elliott (c) 2002\n"
258 "Usage: svg.exe \nClick File | New to show tests\n\n"), wxT("About SVG Test"));
259 }
260
261
262 void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
263 {
264 // Make another frame, containing a canvas
265 MyChild *subframe ;
266
267 m_children.Append (new MyChild(frame, wxT("SVG Frame"),
268 wxPoint(-1, -1), wxSize(-1, -1),
269 wxDEFAULT_FRAME_STYLE ) ) ;
270
271 subframe = (MyChild *) m_children.GetLast() -> Data ();
272 wxString title;
273 title.Printf(wxT("SVG Test Window %d"), nWinCreated );
274 // counts number of children previously, even if now closed
275 nWinCreated ++ ;
276
277 // Give it a title and icon
278 subframe->SetTitle(title);
279 subframe->SetIcon(wxICON(mondrian));
280
281 // Make a menubar
282 wxMenu *file_menu = new wxMenu;
283
284 file_menu->Append(MDI_NEW_WINDOW, wxT("&Another test\tCtrl+N"));
285 file_menu->Append(MDI_SAVE, wxT("&Save\tCtrl+S"), wxT("Save in SVG format"));
286 file_menu->Append(MDI_CHILD_QUIT, wxT("&Close child\tCtrl+F4"));
287 file_menu->Append(MDI_QUIT, wxT("&Exit\tAlt+X"));
288
289 wxMenu *help_menu = new wxMenu;
290 help_menu->Append(MDI_ABOUT, wxT("&About"));
291
292 wxMenuBar *menu_bar = new wxMenuBar;
293
294 menu_bar->Append(file_menu, wxT("&File"));
295 menu_bar->Append(help_menu, wxT("&Help"));
296
297 // Associate the menu bar with the frame
298 subframe->SetMenuBar(menu_bar);
299
300 subframe->Show(TRUE);
301 }
302
303
304 void MyFrame::OnSize(wxSizeEvent& WXUNUSED(event))
305 {
306 int w, h;
307 GetClientSize(&w, &h);
308
309 GetClientWindow()->SetSize(0, 0, w, h);
310 }
311
312
313 void MyFrame::InitToolBar(wxToolBar* toolBar)
314 {
315 const int maxBitmaps = 3 ;
316 wxBitmap* bitmaps[maxBitmaps];
317
318 bitmaps[0] = new wxBitmap( new_xpm );
319 bitmaps[1] = new wxBitmap( save_xpm );
320 bitmaps[2] = new wxBitmap( help_xpm );
321
322 int width = 16;
323 int currentX = 5;
324
325 toolBar->AddTool( MDI_NEW_WINDOW, *(bitmaps[0]), wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, wxT("New SVG test window"));
326 currentX += width + 5;
327 toolBar->AddTool( MDI_SAVE, *bitmaps[1], wxNullBitmap, FALSE, currentX, -1, (wxObject *) NULL, wxT("Save test in SVG format"));
328 currentX += width + 5;
329 toolBar->AddSeparator();
330 toolBar->AddTool(MDI_ABOUT, *bitmaps[2], wxNullBitmap, TRUE, currentX, -1, (wxObject *) NULL, wxT("Help"));
331
332 toolBar->Realize();
333
334 int i;
335 for (i = 0; i < maxBitmaps; i++)
336 delete bitmaps[i];
337 }
338
339
340 void MyFrame::FileSavePicture (wxCommandEvent & WXUNUSED(event) )
341 {
342 MyChild * pChild = (MyChild *)GetActiveChild ();
343 if (pChild == NULL)
344 {
345 return ;
346 }
347
348 wxFileDialog dialog(this, wxT("Save Picture as"), wxEmptyString, pChild->GetTitle(),
349 wxT("SVG vector picture files (*.svg)|*.svg"),
350 wxSAVE|wxOVERWRITE_PROMPT);
351
352 if (dialog.ShowModal() == wxID_OK)
353 {
354 if (!pChild -> OnSave ( dialog.GetPath() ))
355 {
356 return ;
357 }
358 }
359 return ;
360 }
361
362
363 // Note that MDI_NEW_WINDOW and MDI_ABOUT commands get passed
364 // to the parent window for processing, so no need to
365 // duplicate event handlers here.
366 BEGIN_EVENT_TABLE(MyChild, wxMDIChildFrame)
367 EVT_MENU(MDI_CHILD_QUIT, MyChild::OnQuit)
368 EVT_CLOSE(MyChild::OnClose)
369 END_EVENT_TABLE()
370
371 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
372
373 END_EVENT_TABLE()
374
375 // ---------------------------------------------------------------------------
376 // MyCanvas
377 // ---------------------------------------------------------------------------
378
379 // Define a constructor for my canvas
380 MyCanvas::MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size)
381 : wxScrolledWindow(parent, -1, pos, size,
382 wxSUNKEN_BORDER|wxVSCROLL|wxHSCROLL)
383 {
384 m_child = (MyChild *) parent ;
385 SetBackgroundColour(wxColour("WHITE"));
386 m_index = m_child->m_frame->nWinCreated % 7 ;
387 }
388
389
390 // Define the repainting behaviour
391 void MyCanvas::OnDraw(wxDC& dc)
392 {
393 // vars to use ...
394 wxString s ;
395 wxPen wP ;
396 wxBrush wB ;
397 wxPoint points[6];
398 wxColour wC;
399 wxFont wF ;
400
401 dc.SetFont(*wxSWISS_FONT);
402 dc.SetPen(*wxGREEN_PEN);
403
404
405 switch (m_index)
406 {
407 default:
408 case 0:
409 // draw lines to make a cross
410 dc.DrawLine(0, 0, 200, 200);
411 dc.DrawLine(200, 0, 0, 200);
412 // draw point colored line and spline
413 wP = *wxCYAN_PEN ;
414 wP.SetWidth(3);
415 dc.SetPen(wP);
416
417 dc.DrawPoint (25,15) ;
418 dc.DrawLine(50, 30, 200, 30);
419 dc.DrawSpline(50, 200, 50, 100, 200, 10);
420 s = wxT("Green Cross, Cyan Line and spline");
421 break ;
422
423 case 1:
424 // draw standard shapes
425 dc.SetBrush(*wxCYAN_BRUSH);
426 dc.SetPen(*wxRED_PEN);
427 dc.DrawRectangle(10, 10, 100, 70);
428 wB = wxBrush ("DARK ORCHID", wxTRANSPARENT);
429 dc.SetBrush (wB);
430 dc.DrawRoundedRectangle(50, 50, 100, 70, 20);
431 dc.SetBrush (wxBrush("GOLDENROD", wxSOLID) );
432 dc.DrawEllipse(100, 100, 100, 50);
433
434 points[0].x = 100; points[0].y = 200;
435 points[1].x = 70; points[1].y = 260;
436 points[2].x = 160; points[2].y = 230;
437 points[3].x = 40; points[3].y = 230;
438 points[4].x = 130; points[4].y = 260;
439 points[5].x = 100; points[5].y = 200;
440
441 dc.DrawPolygon(5, points);
442 dc.DrawLines (6, points, 160);
443 s = wxT("Blue rectangle, red edge, clear rounded rectangle, gold ellipse, gold and clear stars");
444 break ;
445
446 case 2:
447 // draw text in Arial or similar font
448 dc.DrawLine(50,25,50,35);
449 dc.DrawLine(45,30,55,30);
450 dc.DrawText(wxT("This is a Swiss-style string"), 50, 30);
451 wC = dc.GetTextForeground() ;
452 dc.SetTextForeground ("FIREBRICK");
453
454 // no effect in msw ??
455 dc.SetTextBackground ("WHEAT");
456 dc.DrawText(wxT("This is a Red string"), 50, 200);
457 dc.DrawRotatedText(wxT("This is a 45 deg string"), 50, 200, 45);
458 dc.DrawRotatedText(wxT("This is a 90 deg string"), 50, 200, 90);
459 wF = wxFont ( 18, wxROMAN, wxITALIC, wxBOLD, FALSE, wxT("Times New Roman"));
460 dc.SetFont(wF);
461 dc.SetTextForeground (wC) ;
462 dc.DrawText(wxT("This is a Times-style string"), 50, 60);
463 s = wxT("Swiss, Times text; red text, rotated and colored orange");
464 break ;
465
466 case 3 :
467 // four arcs start and end points, center
468 dc.SetBrush(*wxGREEN_BRUSH);
469 dc.DrawArc ( 200,300, 370,230, 300.0,300.0 );
470 dc.SetBrush(*wxBLUE_BRUSH);
471 dc.DrawArc ( 270-50, 270-86, 270-86, 270-50, 270.0,270.0 );
472 dc.SetDeviceOrigin(-10,-10);
473 dc.DrawArc ( 270-50, 270-86, 270-86, 270-50, 270.0,270.0 );
474 dc.SetDeviceOrigin(0,0);
475
476 wP.SetColour ("CADET BLUE");
477 dc.SetPen(wP);
478 dc.DrawArc ( 75,125, 110, 40, 75.0, 75.0 );
479
480 wP.SetColour ("SALMON");
481 dc.SetPen(wP);
482 dc.SetBrush(*wxRED_BRUSH);
483 //top left corner, width and height, start and end angle
484 // 315 same center and x-radius as last pie-arc, half Y radius
485 dc.DrawEllipticArc(25,50,100,50,180.0,45.0) ;
486
487 wP = *wxCYAN_PEN ;
488 wP.SetWidth(3);
489 dc.SetPen(wP);
490 //wxTRANSPARENT));
491 dc.SetBrush (wxBrush ("SALMON",wxSOLID)) ;
492 dc.DrawEllipticArc(300, 0,200,100, 0.0,145.0) ;
493 //same end point
494 dc.DrawEllipticArc(300, 50,200,100,90.0,145.0) ;
495 dc.DrawEllipticArc(300,100,200,100,90.0,345.0) ;
496
497 s = wxT("This is an arc test page");
498 break ;
499
500 case 4:
501 dc.DrawCheckMark ( 30,30,25,25);
502 dc.SetBrush (wxBrush ("SALMON",wxTRANSPARENT));
503 dc.DrawCheckMark ( 80,50,75,75);
504 dc.DrawRectangle ( 80,50,75,75);
505 s = wxT("Two check marks");
506 break ;
507
508 case 5:
509 wF = wxFont ( 18, wxROMAN, wxITALIC, wxBOLD, FALSE, wxT("Times New Roman"));
510 dc.SetFont(wF);
511 dc.DrawLine(0, 0, 200, 200);
512 dc.DrawLine(200, 0, 0, 200);
513 dc.DrawText(wxT("This is an 18pt string"), 50, 60);
514
515 // rescale and draw in blue
516 wP = *wxCYAN_PEN ;
517 dc.SetPen(wP);
518 dc.SetUserScale (2.0,0.5);
519 dc.SetDeviceOrigin(200,0);
520 dc.DrawLine(0, 0, 200, 200);
521 dc.DrawLine(200, 0, 0, 200);
522 dc.DrawText(wxT("This is an 18pt string 2 x 0.5 UserScaled"), 50, 60);
523 dc.SetUserScale (2.0,2.0);
524 dc.SetDeviceOrigin(200,200);
525 dc.DrawText(wxT("This is an 18pt string 2 x 2 UserScaled"), 50, 60);
526
527 wP = *wxRED_PEN ;
528 dc.SetPen(wP);
529 dc.SetUserScale (1.0,1.0);
530 dc.SetDeviceOrigin(0,10);
531 dc.SetMapMode (wxMM_METRIC) ; //svg ignores this
532 dc.DrawLine(0, 0, 200, 200);
533 dc.DrawLine(200, 0, 0, 200);
534 dc.DrawText(wxT("This is an 18pt string in MapMode"), 50, 60);
535 s = wxT("Scaling test page");
536 break ;
537
538 case 6:
539 dc.DrawIcon( wxICON(mondrian), 10, 10 );
540 dc.DrawBitmap ( wxBITMAP (svgbitmap), 50,15);
541 s = wxT("Icon and Bitmap ");
542 break ;
543
544 }
545 m_child->SetStatusText(s);
546 }
547
548
549
550
551 // ---------------------------------------------------------------------------
552 // MyChild
553 // ---------------------------------------------------------------------------
554
555 MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title,
556 const wxPoint& pos, const wxSize& size,
557 const long style)
558 : wxMDIChildFrame(parent, -1, title, pos, size, style)
559 {
560
561 m_frame = (MyFrame *) parent ;
562 CreateStatusBar();
563 SetStatusText(title);
564
565 int w, h ;
566 GetClientSize ( &w, &h );
567 m_canvas = new MyCanvas(this, wxPoint(0, 0), wxSize (w,h) );
568 // Give it scrollbars
569 m_canvas->SetScrollbars(20, 20, 50, 50);
570
571 }
572
573
574 MyChild::~MyChild()
575 {
576 m_frame->m_children.DeleteObject(this);
577 }
578
579
580 void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
581 {
582 Close(TRUE);
583 }
584
585
586 bool MyChild::OnSave(wxString filename)
587 {
588 wxSVGFileDC svgDC (filename, 600, 650) ;
589 m_canvas->OnDraw (svgDC);
590 return svgDC.Ok();
591 }
592
593
594
595 void MyChild::OnActivate(wxActivateEvent& event)
596 {
597 if ( event.GetActive() && m_canvas )
598 m_canvas->SetFocus();
599 }
600
601
602 void MyChild::OnClose(wxCloseEvent& event)
603 {
604 event.Skip();
605 }