]> git.saurik.com Git - wxWidgets.git/blobdiff - samples/svg/svgtest.cpp
Somehow, setting a tint color makes gauge work :/.
[wxWidgets.git] / samples / svg / svgtest.cpp
index 0f362ca893fcb510f0b1bfdbf42a5af1991931ee..c19be160392707672a1af801611ebac1bc44414c 100644 (file)
@@ -1,19 +1,9 @@
-// biol75@york.ac.uk (Chris Elliott) March 2000
-
-#ifdef __BIDE__
-#define _NO_VCL
-#include "condefs.h"
-USERC("svg.rc");
-//---------------------------------------------------------------------------
-#define WinMain WinMain
-#endif
 /////////////////////////////////////////////////////////////////////////////
 // Name:        svgtest.cpp
 // Purpose:     SVG sample
 // Author:      Chris Elliott
 // Modified by:
-// RCS-ID:      $Id$
-// Licence:     wxWindows license
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
 // ===========================================================================
@@ -36,80 +26,97 @@ USERC("svg.rc");
 #include "wx/mdi.h"
 #endif
 
-#include <wx/toolbar.h>
-#include <wx/svg/dcsvg.h>
-
-#include "mondrian.xpm"
+#include "wx/toolbar.h"
+#include "wx/dcsvg.h"
+#include "wx/vector.h"
 
 #include "bitmaps/new.xpm"
 #include "bitmaps/save.xpm"
 #include "bitmaps/help.xpm"
 #include "SVGlogo24.xpm"
 
+#ifndef wxHAS_IMAGES_IN_RESOURCES
+    #include "../sample.xpm"
+#endif
+
+#include <math.h>
+
 class MyChild;
+class MyCanvas;
+
+// ---------------------------------------------------------------------------
+// classes
+// ---------------------------------------------------------------------------
 
-// Define a new application
 class MyApp : public wxApp
 {
-    public:
-        bool OnInit();
+public:
+    bool OnInit();
 };
 
-// Define a new frame
 class MyFrame : public wxMDIParentFrame
 {
-    public:
-        int nWinCreated;
+public:
+    MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title,
+            const wxPoint& pos, const wxSize& size, const long style);
 
-        wxList m_children;
+    void InitToolBar(wxToolBar* toolBar);
 
-        MyFrame(wxWindow *parent, const wxWindowID id, const wxString& title,
-            const wxPoint& pos, const wxSize& size, const long style);
+    void OnSize(wxSizeEvent& event);
+    void OnAbout(wxCommandEvent& event);
+    void OnNewWindow(wxCommandEvent& event);
+    void OnQuit(wxCommandEvent& event);
+    void FileSavePicture (wxCommandEvent& event);
 
-        void InitToolBar(wxToolBar* toolBar);
+    unsigned int GetCountOfChildren() const
+        { return m_nWinCreated; }
 
-        void OnSize(wxSizeEvent& event);
-        void OnAbout(wxCommandEvent& event);
-        void OnNewWindow(wxCommandEvent& event);
-        void OnQuit(wxCommandEvent& event);
-        void OnClose(wxCloseEvent& event);
-        void FileSavePicture (wxCommandEvent & WXUNUSED(event) ) ;
+private:
+    unsigned int m_nWinCreated;
 
-        DECLARE_EVENT_TABLE()
+    DECLARE_EVENT_TABLE()
 };
 
-
-class MyCanvas : public wxScrolledWindow
+class MyChild: public wxMDIChildFrame
 {
-    public:
-        int m_index ;
+public:
+    MyChild(wxMDIParentFrame *parent, const wxString& title,
+            const wxPoint& pos = wxDefaultPosition,
+            const wxSize& size = wxDefaultSize,
+            const long style = wxDEFAULT_FRAME_STYLE);
+    ~MyChild();
 
-        MyChild * m_child ;
-        MyCanvas(wxWindow *parent, const wxPoint& pos, const wxSize& size);
-        virtual void OnDraw(wxDC& dc);
+    void OnActivate(wxActivateEvent& event);
+    void OnQuit(wxCommandEvent& event);
+    bool OnSave(wxString filename);
 
-        DECLARE_EVENT_TABLE()
-};
+    MyFrame* GetFrame()
+        { return m_frame; }
 
