contrib/samples/ogl/ogledit/ogledit.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        ogledit.cpp
   3 // Purpose:     OGLEdit sample app
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     12/07/98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 // #pragma implementation
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24 #include <wx/wx.h>
  25 #endif
  26
  27 #if !wxUSE_DOC_VIEW_ARCHITECTURE
  28 #error You must set wxUSE_DOC_VIEW_ARCHITECTURE to 1 in wx_setup.h!
  29 #endif
  30
  31 #include "ogledit.h"
  32 #include "palette.h"
  33 #include "doc.h"
  34 #include "view.h"
  35
  36 #if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__)
  37 #include "ogl.xpm"
  38 #endif
  39
  40 // A macro needed for some compilers (AIX) that need 'main' to be defined
  41 // in the application itself.
  42 IMPLEMENT_APP(MyApp)
  43
  44 MyApp::MyApp(void)
  45 {
  46   frame = NULL;
  47   myDocManager= NULL;
  48 }
  49
  50 // The `main program' equivalent, creating the windows and returning the
  51 // main frame
  52 bool MyApp::OnInit(void)
  53 {
  54   wxOGLInitialize();
  55
  56   //// Create a document manager
  57   myDocManager = new wxDocManager;
  58
  59   //// Create a template relating drawing documents to their views
  60   (void) new wxDocTemplate(myDocManager, _T("Diagram"), _T("*.dia"), wxEmptyString, _T("dia"), _T("Diagram Doc"), _T("Diagram View"),
  61           CLASSINFO(DiagramDocument), CLASSINFO(DiagramView));
  62
  63   // If we've only got one window, we only get to edit
  64   // one document at a time.
  65   myDocManager->SetMaxDocsOpen(1);
  66
  67   //// Create the main frame window
  68   frame = new MyFrame(myDocManager, NULL, _T("OGLEdit Demo"), wxPoint(0, 0), wxSize(500, 400), wxDEFAULT_FRAME_STYLE);
  69
  70   //// Give it an icon
  71   frame->SetIcon(wxICON(ogl));
  72
  73   //// Make a menubar
  74   wxMenu *file_menu = new wxMenu;
  75
  76   file_menu->Append(wxID_NEW, _T("&New..."));
  77   file_menu->Append(wxID_OPEN, _T("&Open..."));
  78
  79   file_menu->Append(wxID_CLOSE, _T("&Close"));
  80   file_menu->Append(wxID_SAVE, _T("&Save"));
  81   file_menu->Append(wxID_SAVEAS, _T("Save &As..."));
  82   file_menu->AppendSeparator();
  83   file_menu->Append(wxID_PRINT, _T("&Print..."));
  84   file_menu->Append(wxID_PRINT_SETUP, _T("Print &Setup..."));
  85   file_menu->Append(wxID_PREVIEW, _T("Print Pre&view"));
  86
  87   wxMenu *edit_menu = new wxMenu;
  88   edit_menu->Append(wxID_UNDO, _T("&Undo"));
  89   edit_menu->Append(wxID_REDO, _T("&Redo"));
  90   edit_menu->AppendSeparator();
  91   edit_menu->Append(OGLEDIT_CUT, _T("&Cut"));
  92   edit_menu->AppendSeparator();
  93   edit_menu->Append(OGLEDIT_CHANGE_BACKGROUND_COLOUR, _T("Change &background colour"));
  94   edit_menu->Append(OGLEDIT_EDIT_LABEL, _T("Edit &label"));
  95
  96   frame->editMenu = edit_menu;
  97
  98   file_menu->AppendSeparator();
  99   file_menu->Append(wxID_EXIT, _T("E&xit"));
 100
 101   // A nice touch: a history of files visited. Use this menu.
 102   myDocManager->FileHistoryUseMenu(file_menu);
 103
 104   wxMenu *help_menu = new wxMenu;
 105   help_menu->Append(OGLEDIT_ABOUT, _T("&About"));
 106
 107   wxMenuBar *menu_bar = new wxMenuBar;
 108
 109   menu_bar->Append(file_menu, _T("&File"));
 110   if (edit_menu)
 111     menu_bar->Append(edit_menu, _T("&Edit"));
 112   menu_bar->Append(help_menu, _T("&Help"));
 113
 114   frame->canvas = frame->CreateCanvas(NULL, frame);
 115   frame->palette = wxGetApp().CreatePalette(frame);
 116   myDocManager->CreateDocument(wxEmptyString, wxDOC_NEW);
 117
 118   //// Associate the menu bar with the frame
 119   frame->SetMenuBar(menu_bar);
 120
 121 #if wxUSE_STATUSBAR
 122   frame->CreateStatusBar(1);
 123 #endif // wxUSE_STATUSBAR
 124
 125   frame->Centre(wxBOTH);
 126   frame->Show(true);
 127
 128   return true;
 129 }
 130
 131 int MyApp::OnExit(void)
 132 {
 133     wxOGLCleanUp();
 134     delete myDocManager;
 135     return 0;
 136 }
 137
 138 /*
 139  * This is the top-level window of the application.
 140  */
 141
 142 IMPLEMENT_CLASS(MyFrame, wxDocParentFrame)
 143
 144 BEGIN_EVENT_TABLE(MyFrame, wxDocParentFrame)
 145     EVT_MENU(OGLEDIT_ABOUT, MyFrame::OnAbout)
 146     EVT_SIZE(MyFrame::OnSize)
 147     EVT_CLOSE(MyFrame::OnCloseWindow)
 148 END_EVENT_TABLE()
 149
 150 MyFrame::MyFrame(wxDocManager *manager, wxFrame *frame, const wxString& title,
 151     const wxPoint& pos, const wxSize& size, long type):
 152   wxDocParentFrame(manager, frame, wxID_ANY, title, pos, size, type)
 153 {
 154   canvas = NULL;
 155   palette = NULL;
 156   editMenu = NULL;
 157 }
 158
 159 void MyFrame::OnSize(wxSizeEvent& event)
 160 {
 161   if (canvas && palette)
 162   {
 163     int cw, ch;
 164     GetClientSize(&cw, &ch);
 165     int paletteX = 0;
 166     int paletteY = 0;
 167     int paletteW = 30;
 168     int paletteH = ch;
 169     int canvasX = paletteX + paletteW;
 170     int canvasY = 0;
 171     int canvasW = cw - paletteW;
 172     int canvasH = ch;
 173
 174     palette->SetSize(paletteX, paletteY, paletteW, paletteH);
 175     canvas->SetSize(canvasX, canvasY, canvasW, canvasH);
 176   }
 177   event.Skip();
 178 }
 179
 180 void MyFrame::OnCloseWindow(wxCloseEvent& event)
 181 {
 182   wxDocParentFrame::OnCloseWindow(event);
 183   if (!event.GetVeto())
 184   {
 185     wxOGLCleanUp();
 186   }
 187 }
 188
 189 // Intercept menu commands
 190 void MyFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
 191 {
 192       (void)wxMessageBox(_T("OGLEdit Demo\nTo draw a shape, select a shape on the toolbar and left-click on the canvas.\nTo draw a line, right-drag between shapes.\nFor further details, see the OGL manual.\n (c) Julian Smart 1996"), _T("About OGLEdit"));
 193 }
 194
 195 // Creates a canvas. Called by OnInit as a child of the main window
 196 MyCanvas *MyFrame::CreateCanvas(wxView *view, wxFrame *parent)
 197 {
 198   int width, height;
 199   parent->GetClientSize(&width, &height);
 200
 201   // Non-retained canvas
 202   MyCanvas *canvas = new MyCanvas(view, parent, wxID_ANY, wxPoint(0, 0), wxSize(width, height), 0);
 203   canvas->SetCursor(wxCursor(wxCURSOR_HAND));
 204
 205   // Give it scrollbars
 206   canvas->SetScrollbars(20, 20, 50, 50);
 207
 208   return canvas;
 209 }
 210
 211 MyFrame *GetMainFrame(void)
 212 {
 213   return wxGetApp().frame;
 214 }
 215