]> git.saurik.com Git - wxWidgets.git/blob - utils/ogl/samples/ogledit/ogledit.cpp
Cured BC++ makefile bug; wxGrid fix; updated Motif install.txt
[wxWidgets.git] / utils / ogl / samples / 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(__WXMOTIF__)
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, "Diagram", "*.dia", "", "dia", "Diagram Doc", "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, "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 wxMenu *edit_menu = NULL;
76
77 file_menu->Append(wxID_NEW, "&New...");
78 file_menu->Append(wxID_OPEN, "&Open...");
79
80 file_menu->Append(wxID_CLOSE, "&Close");
81 file_menu->Append(wxID_SAVE, "&Save");
82 file_menu->Append(wxID_SAVEAS, "Save &As...");
83 file_menu->AppendSeparator();
84 file_menu->Append(wxID_PRINT, "&Print...");
85 file_menu->Append(wxID_PRINT_SETUP, "Print &Setup...");
86 file_menu->Append(wxID_PREVIEW, "Print Pre&view");
87
88 edit_menu = new wxMenu;
89 edit_menu->Append(wxID_UNDO, "&Undo");
90 edit_menu->Append(wxID_REDO, "&Redo");
91 edit_menu->AppendSeparator();
92 edit_menu->Append(OGLEDIT_CUT, "&Cut");
93 edit_menu->AppendSeparator();
94 edit_menu->Append(OGLEDIT_CHANGE_BACKGROUND_COLOUR, "Change &background colour");
95 edit_menu->Append(OGLEDIT_EDIT_LABEL, "Edit &label");
96
97 frame->editMenu = edit_menu;
98
99 file_menu->AppendSeparator();
100 file_menu->Append(wxID_EXIT, "E&xit");
101
102 // A nice touch: a history of files visited. Use this menu.
103 myDocManager->FileHistoryUseMenu(file_menu);
104
105 wxMenu *help_menu = new wxMenu;
106 help_menu->Append(OGLEDIT_ABOUT, "&About");
107
108 wxMenuBar *menu_bar = new wxMenuBar;
109
110 menu_bar->Append(file_menu, "&File");
111 if (edit_menu)
112 menu_bar->Append(edit_menu, "&Edit");
113 menu_bar->Append(help_menu, "&Help");
114
115 frame->canvas = frame->CreateCanvas(NULL, frame);
116 frame->palette = wxGetApp().CreatePalette(frame);
117 myDocManager->CreateDocument("", wxDOC_NEW);
118
119 //// Associate the menu bar with the frame
120 frame->SetMenuBar(menu_bar);
121
122 frame->CreateStatusBar(1);
123
124 frame->Centre(wxBOTH);
125 frame->Show(TRUE);
126
127 return TRUE;
128 }
129
130 int MyApp::OnExit(void)
131 {
132 wxOGLCleanUp();
133 delete myDocManager;
134 return 0;
135 }
136
137 /*
138 * This is the top-level window of the application.
139 */
140
141 IMPLEMENT_CLASS(MyFrame, wxDocParentFrame)
142
143 BEGIN_EVENT_TABLE(MyFrame, wxDocParentFrame)
144 EVT_MENU(OGLEDIT_ABOUT, MyFrame::OnAbout)
145 EVT_SIZE(MyFrame::OnSize)
146 END_EVENT_TABLE()
147
148 MyFrame::MyFrame(wxDocManager *manager, wxFrame *frame, const wxString& title,
149 const wxPoint& pos, const wxSize& size, long type):
150 wxDocParentFrame(manager, frame, -1, title, pos, size, type)
151 {
152 canvas = NULL;
153 palette = NULL;
154 editMenu = NULL;
155 }
156
157 void MyFrame::OnSize(wxSizeEvent& event)
158 {
159 if (canvas && palette)
160 {
161 int cw, ch;
162 GetClientSize(&cw, &ch);
163 int paletteX = 0;
164 int paletteY = 0;
165 int paletteW = 30;
166 int paletteH = ch;
167 int canvasX = paletteX + paletteW;
168 int canvasY = 0;
169 int canvasW = cw - paletteW;
170 int canvasH = ch;
171
172 palette->SetSize(paletteX, paletteY, paletteW, paletteH);
173 canvas->SetSize(canvasX, canvasY, canvasW, canvasH);
174 }
175 }
176
177 bool MyFrame::OnClose(void)
178 {
179 if (wxDocParentFrame::OnClose())
180 {
181 wxOGLCleanUp();
182 return TRUE;
183 }
184 else
185 return FALSE;
186 }
187
188 // Intercept menu commands
189 void MyFrame::OnAbout(wxCommandEvent& event)
190 {
191 (void)wxMessageBox("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", "About OGLEdit");
192 }
193
194 // Creates a canvas. Called by OnInit as a child of the main window
195 MyCanvas *MyFrame::CreateCanvas(wxView *view, wxFrame *parent)
196 {
197 int width, height;
198 parent->GetClientSize(&width, &height);
199
200 // Non-retained canvas
201 MyCanvas *canvas = new MyCanvas(view, parent, -1, wxPoint(0, 0), wxSize(width, height), 0);
202 canvas->SetCursor(wxCursor(wxCURSOR_HAND));
203
204 // Give it scrollbars
205 canvas->SetScrollbars(20, 20, 50, 50);
206
207 return canvas;
208 }
209
210 MyFrame *GetMainFrame(void)
211 {
212 return wxGetApp().frame;
213 }
214