-class MyChild: public wxMDIChildFrame
-{
-    public:
-        MyCanvas *m_canvas;
-        MyFrame  *m_frame ;
+private:
+    MyCanvas *m_canvas;
+    MyFrame  *m_frame;
 
-        //////////////////// Methods
+    DECLARE_EVENT_TABLE()
+};
 
-        MyChild(wxMDIParentFrame *parent, const wxString& title, const wxPoint& pos, const wxSize& size, const long style);
-        ~MyChild();
+class MyCanvas : public wxScrolledWindow
+{
+public:
+    MyCanvas(MyChild *parent, const wxPoint& pos, const wxSize& size);
+    virtual void OnDraw(wxDC& dc);
 
-        void OnActivate(wxActivateEvent& event);
-        void OnQuit(wxCommandEvent& event);
-        void OnClose(wxCloseEvent& event);
-        bool OnSave(wxString filename) ;
+private:
+    int m_index;
+    MyChild* m_child;
 
-        DECLARE_EVENT_TABLE()
+    DECLARE_EVENT_TABLE()
 };
 
+// ---------------------------------------------------------------------------
+// constants
+// ---------------------------------------------------------------------------
+
 // menu items ids
 enum
 {
@@ -121,27 +128,17 @@ enum
     MDI_ABOUT
 };
 
-
-IMPLEMENT_APP(MyApp)
-
-// ---------------------------------------------------------------------------
-// global variables
-// ---------------------------------------------------------------------------
-
-MyFrame *frame = (MyFrame *) NULL;
-
 // ---------------------------------------------------------------------------
 // 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_MENU (MDI_SAVE, MyFrame::FileSavePicture)
-EVT_CLOSE(MyFrame::OnClose)
+    EVT_MENU(MDI_ABOUT, MyFrame::OnAbout)
+    EVT_MENU(MDI_NEW_WINDOW, MyFrame::OnNewWindow)
+    EVT_MENU(MDI_QUIT, MyFrame::OnQuit)
+    EVT_MENU (MDI_SAVE, MyFrame::FileSavePicture)
 
-EVT_SIZE(MyFrame::OnSize)
+    EVT_SIZE(MyFrame::OnSize)
 END_EVENT_TABLE()
 
 // ===========================================================================
@@ -152,16 +149,35 @@ END_EVENT_TABLE()
 // MyApp
 // ---------------------------------------------------------------------------
 
-// Initialise this in OnInit, not statically
+IMPLEMENT_APP(MyApp)
+
 bool MyApp::OnInit()
 {
     // Create the main frame window
 
-    frame = new MyFrame((wxFrame *)NULL, -1, wxT("SVG Demo"),
-        wxPoint(-1, -1), wxSize(500, 400),
-        wxDEFAULT_FRAME_STYLE | wxHSCROLL | wxVSCROLL);
+    MyFrame* frame = new MyFrame((wxFrame *)NULL, -1, wxT("SVG Demo"),
+                                 wxDefaultPosition, wxSize(500, 400),
+                                 wxDEFAULT_FRAME_STYLE | wxHSCROLL | wxVSCROLL);
+
+    frame->Show(true);
+
+    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)
+{
+    m_nWinCreated = 0;
+
+    SetIcon(wxICON(sample));
+
     // Make a menubar
     wxMenu *file_menu = new wxMenu;
 
@@ -177,107 +193,43 @@ bool MyApp::OnInit()
     menu_bar->Append(help_menu, wxT("&Help"));
 
     // Associate the menu bar with the frame
-    frame->SetMenuBar(menu_bar);
+    SetMenuBar(menu_bar);
 
 #if wxUSE_STATUSBAR
-    frame->CreateStatusBar();
+    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)
-{
-    nWinCreated = 0 ;
-
-    // Give it an icon
-    SetIcon(wxICON(mondrian));
-
     CreateToolBar(wxNO_BORDER | wxTB_FLAT | wxTB_HORIZONTAL);
     InitToolBar(GetToolBar());
-
-}
-
-
-void MyFrame::OnClose(wxCloseEvent& event)
-{
-    if ( !event.CanVeto() )
-    {
-        event.Skip();
-        return ;
-    }
-    if ( m_children.GetCount () < 1 )
-    {
-        event.Skip();
-        return ;
-    }
-    // now try the children
-    wxObjectList::compatibility_iterator pNode = m_children.GetFirst ();
-    wxObjectList::compatibility_iterator pNext ;
-    MyChild * pChild ;
-    while ( pNode )
-    {
-        pNext = pNode -> GetNext ();
-        pChild = (MyChild*) pNode -> GetData ();
-        if (pChild -> Close ())
-        {
-            m_children.Erase(pNode) ;
-        }
-        else
-        {
-            event.Veto();
-            return;
-        }
-        pNode = pNext ;
-    }
-    event.Skip();
 }
 
