]> git.saurik.com Git - wxWidgets.git/blob - contrib/samples/svg/svgtest.cpp
Updates to MIME-types and wxFileDialog code for better
[wxWidgets.git] / contrib / 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 #include "mondrian.xpm"
43
44 #include "bitmaps/new.xpm"
45 #include "bitmaps/save.xpm"
46 #include "bitmaps/help.xpm"
47 #include "SVGlogo24.xpm"
48
49 class MyChild;
50
51 // Define a new application
52 class MyApp : public wxApp
53 {
54 public:
55 bool OnInit();
56 };
57
58 // Define a new frame
59 class MyFrame : public wxMDIParentFrame
60 {
61 public:
62 int nWinCreated;
63
64 wxList m_children;
65
66 MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title,
67 const wxPoint& pos, const wxSize& size, const long style);
68
69 void InitToolBar(wxToolBar* toolBar);
70
71 void OnSize(wxSizeEvent& event);
72 void OnAbout(wxCommandEvent& event);
73 void OnNewWindow(wxCommandEvent& event);
74 void OnQuit(wxCommandEvent& event);
75 void OnClose(wxCloseEvent& event);
76 void FileSavePicture (wxCommandEvent & WXUNUSED(event) ) ;
77
78 DECLARE_EVENT_TABLE()
79 };
80
81
82 class MyCanvas : public wxScrolledWindow
83 {
84 public:
85 int m_index ;
86
87 MyChild * m_child ;
88 MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size);
89 virtual void OnDraw(wxDC& dc);
90
91 DECLARE_EVENT_TABLE()
92 };
93
94 class MyChild: public wxMDIChildFrame
95 {
96 public:
97 MyCanvas *m_canvas;
98 MyFrame *m_frame ;
99
100 //////////////////// Methods
101
102 MyChild(wxMDIParentFrame *parent, const wxString& title, const wxPoint& pos, const wxSize& size, const long style);
103 ~MyChild();
104
105 void OnActivate(wxActivateEvent& event);
106 void OnQuit(wxCommandEvent& event);
107 void OnClose(wxCloseEvent& event);
108 bool OnSave(wxString filename) ;
109
110 DECLARE_EVENT_TABLE()
111 };
112
113 // menu items ids
114 enum
115 {
116 MDI_QUIT = 100,
117 MDI_NEW_WINDOW,
118 MDI_SAVE,
119 MDI_REFRESH,
120 MDI_CHILD_QUIT,
121 MDI_ABOUT
122 };
123
124
125 IMPLEMENT_APP(MyApp)
126
127 // ---------------------------------------------------------------------------
128 // global variables
129 // ---------------------------------------------------------------------------
130
131 MyFrame *frame = (MyFrame *) NULL;
132
133 // ---------------------------------------------------------------------------
134 // event tables
135 // ---------------------------------------------------------------------------
136
137 BEGIN_EVENT_TABLE(MyFrame, wxMDIParentFrame)
138 EVT_MENU(MDI_ABOUT, MyFrame::OnAbout)
139 EVT_MENU(MDI_NEW_WINDOW, MyFrame::OnNewWindow)
140 EVT_MENU(MDI_QUIT, MyFrame::OnQuit)
141 EVT_MENU (MDI_SAVE, MyFrame::FileSavePicture)
142 EVT_CLOSE(MyFrame::OnClose)
143
144 EVT_SIZE(MyFrame::OnSize)
145 END_EVENT_TABLE()
146
147 // ===========================================================================
148 // implementation
149 // ===========================================================================
150
151 // ---------------------------------------------------------------------------
152 // MyApp
153 // ---------------------------------------------------------------------------
154
155 // Initialise this in OnInit, not statically
156 bool MyApp::OnInit()
157 {
158 // Create the main frame window
159
160 frame = new MyFrame((wxFrame *)NULL, -1, wxT("SVG Demo"),
161 wxPoint(-1, -1), wxSize(500, 400),
162 wxDEFAULT_FRAME_STYLE | wxHSCROLL | wxVSCROLL);
163
164
165 // Make a menubar
166 wxMenu *file_menu = new wxMenu;
167
168 file_menu->Append(MDI_NEW_WINDOW, wxT("&New test\tCtrl+N"));
169 file_menu->Append(MDI_QUIT, wxT("&Exit\tAlt+X"));
170
171 wxMenu *help_menu = new wxMenu;
172 help_menu->Append(MDI_ABOUT, wxT("&About"));
173
174 wxMenuBar *menu_bar = new wxMenuBar;
175
176 menu_bar->Append(file_menu, wxT("&File"));
177 menu_bar->Append(help_menu, wxT("&Help"));
178
179 // Associate the menu bar with the frame
180 frame->SetMenuBar(menu_bar);
181
182 frame->CreateStatusBar();
183
184 frame->Show(TRUE);
185
186 SetTopWindow(frame);
187
188 return TRUE;
189 }
190
191
192 // ---------------------------------------------------------------------------
193 // MyFrame
194 // ---------------------------------------------------------------------------
195
196 // Define my frame constructor
197 MyFrame::MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title,
198 const wxPoint& pos, const wxSize& size, const long style)
199 : wxMDIParentFrame(parent, id, title, pos, size, style)
200 {
201 nWinCreated = 0 ;
202
203 // Give it an icon
204 SetIcon(wxICON(mondrian));
205
206 CreateToolBar(wxNO_BORDER | wxTB_FLAT | wxTB_HORIZONTAL);
207 InitToolBar(GetToolBar());
208
209 }
210
211
212 void MyFrame::OnClose(wxCloseEvent& event)
213 {
214 if ( !event.CanVeto() )
215 {
216 event.Skip();
217 return ;
218 }
219 if ( m_children.GetCount () < 1 )
220 {
221 event.Skip();
222 return ;
223 }
224 // now try the children
225 wxNode * pNode = m_children.GetFirst ();
226 wxNode * pNext ;
227 MyChild * pChild ;
228 while ( pNode )
229 {
230 pNext = pNode -> GetNext ();
231 pChild = (MyChild*) pNode -> GetData ();
232 if (pChild -> Close ())
233 {
234 delete pNode ;
235 }
236 else
237 {
238 event.Veto();
239 return;
240 }
241 pNode = pNext ;
242 }
243 event.Skip();
244 }
245
246
247 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
248 {
249 Close();
250 }
251
252
253 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
254 {
255 (void)wxMessageBox(wxT("wxWindows 2.0 SVG 1.0 Test\n")
256 wxT("Author: Chris Elliott (c) 2002\n")
257 wxT("Usage: svg.exe \nClick File | New to show tests\n\n"), wxT("About SVG Test"));
258 }
259
260
261 void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
262 {
263 // Make another frame, containing a canvas
264 MyChild *subframe ;
265
266 m_children.Append (new MyChild(frame, wxT("SVG Frame"),
267 wxPoint(-1, -1), wxSize(-1, -1),
268 wxDEFAULT_FRAME_STYLE ) ) ;
269
270 subframe = (MyChild *) m_children.GetLast() -> GetData ();
271 wxString title;
272 title.Printf(wxT("SVG Test Window %d"), nWinCreated );
273 // counts number of children previously, even if now closed
274 nWinCreated ++ ;
275
276 // Give it a title and icon
277 subframe->SetTitle(title);
278 subframe->SetIcon(wxICON(mondrian));
279
280 // Make a menubar
281 wxMenu *file_menu = new wxMenu;
282
283 file_menu->Append(MDI_NEW_WINDOW, wxT("&Another test\tCtrl+N"));
284 file_menu->Append(MDI_SAVE, wxT("&Save\tCtrl+S"), wxT("Save in SVG format"));
285 file_menu->Append(MDI_CHILD_QUIT, wxT("&Close child\tCtrl+F4"));
286 file_menu->Append(MDI_QUIT, wxT("&Exit\tAlt+X"));
287
288 wxMenu *help_menu = new wxMenu;
289 help_menu->Append(MDI_ABOUT, wxT("&About"));
290
291 wxMenuBar *menu_bar = new wxMenuBar;
292
293 menu_bar->Append(file_menu, wxT("&File"));
294 menu_bar->Append(help_menu, wxT("&Help"));
295
296 // Associate the menu bar with the frame
297 subframe->SetMenuBar(menu_bar);
298
299 subframe->Show(TRUE);
300 }
301
302
303 void MyFrame::OnSize(wxSizeEvent& event)
304 {
305 int w, h;
306 GetClientSize(&w, &h);
307
308 GetClientWindow()->SetSize(0, 0, w, h);
309 event.Skip();
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(_T("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 (_T("DARK ORCHID"), wxTRANSPARENT);
429 dc.SetBrush (wB);
430 dc.DrawRoundedRectangle(50, 50, 100, 70, 20);
431 dc.SetBrush (wxBrush(_T("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 (_T("FIREBRICK"));
453
454 // no effect in msw ??
455 dc.SetTextBackground (_T("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,300 );
470 dc.SetBrush(*wxBLUE_BRUSH);
471 dc.DrawArc ( 270-50, 270-86, 270-86, 270-50, 270,270 );
472 dc.SetDeviceOrigin(-10,-10);
473 dc.DrawArc ( 270-50, 270-86, 270-86, 270-50, 270,270 );
474 dc.SetDeviceOrigin(0,0);
475
476 wP.SetColour (_T("CADET BLUE"));
477 dc.SetPen(wP);
478 dc.DrawArc ( 75,125, 110, 40, 75, 75 );
479
480 wP.SetColour (_T("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 (_T("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 (_T("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_xpm), 10, 10 );
540 dc.DrawBitmap ( wxBitmap(svgbitmap_xpm), 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 }