samples/drawing/drawing.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        drawing.cpp
   3 // Purpose:     shows and tests wxDC features
   4 // Author:      Robert Roebling
   5 // Modified by:
   6 // Created:     04/01/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Robert Roebling
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19 #ifdef __GNUG__
  20     #pragma implementation "drawing.cpp"
  21     #pragma interface "drawing.cpp"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx/wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 // for all others, include the necessary headers (this file is usually all you
  32 // need because it includes almost all "standard" wxWindows headers
  33 #ifndef WX_PRECOMP
  34     #include "wx/wx.h"
  35 #endif
  36
  37 #include "wx/colordlg.h"
  38
  39 // ----------------------------------------------------------------------------
  40 // ressources
  41 // ----------------------------------------------------------------------------
  42 // the application icon
  43 #if defined(__WXGTK__) || defined(__WXMOTIF__)
  44     #include "mondrian.xpm"
  45 #endif
  46
  47 // ----------------------------------------------------------------------------
  48 // private classes
  49 // ----------------------------------------------------------------------------
  50
  51 // Define a new application type, each program should derive a class from wxApp
  52 class MyApp : public wxApp
  53 {
  54 public:
  55     // override base class virtuals
  56     // ----------------------------
  57
  58     // this one is called on application startup and is a good place for the app
  59     // initialization (doing it here and not in the ctor allows to have an error
  60     // return: if OnInit() returns false, the application terminates)
  61     virtual bool OnInit();
  62 };
  63
  64 class MyCanvas;
  65
  66 // Define a new frame type: this is going to be our main frame
  67 class MyFrame : public wxFrame
  68 {
  69 public:
  70     // ctor(s)
  71     MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size);
  72
  73     // event handlers (these functions should _not_ be virtual)
  74     void OnQuit(wxCommandEvent& event);
  75     void OnAbout(wxCommandEvent& event);
  76     void OnOption(wxCommandEvent &event);
  77
  78     wxColour SelectColour();
  79     void PrepareDC(wxDC& dc);
  80
  81     int         m_backgroundMode;
  82     int         m_mapMode;
  83     double      m_xUserScale;
  84     double      m_yUserScale;
  85     int         m_xLogicalOrigin;
  86     int         m_yLogicalOrigin;
  87     bool        m_xAxisReversed,
  88                 m_yAxisReversed;
  89     wxColour    m_colourForeground,    // these are _text_ colours
  90                 m_colourBackground;
  91     wxBrush     m_backgroundBrush;
  92     MyCanvas   *m_canvas;
  93
  94 private:
  95     // any class wishing to process wxWindows events must use this macro
  96     DECLARE_EVENT_TABLE()
  97 };
  98
  99 // define a scrollable canvas for drawing onto
 100 class MyCanvas: public wxScrolledWindow
 101 {
 102 public:
 103     MyCanvas( MyFrame *parent );
 104
 105     void DrawTestLines( int x, int y, int width, wxDC &dc );
 106     void OnPaint(wxPaintEvent &event);
 107     void OnMouseMove(wxMouseEvent &event);
 108
 109 protected:
 110     MyFrame *m_owner;
 111
 112 private:
 113     DECLARE_EVENT_TABLE()
 114 };
 115
 116 // ----------------------------------------------------------------------------
 117 // constants
 118 // ----------------------------------------------------------------------------
 119
 120 // IDs for the controls and the menu commands
 121 enum
 122 {
 123     // menu items
 124     Minimal_Quit = 1,
 125     Minimal_About,
 126
 127     MenuOption_First,
 128
 129     MapMode_Text = MenuOption_First,
 130     MapMode_Lometric,
 131     MapMode_Twips,
 132     MapMode_Points,
 133     MapMode_Metric,
 134
 135     UserScale_StretchHoriz,
 136     UserScale_ShrinkHoriz,
 137     UserScale_StretchVertic,
 138     UserScale_ShrinkVertic,
 139     UserScale_Restore,
 140
 141     AxisMirror_Horiz,
 142     AxisMirror_Vertic,
 143
 144     LogicalOrigin_MoveDown,
 145     LogicalOrigin_MoveUp,
 146     LogicalOrigin_MoveLeft,
 147     LogicalOrigin_MoveRight,
 148
 149     Colour_TextForeground,
 150     Colour_TextBackground,
 151     Colour_Background,
 152     Colour_BackgroundMode,
 153
 154     MenuOption_Last = Colour_BackgroundMode
 155 };
 156
 157 // ----------------------------------------------------------------------------
 158 // event tables and other macros for wxWindows
 159 // ----------------------------------------------------------------------------
 160
 161
 162 // Create a new application object: this macro will allow wxWindows to create
 163 // the application object during program execution (it's better than using a
 164 // static object for many reasons) and also declares the accessor function
 165 // wxGetApp() which will return the reference of the right type (i.e. MyApp and
 166 // not wxApp)
 167 IMPLEMENT_APP(MyApp)
 168
 169 // ============================================================================
 170 // implementation
 171 // ============================================================================
 172
 173 // ----------------------------------------------------------------------------
 174 // the application class
 175 // ----------------------------------------------------------------------------
 176
 177 // `Main program' equivalent: the program execution "starts" here
 178 bool MyApp::OnInit()
 179 {
 180     // Create the main application window
 181     MyFrame *frame = new MyFrame("Drawing sample",
 182                                  wxPoint(50, 50), wxSize(550, 340));
 183
 184     // Show it and tell the application that it's our main window
 185     frame->Show(TRUE);
 186     SetTopWindow(frame);
 187
 188     // success: wxApp::OnRun() will be called which will enter the main message
 189     // loop and the application will run. If we returned FALSE here, the
 190     // application would exit immediately.
 191     return TRUE;
 192 }
 193
 194 // ----------------------------------------------------------------------------
 195 // MyCanvas
 196 // ----------------------------------------------------------------------------
 197
 198 // the event tables connect the wxWindows events with the functions (event
 199 // handlers) which process them.
 200 BEGIN_EVENT_TABLE(MyCanvas, wxScrolledWindow)
 201     EVT_PAINT  (MyCanvas::OnPaint)
 202     EVT_MOTION (MyCanvas::OnMouseMove)
 203 END_EVENT_TABLE()
 204
 205 MyCanvas::MyCanvas( MyFrame *parent )
 206   : wxScrolledWindow( parent )
 207 {
 208   m_owner = parent;
 209 }
 210
 211 void MyCanvas::DrawTestLines( int x, int y, int width, wxDC &dc )
 212 {
 213     dc.SetPen( wxPen( "black", width, wxSOLID) );
 214     dc.SetBrush( *wxRED_BRUSH );
 215     dc.DrawRectangle( x+10, y+10, 100, 190 );
 216
 217     dc.SetPen( wxPen( "black", width, wxSOLID) );
 218     dc.DrawLine( x+20, y+20, 100, y+20 );
 219     dc.SetPen( wxPen( "black", width, wxDOT) );
 220     dc.DrawLine( x+20, y+30, 100, y+30 );
 221     dc.SetPen( wxPen( "black", width, wxSHORT_DASH) );
 222     dc.DrawLine( x+20, y+40, 100, y+40 );
 223     dc.SetPen( wxPen( "black", width, wxLONG_DASH) );
 224     dc.DrawLine( x+20, y+50, 100, y+50 );
 225     dc.SetPen( wxPen( "black", width, wxDOT_DASH) );
 226     dc.DrawLine( x+20, y+60, 100, y+60 );
 227
 228     dc.SetPen( wxPen( "black", width, wxBDIAGONAL_HATCH) );
 229     dc.DrawLine( x+20, y+70, 100, y+70 );
 230     dc.SetPen( wxPen( "black", width, wxCROSSDIAG_HATCH) );
 231     dc.DrawLine( x+20, y+80, 100, y+80 );
 232     dc.SetPen( wxPen( "black", width, wxFDIAGONAL_HATCH) );
 233     dc.DrawLine( x+20, y+90, 100, y+90 );
 234     dc.SetPen( wxPen( "black", width, wxCROSS_HATCH) );
 235     dc.DrawLine( x+20, y+100, 100, y+100 );
 236     dc.SetPen( wxPen( "black", width, wxHORIZONTAL_HATCH) );
 237     dc.DrawLine( x+20, y+110, 100, y+110 );
 238     dc.SetPen( wxPen( "black", width, wxVERTICAL_HATCH) );
 239     dc.DrawLine( x+20, y+120, 100, y+120 );
 240
 241     wxPen ud( "black", width, wxUSER_DASH );
 242     wxDash dash1[1];
 243     dash1[0] = 0;
 244     ud.SetDashes( 1, dash1 );
 245     dc.DrawLine( x+20, y+140, 100, y+140 );
 246     dash1[0] = 1;
 247     ud.SetDashes( 1, dash1 );
 248     dc.DrawLine( x+20, y+150, 100, y+150 );
 249     dash1[0] = 2;
 250     ud.SetDashes( 1, dash1 );
 251     dc.DrawLine( x+20, y+160, 100, y+160 );
 252     dash1[0] = 0xFF;
 253     ud.SetDashes( 1, dash1 );
 254     dc.DrawLine( x+20, y+170, 100, y+170 );
 255
 256 }
 257
 258 void MyCanvas::OnPaint(wxPaintEvent &WXUNUSED(event))
 259 {
 260     wxPaintDC dc(this);
 261     PrepareDC(dc);
 262     m_owner->PrepareDC(dc);
 263
 264     dc.SetBackgroundMode( m_owner->m_backgroundMode );
 265     if ( m_owner->m_backgroundBrush.Ok() )
 266         dc.SetBackground( m_owner->m_backgroundBrush );
 267     if ( m_owner->m_colourForeground.Ok() )
 268         dc.SetTextForeground( m_owner->m_colourForeground );
 269     if ( m_owner->m_colourBackground.Ok() )
 270         dc.SetTextBackground( m_owner->m_colourBackground );
 271
 272     // mark the origin
 273     dc.DrawCircle(0, 0, 10);
 274 #if !(defined __WXGTK__) && !(defined __WXMOTIF__)
 275     // not implemented in wxGTK or wxMOTIF :-(
 276     dc.FloodFill(0, 0, wxColour(255, 0, 0));
 277 #endif //
 278
 279     // set underlined font for testing
 280     dc.SetFont( wxFont(12, wxMODERN, wxNORMAL, wxNORMAL, TRUE) );
 281     dc.DrawText( "This is text", 110, 10 );
 282     dc.DrawRotatedText( "That is text", 60, 30, -45 );
 283
 284     dc.SetFont( *wxNORMAL_FONT );
 285
 286     wxString text;
 287     dc. SetBackgroundMode(wxTRANSPARENT);
 288
 289     for ( int n = -180; n < 180; n += 30 )
 290     {
 291         text.Printf("     %d rotated text", n);
 292         dc.DrawRotatedText(text , 400, 400, n);
 293     }
 294
 295     dc.SetFont( wxFont( 18, wxSWISS, wxNORMAL, wxNORMAL ) );
 296
 297     dc.DrawText( "This is Swiss 18pt text.", 110, 40 );
 298
 299     long length;
 300     long height;
 301     long descent;
 302     dc.GetTextExtent( "This is Swiss 18pt text.", &length, &height, &descent );
 303     text.Printf( "Dimensions are length %ld, height %ld, descent %ld", length, height, descent );
 304     dc.DrawText( text, 110, 80 );
 305
 306     dc.DrawRectangle( 100, 40, 4, height );
 307
 308     text.Printf( "CharHeight() returns: %d", dc.GetCharHeight() );
 309     dc.DrawText( text, 110, 120 );
 310
 311
 312     dc.DrawIcon( wxICON(mondrian), 310, 40 );
 313
 314     DrawTestLines( 0, 200, 0, dc );
 315
 316     DrawTestLines( 0, 400, 1, dc );
 317
 318     DrawTestLines( 0, 600, 2, dc );
 319
 320     DrawTestLines( 0, 800, 6, dc );
 321
 322 }
 323
 324 void MyCanvas::OnMouseMove(wxMouseEvent &event)
 325 {
 326     wxClientDC dc(this);
 327     PrepareDC(dc);
 328     m_owner->PrepareDC(dc);
 329
 330     wxPoint pos = event.GetPosition();
 331     long x = dc.DeviceToLogicalX( pos.x );
 332     long y = dc.DeviceToLogicalY( pos.y );
 333     wxString str;
 334     str.Printf( "Current mouse position: %d,%d", (int)x, (int)y );
 335     m_owner->SetStatusText( str );
 336 }
 337
 338 // ----------------------------------------------------------------------------
 339 // MyFrame
 340 // ----------------------------------------------------------------------------
 341
 342 // the event tables connect the wxWindows events with the functions (event
 343 // handlers) which process them. It can be also done at run-time, but for the
 344 // simple menu events like this the static method is much simpler.
 345 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
 346     EVT_MENU      (Minimal_Quit,     MyFrame::OnQuit)
 347     EVT_MENU      (Minimal_About,    MyFrame::OnAbout)
 348     EVT_MENU_RANGE(MenuOption_First, MenuOption_Last, MyFrame::OnOption)
 349 END_EVENT_TABLE()
 350
 351 // frame constructor
 352 MyFrame::MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
 353        : wxFrame((wxFrame *)NULL, -1, title, pos, size)
 354 {
 355     // set the frame icon
 356     SetIcon(wxICON(mondrian));
 357
 358     wxMenu *menuFile = new wxMenu;
 359     menuFile->Append(Minimal_About, "&About...\tCtrl-A", "Show about dialog");
 360     menuFile->AppendSeparator();
 361     menuFile->Append(Minimal_Quit, "E&xit\tAlt-X", "Quit this program");
 362
 363     wxMenu *menuMapMode = new wxMenu;
 364     menuMapMode->Append( MapMode_Text, "&TEXT map mode" );
 365     menuMapMode->Append( MapMode_Lometric, "&LOMETRIC map mode" );
 366     menuMapMode->Append( MapMode_Twips, "T&WIPS map mode" );
 367     menuMapMode->Append( MapMode_Points, "&POINTS map mode" );
 368     menuMapMode->Append( MapMode_Metric, "&METRIC map mode" );
 369
 370     wxMenu *menuUserScale = new wxMenu;
 371     menuUserScale->Append( UserScale_StretchHoriz, "Stretch horizontally\tCtrl-H" );
 372     menuUserScale->Append( UserScale_ShrinkHoriz, "Shrink  horizontally\tCtrl-G" );
 373     menuUserScale->Append( UserScale_StretchVertic, "Stretch vertically\tCtrl-V" );
 374     menuUserScale->Append( UserScale_ShrinkVertic, "Shrink vertically\tCtrl-W" );
 375     menuUserScale->AppendSeparator();
 376     menuUserScale->Append( UserScale_Restore, "Restore to normal\tCtrl-0" );
 377
 378     wxMenu *menuAxis = new wxMenu;
 379     menuAxis->Append( AxisMirror_Horiz, "Mirror horizontally\tCtrl-M", "", TRUE );
 380     menuAxis->Append( AxisMirror_Vertic, "Mirror vertically\tCtrl-N", "", TRUE );
 381
 382     wxMenu *menuLogical = new wxMenu;
 383     menuLogical->Append( LogicalOrigin_MoveDown, "Move &down\tCtrl-D" );
 384     menuLogical->Append( LogicalOrigin_MoveUp, "Move &up\tCtrl-U" );
 385     menuLogical->Append( LogicalOrigin_MoveLeft, "Move &right\tCtrl-L" );
 386     menuLogical->Append( LogicalOrigin_MoveRight, "Move &left\tCtrl-R" );
 387
 388     wxMenu *menuColour = new wxMenu;
 389     menuColour->Append( Colour_TextForeground, "Text foreground..." );
 390     menuColour->Append( Colour_TextBackground, "Text background..." );
 391     menuColour->Append( Colour_Background, "Background colour..." );
 392     menuColour->Append( Colour_BackgroundMode, "Opaque/transparent\tCtrl-B", "", TRUE );
 393
 394     // now append the freshly created menu to the menu bar...
 395     wxMenuBar *menuBar = new wxMenuBar;
 396     menuBar->Append(menuFile, "&File");
 397     menuBar->Append(menuMapMode, "&MapMode");
 398     menuBar->Append(menuUserScale, "&UserScale");
 399     menuBar->Append(menuAxis, "&Axis");
 400     menuBar->Append(menuLogical, "&LogicalOrigin");
 401     menuBar->Append(menuColour, "&Colours");
 402
 403     // ... and attach this menu bar to the frame
 404     SetMenuBar(menuBar);
 405
 406     // create a status bar just for fun (by default with 1 pane only)
 407     CreateStatusBar(2);
 408     SetStatusText("Welcome to wxWindows!");
 409
 410     m_mapMode = wxMM_TEXT;
 411     m_xUserScale = 1.0;
 412     m_yUserScale = 1.0;
 413     m_xLogicalOrigin = 0;
 414     m_yLogicalOrigin = 0;
 415     m_xAxisReversed =
 416     m_yAxisReversed = FALSE;
 417     m_backgroundMode = wxSOLID;
 418
 419     m_canvas = new MyCanvas( this );
 420     m_canvas->SetScrollbars( 10, 10, 100, 200 );
 421 }
 422
 423 // event handlers
 424
 425 void MyFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
 426 {
 427     // TRUE is to force the frame to close
 428     Close(TRUE);
 429 }
 430
 431 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 432 {
 433     wxString msg;
 434     msg.Printf( _T("This is the about dialog of the drawing sample.\n")
 435                 _T("Copyright (c) Robert Roebling 1999")
 436               );
 437
 438     wxMessageBox(msg, "About Drawing", wxOK | wxICON_INFORMATION, this);
 439 }
 440
 441 void MyFrame::OnOption(wxCommandEvent &event)
 442 {
 443     switch (event.GetInt())
 444     {
 445         case MapMode_Text:
 446             m_mapMode = wxMM_TEXT;
 447             break;
 448         case MapMode_Lometric:
 449             m_mapMode = wxMM_LOMETRIC;
 450             break;
 451         case MapMode_Twips:
 452             m_mapMode = wxMM_TWIPS;
 453             break;
 454         case MapMode_Points:
 455             m_mapMode = wxMM_POINTS;
 456             break;
 457         case MapMode_Metric:
 458             m_mapMode = wxMM_METRIC;
 459             break;
 460
 461         case LogicalOrigin_MoveDown:
 462             m_yLogicalOrigin += 10;
 463             break;
 464         case LogicalOrigin_MoveUp:
 465             m_yLogicalOrigin -= 10;
 466             break;
 467         case LogicalOrigin_MoveLeft:
 468             m_xLogicalOrigin += 10;
 469             break;
 470         case LogicalOrigin_MoveRight:
 471             m_xLogicalOrigin -= 10;
 472             break;
 473
 474         case UserScale_StretchHoriz:
 475             m_xUserScale *= 1.10;
 476             break;
 477         case UserScale_ShrinkHoriz:
 478             m_xUserScale /= 1.10;
 479             break;
 480         case UserScale_StretchVertic:
 481             m_yUserScale *= 1.10;
 482             break;
 483         case UserScale_ShrinkVertic:
 484             m_yUserScale /= 1.10;
 485             break;
 486         case UserScale_Restore:
 487             m_xUserScale =
 488             m_yUserScale = 1.0;
 489             break;
 490
 491         case AxisMirror_Vertic:
 492             m_yAxisReversed = !m_yAxisReversed;
 493             break;
 494         case AxisMirror_Horiz:
 495             m_xAxisReversed = !m_xAxisReversed;
 496             break;
 497
 498         case Colour_TextForeground:
 499             m_colourForeground = SelectColour();
 500             break;
 501         case Colour_TextBackground:
 502             m_colourBackground = SelectColour();
 503             break;
 504         case Colour_Background:
 505             {
 506                 wxColour col = SelectColour();
 507                 if ( col.Ok() )
 508                 {
 509                     m_backgroundBrush.SetColour(col);
 510                 }
 511             }
 512             break;
 513         case Colour_BackgroundMode:
 514             m_backgroundMode = m_backgroundMode == wxSOLID ? wxTRANSPARENT
 515                                                            : wxSOLID;
 516             break;
 517
 518         default:
 519             // skip Refresh()
 520             return;
 521     }
 522
 523     m_canvas->Refresh();
 524 }
 525
 526 void MyFrame::PrepareDC(wxDC& dc)
 527 {
 528     dc.SetMapMode( m_mapMode );
 529     dc.SetUserScale( m_xUserScale, m_yUserScale );
 530     dc.SetLogicalOrigin( m_xLogicalOrigin, m_yLogicalOrigin );
 531     dc.SetAxisOrientation( !m_xAxisReversed, m_yAxisReversed );
 532 }
 533
 534 wxColour MyFrame::SelectColour()
 535 {
 536     wxColour col;
 537     wxColourData data;
 538     wxColourDialog dialog(this, &data);
 539
 540     if ( dialog.ShowModal() == wxID_OK )
 541     {
 542         col = dialog.GetColourData().GetColour();
 543     }
 544
 545     return col;
 546 }