-
 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 {
     Close();
 }
 
-
 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event) )
 {
-    (void)wxMessageBox(wxT("wxWidgets 2.0 SVG 1.0 Test\n")
-        wxT("Author: Chris Elliott (c) 2002\n")
-        wxT("Usage: svg.exe \nClick File | New to show tests\n\n"), wxT("About SVG Test"));
+    (void)wxMessageBox(wxT("wxWidgets SVG sample\n")
+        wxT("Author: Chris Elliott (c) 2002-2009\n")
+        wxT("Usage: click File|New to show tests"),
+        wxT("About SVG Test"));
 }
 
-
 void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
 {
     // Make another frame, containing a canvas
-    MyChild *subframe ;
-
-    m_children.Append (new MyChild(frame, wxT("SVG Frame"),
-        wxPoint(-1, -1), wxSize(-1, -1),
-        wxDEFAULT_FRAME_STYLE )   ) ;
+    MyChild *subframe = new MyChild(this, wxT("SVG Frame"));
 
-    subframe = (MyChild *) m_children.GetLast() -> GetData ();
     wxString title;
-    title.Printf(wxT("SVG Test Window %d"), nWinCreated );
+    title.Printf(wxT("SVG Test Window %d"), m_nWinCreated );
+
     // counts number of children previously, even if now closed
-    nWinCreated ++ ;
+    m_nWinCreated ++;
 
     // Give it a title and icon
     subframe->SetTitle(title);
-    subframe->SetIcon(wxICON(mondrian));
+    subframe->SetIcon(wxICON(sample));
 
     // Make a menubar
     wxMenu *file_menu = new wxMenu;
@@ -301,7 +253,6 @@ void MyFrame::OnNewWindow(wxCommandEvent& WXUNUSED(event) )
     subframe->Show(true);
 }
 
-
 void MyFrame::OnSize(wxSizeEvent& event)
 {
     int w, h;
@@ -311,25 +262,19 @@ void MyFrame::OnSize(wxSizeEvent& event)
     event.Skip();
 }
 
-
 void MyFrame::InitToolBar(wxToolBar* toolBar)
 {
-    const int maxBitmaps = 3 ;
+    const int maxBitmaps = 3;
     wxBitmap* bitmaps[maxBitmaps];
 
     bitmaps[0] = new wxBitmap( new_xpm );
     bitmaps[1] = new wxBitmap( save_xpm );
     bitmaps[2] = new wxBitmap( help_xpm );
 
-    int width = 16;
-    int currentX = 5;
-
-    toolBar->AddTool( MDI_NEW_WINDOW, *(bitmaps[0]), wxNullBitmap, false, currentX, wxDefaultCoord, (wxObject *) NULL, wxT("New SVG test window"));
-    currentX += width + 5;
-    toolBar->AddTool( MDI_SAVE, *bitmaps[1], wxNullBitmap, false, currentX, wxDefaultCoord, (wxObject *) NULL, wxT("Save test in SVG format"));
-    currentX += width + 5;
+    toolBar->AddTool(MDI_NEW_WINDOW, wxEmptyString, *(bitmaps[0]), wxS("New SVG test window"));
+    toolBar->AddTool(MDI_SAVE, wxEmptyString, *bitmaps[1], wxS("Save test in SVG format"));
     toolBar->AddSeparator();
-    toolBar->AddTool(MDI_ABOUT, *bitmaps[2], wxNullBitmap, false, currentX, wxDefaultCoord, (wxObject *) NULL, wxT("Help"));
+    toolBar->AddTool(MDI_ABOUT, wxEmptyString, *bitmaps[2], wxS("Help"));
 
     toolBar->Realize();
 
@@ -338,76 +283,64 @@ void MyFrame::InitToolBar(wxToolBar* toolBar)
         delete bitmaps[i];
 }
 
-
 void MyFrame::FileSavePicture (wxCommandEvent & WXUNUSED(event) )
 {
 #if wxUSE_FILEDLG
-    MyChild * pChild = (MyChild *)GetActiveChild ();
+    MyChild * pChild = (MyChild *)GetActiveChild();
     if (pChild == NULL)
     {
-        return ;
+        return;
     }
 
     wxFileDialog dialog(this, wxT("Save Picture as"), wxEmptyString, pChild->GetTitle(),
         wxT("SVG vector picture files (*.svg)|*.svg"),
-        wxSAVE|wxOVERWRITE_PROMPT);
+        wxFD_SAVE|wxFD_OVERWRITE_PROMPT);
 
     if (dialog.ShowModal() == wxID_OK)
     {
-        if (!pChild -> OnSave ( dialog.GetPath() ))
+        if (!pChild->OnSave ( dialog.GetPath() ))
         {
-            return ;
+            return;
         }
     }
-    return ;
+    return;
 #endif // wxUSE_FILEDLG
 }
 
 
-// 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_CLOSE(MyChild::OnClose)
-END_EVENT_TABLE()
-
-BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
-
-END_EVENT_TABLE()
-
 // ---------------------------------------------------------------------------
 // MyCanvas
 // ---------------------------------------------------------------------------
 
+BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
+END_EVENT_TABLE()
+
 // 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(MyChild *parent, const wxPoint& pos, const wxSize& size)
+    : wxScrolledWindow(parent, wxID_ANY, pos, size, wxSUNKEN_BORDER|wxVSCROLL|wxHSCROLL)
 {
-    m_child = (MyChild *) parent ;
-    SetBackgroundColour(wxColour(_T("WHITE")));
-    m_index = m_child->m_frame->nWinCreated % 7 ;
-}
+    SetBackgroundColour(*wxWHITE);
 
+    m_child = parent;
+    m_index = m_child->GetFrame()->GetCountOfChildren() % 9;
+}
 
 // Define the repainting behaviour
 void MyCanvas::OnDraw(wxDC& dc)
 {
     // vars to use ...
 #if wxUSE_STATUSBAR
-    wxString s ;
+    wxString s;
 #endif // wxUSE_STATUSBAR
-    wxPen wP ;
-    wxBrush wB ;
+    wxPen wP;
+    wxBrush wB;
     wxPoint points[6];
     wxColour wC;
-    wxFont wF ;
+    wxFont wF;
 
     dc.SetFont(*wxSWISS_FONT);
     dc.SetPen(*wxGREEN_PEN);
 
-
     switch (m_index)
     {
         default:
@@ -416,27 +349,27 @@ void MyCanvas::OnDraw(wxDC& dc)
             dc.DrawLine(0, 0, 200, 200);
             dc.DrawLine(200, 0, 0, 200);
             // draw point colored line and spline
-            wP = *wxCYAN_PEN ;
+            wP = *wxCYAN_PEN;
             wP.SetWidth(3);
             dc.SetPen(wP);
 
-            dc.DrawPoint (25,15) ;
+            dc.DrawPoint (25,15);
             dc.DrawLine(50, 30, 200, 30);
             dc.DrawSpline(50, 200, 50, 100, 200, 10);
 #if wxUSE_STATUSBAR
             s = wxT("Green Cross, Cyan Line and spline");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
 
         case 1:
             // draw standard shapes
             dc.SetBrush(*wxCYAN_BRUSH);
             dc.SetPen(*wxRED_PEN);
             dc.DrawRectangle(10, 10, 100, 70);
-            wB = wxBrush (_T("DARK ORCHID"), wxTRANSPARENT);
+            wB = wxBrush (wxT("DARK ORCHID"), wxBRUSHSTYLE_TRANSPARENT);
             dc.SetBrush (wB);
             dc.DrawRoundedRectangle(50, 50, 100, 70, 20);
-            dc.SetBrush (wxBrush(_T("GOLDENROD"), wxSOLID) );
+            dc.SetBrush (wxBrush(wxT("GOLDENROD")) );
             dc.DrawEllipse(100, 100, 100, 50);
 
             points[0].x = 100; points[0].y = 200;
@@ -451,29 +384,29 @@ void MyCanvas::OnDraw(wxDC& dc)
 #if wxUSE_STATUSBAR
             s = wxT("Blue rectangle, red edge, clear rounded rectangle, gold ellipse, gold and clear stars");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
 
         case 2:
             // draw text in Arial or similar font
             dc.DrawLine(50,25,50,35);
             dc.DrawLine(45,30,55,30);
             dc.DrawText(wxT("This is a Swiss-style string"), 50, 30);
-            wC = dc.GetTextForeground() ;
-            dc.SetTextForeground (_T("FIREBRICK"));
+            wC = dc.GetTextForeground();
+            dc.SetTextForeground (wxT("FIREBRICK"));
 
             // no effect in msw ??
-            dc.SetTextBackground (_T("WHEAT"));
+            dc.SetTextBackground (wxT("WHEAT"));
             dc.DrawText(wxT("This is a Red string"), 50, 200);
             dc.DrawRotatedText(wxT("This is a 45 deg string"), 50, 200, 45);
             dc.DrawRotatedText(wxT("This is a 90 deg string"), 50, 200, 90);
             wF = wxFont ( 18, wxROMAN, wxITALIC, wxBOLD, false, wxT("Times New Roman"));
             dc.SetFont(wF);
-            dc.SetTextForeground (wC) ;
+            dc.SetTextForeground (wC);
             dc.DrawText(wxT("This is a Times-style string"), 50, 60);
 #if wxUSE_STATUSBAR
             s = wxT("Swiss, Times text; red text, rotated and colored orange");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
 
         case 3 :
             // four arcs start and end points, center
@@ -485,41 +418,41 @@ void MyCanvas::OnDraw(wxDC& dc)
             dc.DrawArc ( 270-50, 270-86, 270-86, 270-50, 270,270 );
             dc.SetDeviceOrigin(0,0);
 
-            wP.SetColour (_T("CADET BLUE"));
+            wP.SetColour (wxT("CADET BLUE"));
             dc.SetPen(wP);
             dc.DrawArc ( 75,125, 110, 40, 75, 75 );
 
-            wP.SetColour (_T("SALMON"));
+            wP.SetColour (wxT("SALMON"));
             dc.SetPen(wP);
             dc.SetBrush(*wxRED_BRUSH);
             //top left corner, width and height, start and end angle
                                  // 315 same center and x-radius as last pie-arc, half Y radius
-            dc.DrawEllipticArc(25,50,100,50,180.0,45.0) ;
+            dc.DrawEllipticArc(25,50,100,50,180.0,45.0);
 
-            wP = *wxCYAN_PEN ;
+            wP = *wxCYAN_PEN;
             wP.SetWidth(3);
             dc.SetPen(wP);
                                  //wxTRANSPARENT));
-            dc.SetBrush (wxBrush (_T("SALMON"),wxSOLID)) ;
-            dc.DrawEllipticArc(300,  0,200,100, 0.0,145.0) ;
+            dc.SetBrush (wxBrush (wxT("SALMON")));
+            dc.DrawEllipticArc(300,  0,200,100, 0.0,145.0);
                                  //same end point
-            dc.DrawEllipticArc(300, 50,200,100,90.0,145.0) ;
-            dc.DrawEllipticArc(300,100,200,100,90.0,345.0) ;
+            dc.DrawEllipticArc(300, 50,200,100,90.0,145.0);
+            dc.DrawEllipticArc(300,100,200,100,90.0,345.0);
 
 #if wxUSE_STATUSBAR
             s = wxT("This is an arc test page");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
 
         case 4:
             dc.DrawCheckMark ( 30,30,25,25);
-            dc.SetBrush (wxBrush (_T("SALMON"),wxTRANSPARENT));
+            dc.SetBrush (wxBrush (wxT("SALMON"),wxBRUSHSTYLE_TRANSPARENT));
             dc.DrawCheckMark ( 80,50,75,75);
             dc.DrawRectangle ( 80,50,75,75);
 #if wxUSE_STATUSBAR
             s = wxT("Two check marks");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
 
         case 5:
             wF = wxFont ( 18, wxROMAN, wxITALIC, wxBOLD, false, wxT("Times New Roman"));
@@ -529,7 +462,7 @@ void MyCanvas::OnDraw(wxDC& dc)
             dc.DrawText(wxT("This is an 18pt string"), 50, 60);
 
             // rescale and draw in blue
-            wP = *wxCYAN_PEN ;
+            wP = *wxCYAN_PEN;
             dc.SetPen(wP);
             dc.SetUserScale (2.0,0.5);
             dc.SetDeviceOrigin(200,0);
@@ -540,27 +473,132 @@ void MyCanvas::OnDraw(wxDC& dc)
             dc.SetDeviceOrigin(200,200);
             dc.DrawText(wxT("This is an 18pt string 2 x 2 UserScaled"), 50, 60);
 
-            wP = *wxRED_PEN ;
+            wP = *wxRED_PEN;
             dc.SetPen(wP);
             dc.SetUserScale (1.0,1.0);
             dc.SetDeviceOrigin(0,10);
-            dc.SetMapMode (wxMM_METRIC) ; //svg ignores this
+            dc.SetMapMode (wxMM_METRIC); //svg ignores this
             dc.DrawLine(0, 0, 200, 200);
             dc.DrawLine(200, 0, 0, 200);
             dc.DrawText(wxT("This is an 18pt string in MapMode"), 50, 60);
 #if wxUSE_STATUSBAR
             s = wxT("Scaling test page");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
 
         case 6:
-            dc.DrawIcon( wxIcon(mondrian_xpm), 10, 10 );
+            dc.DrawIcon( wxICON(sample), 10, 10 );
             dc.DrawBitmap ( wxBitmap(svgbitmap_xpm), 50,15);
 #if wxUSE_STATUSBAR
             s = wxT("Icon and Bitmap ");
 #endif // wxUSE_STATUSBAR
-            break ;
+            break;
+
+        case 7:
+            dc.SetTextForeground(wxT("RED"));
+            dc.DrawText(wxT("Red = Clipping Off"), 30, 5);
+            dc.SetTextForeground(wxT("GREEN"));
+            dc.DrawText(wxT("Green = Clipping On"), 30, 25);
+
+            dc.SetTextForeground(wxT("BLACK"));
+
+            dc.SetPen(*wxRED_PEN);
+            dc.SetBrush (wxBrush (wxT("SALMON"),wxBRUSHSTYLE_TRANSPARENT));
+            dc.DrawCheckMark ( 80,50,75,75);
+            dc.DrawRectangle ( 80,50,75,75);
+
+            dc.SetPen(*wxGREEN_PEN);
+
+            // Clipped checkmarks
+            dc.DrawRectangle(180,50,75,75);
+            dc.SetClippingRegion(180,50,75,75);                   // x,y,width,height version
+            dc.DrawCheckMark ( 180,50,75,75);
+            dc.DestroyClippingRegion();
+
+            dc.DrawRectangle(wxRect(80,150,75,75));
+            dc.SetClippingRegion(wxPoint(80,150),wxSize(75,75));  // pt,size version
+            dc.DrawCheckMark ( 80,150,75,75);
+            dc.DestroyClippingRegion();
+
+            dc.DrawRectangle(wxRect(180,150,75,75));
+            dc.SetClippingRegion(wxRect(180,150,75,75));          // rect version
+            dc.DrawCheckMark ( 180,150,75,75);
+            dc.DestroyClippingRegion();
+
+            dc.DrawRectangle(wxRect( 80,250,50,65));
+            dc.DrawRectangle(wxRect(105,260,50,65));
+            dc.SetClippingRegion(wxRect( 80,250,50,65));  // second call to SetClippingRegion
+            dc.SetClippingRegion(wxRect(105,260,50,65));  // forms intersection with previous
+            dc.DrawCheckMark(80,250,75,75);
+            dc.DestroyClippingRegion();                   // only one call to destroy (there's no stack)
+
+            /*
+            ** Clipping by wxRegion not implemented for SVG.   Should be
+            ** possible, but need to access points that define the wxRegion
+            ** from inside DoSetDeviceClippingRegion() and wxRegion does not
+            ** implement anything like getPoints().
+            points[0].x = 180; points[0].y = 250;
+            points[1].x = 255; points[1].y = 250;
+            points[2].x = 180; points[2].y = 325;
+            points[3].x = 255; points[3].y = 325;
+            points[4].x = 180; points[4].y = 250;
+
+            dc.DrawLines (5, points);
+            wxRegion reg = wxRegion(5,points);
+
+            dc.SetClippingRegion(reg);
+            dc.DrawCheckMark ( 180,250,75,75);
+            dc.DestroyClippingRegion();
+            */
+
+#if wxUSE_STATUSBAR
+            s = wxT("Clipping region");
+#endif // wxUSE_STATUSBAR
+            break;
+
+        case 8:
+            wxString txtStr;
+            wxCoord txtX, txtY, txtW, txtH, txtDescent, txtEL;
+            wxCoord txtPad = 0;
 
+            wP = *wxRED_PEN;
+            dc.SetPen(wP);
+            //dc.SetBackgroundMode(wxBRUSHSTYLE_SOLID);
+            //dc.SetTextBackground(*wxBLUE);
+
+            // Horizontal text
+            txtStr = wxT("Horizontal string");
+            dc.GetTextExtent(txtStr, &txtW, &txtH, &txtDescent, &txtEL);
+            txtX = 50;
+            txtY = 300;
+            dc.DrawRectangle(txtX, txtY, txtW + 2*txtPad, txtH + 2*txtPad);
+            dc.DrawText(txtStr, txtX + txtPad, txtY + txtPad);
+
+            // Vertical text
+            txtStr = wxT("Vertical string");
+            dc.GetTextExtent(txtStr, &txtW, &txtH, &txtDescent, &txtEL);
+            txtX = 50;
+            txtY = 250;
+            dc.DrawRectangle(txtX, txtY - (txtW + 2*txtPad), txtH + 2*txtPad, txtW + 2*txtPad);
+            dc.DrawRotatedText(txtStr, txtX + txtPad, txtY - txtPad, 90);
+
+            // 45 degree text
+            txtStr = wxT("45 deg string");
+            dc.GetTextExtent(txtStr, &txtW, &txtH, &txtDescent, &txtEL);
+            double lenW = (double)(txtW + 2*txtPad) / sqrt(2.0);
+            double lenH = (double)(txtH + 2*txtPad) / sqrt(2.0);
+            double padding = (double)txtPad / sqrt(2.0);
+            txtX = 150;
+            txtY = 200;
+            dc.DrawLine(txtX - padding, txtY, txtX + lenW, txtY - lenW); // top
+            dc.DrawLine(txtX + lenW, txtY - lenW, txtX - padding + lenH + lenW, txtY + (lenH - lenW));
+            dc.DrawLine(txtX - padding, txtY, txtX - padding + lenH, txtY + lenH);
+            dc.DrawLine(txtX - padding + lenH, txtY + lenH, txtX - padding + lenH + lenW, txtY + (lenH - lenW)); // bottom
+            dc.DrawRotatedText(txtStr, txtX, txtY, 45);
+#if wxUSE_STATUSBAR
+            s = wxT("Text position test page");
+#endif // wxUSE_STATUSBAR
+            break;
     }
 #if wxUSE_STATUSBAR
     m_child->SetStatusText(s);
@@ -568,62 +606,54 @@ void MyCanvas::OnDraw(wxDC& dc)
 }
 
 
-
-
 // ---------------------------------------------------------------------------
 // MyChild
 // ---------------------------------------------------------------------------
 
+// 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)
+END_EVENT_TABLE()
+
 MyChild::MyChild(wxMDIParentFrame *parent, const wxString& title,
-const wxPoint& pos, const wxSize& size,
-const long style)
-: wxMDIChildFrame(parent, -1, title, pos, size, style)
+                 const wxPoint& pos, const wxSize& size,
+                 const long style)
+    : wxMDIChildFrame(parent, wxID_ANY, title, pos, size, style)
 {
+    m_frame = (MyFrame *) parent;
 
-    m_frame = (MyFrame *) parent ;
 #if wxUSE_STATUSBAR
     CreateStatusBar();
     SetStatusText(title);
 #endif // wxUSE_STATUSBAR
 
-    int w, h ;
-    GetClientSize ( &w, &h );
-    m_canvas = new MyCanvas(this, wxPoint(0, 0),  wxSize (w,h)  );
+    m_canvas = new MyCanvas(this, wxPoint(0, 0), GetClientSize());
+
     // Give it scrollbars
     m_canvas->SetScrollbars(20, 20, 50, 50);
-
 }
 
-
 MyChild::~MyChild()
 {
-    m_frame->m_children.DeleteObject(this);
 }
 
-
 void MyChild::OnQuit(wxCommandEvent& WXUNUSED(event))
 {
     Close(true);
 }
 
-
 bool MyChild::OnSave(wxString filename)
 {
-    wxSVGFileDC svgDC (filename, 600, 650) ;
+    wxSVGFileDC svgDC (filename, 600, 650);
     m_canvas->OnDraw (svgDC);
-    return svgDC.Ok();
+    return svgDC.IsOk();
 }
 
-
-
 void MyChild::OnActivate(wxActivateEvent& event)
 {
     if ( event.GetActive() && m_canvas )
         m_canvas->SetFocus();
 }
 
-
-void MyChild::OnClose(wxCloseEvent& event)
-{
-    event.Skip();
-}