]>
git.saurik.com Git - wxWidgets.git/blob - samples/mdi/mdi.cpp
1 /////////////////////////////////////////////////////////////////////////////
4 // Author: Julian Smart
8 // Copyright: (c) Julian Smart and Markus Holzem
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
12 // For compilers that support precompilation, includes "wx/wx.h".
13 #include "wx/wxprec.h"
25 #include <wx/tbar95.h>
30 MyFrame
*frame
= NULL
;
35 // For drawing lines in a canvas
41 // Initialise this in OnInit, not statically
42 bool MyApp::OnInit(void)
44 // Create the main frame window
46 frame
= new MyFrame(NULL
, -1, "MDI Demo", wxPoint(0, 0), wxSize(500, 400),
47 wxDEFAULT_FRAME
| wxHSCROLL
| wxVSCROLL
);
49 // Give it an icon (this is ignored in MDI mode: uses resources)
51 frame
->SetIcon(wxIcon("mdi_icn"));
54 frame
->SetIcon(wxIcon("aiai.xbm"));
58 wxMenu
*file_menu
= new wxMenu
;
60 file_menu
->Append(MDI_NEW_WINDOW
, "&New window");
61 file_menu
->Append(MDI_QUIT
, "&Exit");
63 wxMenu
*help_menu
= new wxMenu
;
64 help_menu
->Append(MDI_ABOUT
, "&About");
66 wxMenuBar
*menu_bar
= new wxMenuBar
;
68 menu_bar
->Append(file_menu
, "&File");
69 menu_bar
->Append(help_menu
, "&Help");
71 // Associate the menu bar with the frame
72 frame
->SetMenuBar(menu_bar
);
74 frame
->CreateStatusBar();
83 BEGIN_EVENT_TABLE(MyFrame
, wxMDIParentFrame
)
84 EVT_MENU(MDI_QUIT
, MyFrame::OnQuit
)
85 EVT_MENU(MDI_ABOUT
, MyFrame::OnAbout
)
86 EVT_MENU(MDI_NEW_WINDOW
, MyFrame::OnNewWindow
)
87 EVT_SIZE(MyFrame::OnSize
)
90 // Define my frame constructor
91 MyFrame::MyFrame(wxWindow
*parent
, const wxWindowID id
, const wxString
& title
, const wxPoint
& pos
, const wxSize
& size
,
93 wxMDIParentFrame(parent
, id
, title
, pos
, size
, style
)
95 textWindow
= new wxTextCtrl(this, -1, "", wxDefaultPosition
, wxDefaultSize
,
96 wxTE_MULTILINE
|wxSUNKEN_BORDER
);
97 textWindow
->SetValue("A help window");
100 toolBar
= new TestRibbon(this, 0, 0, 100, 30, wxNO_BORDER
, wxVERTICAL
, 1);
105 void MyFrame::OnQuit(wxCommandEvent
& event
)
110 void MyFrame::OnAbout(wxCommandEvent
& event
)
112 (void)wxMessageBox("wxWindows 2.0 MDI Demo\nAuthor: Julian Smart (c) 1997\nUsage: mdi.exe", "About MDI Demo");
115 void MyFrame::OnNewWindow(wxCommandEvent
& event
)
117 // Make another frame, containing a canvas
118 MyChild
*subframe
= new MyChild(frame
, "Canvas Frame", wxPoint(10, 10), wxSize(300, 300),
122 sprintf(titleBuf
, "Canvas Frame %d", winNumber
);
123 subframe
->SetTitle(titleBuf
);
126 // Give it an icon (this is ignored in MDI mode: uses resources)
128 subframe
->SetIcon(wxIcon("chrt_icn"));
131 subframe
->SetIcon(wxIcon("aiai.xbm"));
134 // Give it a status line
135 subframe
->CreateStatusBar();
138 wxMenu
*file_menu
= new wxMenu
;
140 file_menu
->Append(MDI_NEW_WINDOW
, "&New window");
141 file_menu
->Append(MDI_CHILD_QUIT
, "&Close child");
142 file_menu
->Append(MDI_QUIT
, "&Exit");
144 wxMenu
*option_menu
= new wxMenu
;
147 option_menu
->Append(MDI_REFRESH
, "&Refresh picture");
149 wxMenu
*help_menu
= new wxMenu
;
150 help_menu
->Append(MDI_ABOUT
, "&About");
152 wxMenuBar
*menu_bar
= new wxMenuBar
;
154 menu_bar
->Append(file_menu
, "&File");
155 menu_bar
->Append(option_menu
, "&Options");
156 menu_bar
->Append(help_menu
, "&Help");
158 // Associate the menu bar with the frame
159 subframe
->SetMenuBar(menu_bar
);
162 subframe
->GetClientSize(&width
, &height
);
163 MyCanvas
*canvas
= new MyCanvas(subframe
, wxPoint(0, 0), wxSize(width
, height
));
164 canvas
->SetCursor(wxCursor(wxCURSOR_PENCIL
));
165 subframe
->canvas
= canvas
;
167 // Give it scrollbars
168 canvas
->SetScrollbars(20, 20, 50, 50);
170 subframe
->Show(TRUE
);
173 BEGIN_EVENT_TABLE(MyCanvas
, wxScrolledWindow
)
174 EVT_MOUSE_EVENTS(MyCanvas::OnEvent
)
177 // Define a constructor for my canvas
178 MyCanvas::MyCanvas(wxWindow
*parent
, const wxPoint
& pos
, const wxSize
& size
):
179 wxScrolledWindow(parent
, -1, pos
, size
, wxSUNKEN_BORDER
)
183 // Define the repainting behaviour
184 void MyCanvas::OnDraw(wxDC
& dc
)
186 dc
.SetFont(*wxSWISS_FONT
);
187 dc
.SetPen(*wxGREEN_PEN
);
188 dc
.DrawLine(0, 0, 200, 200);
189 dc
.DrawLine(200, 0, 0, 200);
191 dc
.SetBrush(*wxCYAN_BRUSH
);
192 dc
.SetPen(*wxRED_PEN
);
193 dc
.DrawRectangle(100, 100, 100, 50);
194 dc
.DrawRoundedRectangle(150, 150, 100, 50, 20);
196 dc
.DrawEllipse(250, 250, 100, 50);
197 dc
.DrawSpline(50, 200, 50, 100, 200, 10);
198 dc
.DrawLine(50, 230, 200, 230);
199 dc
.DrawText("This is a test string", 50, 230);
202 // This implements a tiny doodling program! Drag the mouse using
204 void MyCanvas::OnEvent(wxMouseEvent
& event
)
209 wxPoint
pt(event
.GetLogicalPosition(dc
));
211 if (xpos
> -1 && ypos
> -1 && event
.Dragging())
213 dc
.SetPen(*wxBLACK_PEN
);
214 dc
.DrawLine(xpos
, ypos
, pt
.x
, pt
.y
);
220 // Define the behaviour for the frame closing
221 // - must delete all frames except for the main one.
222 bool MyFrame::OnClose(void)
224 // Must delete children
225 wxNode
*node
= my_children
.First();
228 MyChild
*child
= (MyChild
*)node
->Data();
229 wxNode
*next
= node
->Next();
237 void MyFrame::OnSize(wxSizeEvent
& event
)
240 GetClientSize(&w
, &h
);
245 wxWindow
* tbar
= GetToolBar();
248 tbar
->GetSize(&tw
, &th
);
249 tbar
->SetSize(w
, th
);
253 textWindow
->SetSize(0, th
, 200, h
-th
);
254 GetClientWindow()->SetSize(200, th
, w
- 200, h
-th
);
257 // Note that MDI_NEW_WINDOW and MDI_ABOUT commands get passed
258 // to the parent window for processing, so no need to
259 // duplicate event handlers here.
261 BEGIN_EVENT_TABLE(MyChild
, wxMDIChildFrame
)
262 EVT_MENU(MDI_CHILD_QUIT
, MyChild::OnQuit
)
265 MyChild::MyChild(wxMDIParentFrame
*parent
, const wxString
& title
, const wxPoint
& pos
, const wxSize
& size
,
267 wxMDIChildFrame(parent
, -1, title
, pos
, size
, style
)
270 my_children
.Append(this);
273 MyChild::~MyChild(void)
275 my_children
.DeleteObject(this);
278 void MyChild::OnQuit(wxCommandEvent
& event
)
283 void MyChild::OnActivate(wxActivateEvent
& event
)
285 if (event
.GetActive() && canvas
)
289 bool MyChild::OnClose(void)
296 BEGIN_EVENT_TABLE(TestRibbon
, wxToolBar95
)
297 EVT_PAINT(TestRibbon::OnPaint
)
300 TestRibbon::TestRibbon(wxFrame
*frame
, int x
, int y
, int w
, int h
,
301 long style
, int direction
, int RowsOrColumns
):
302 wxToolBar95(frame
, -1, wxPoint(x
, y
), wxSize(w
, h
), style
, direction
, RowsOrColumns
)
304 wxBitmap
* bitmaps
[8];
306 bitmaps
[0] = new wxBitmap("icon1", wxBITMAP_TYPE_RESOURCE
);
307 bitmaps
[1] = new wxBitmap("icon2", wxBITMAP_TYPE_RESOURCE
);
308 bitmaps
[2] = new wxBitmap("icon3", wxBITMAP_TYPE_RESOURCE
);
309 bitmaps
[3] = new wxBitmap("icon4", wxBITMAP_TYPE_RESOURCE
);
310 bitmaps
[4] = new wxBitmap("icon5", wxBITMAP_TYPE_RESOURCE
);
311 bitmaps
[5] = new wxBitmap("icon6", wxBITMAP_TYPE_RESOURCE
);
312 bitmaps
[6] = new wxBitmap("icon7", wxBITMAP_TYPE_RESOURCE
);
313 bitmaps
[7] = new wxBitmap("icon8", wxBITMAP_TYPE_RESOURCE
);
323 AddTool(0, bitmaps
[0], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "New file");
324 currentX
+= width
+ 5;
325 AddTool(1, bitmaps
[1], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "Open file");
326 currentX
+= width
+ 5;
327 AddTool(2, bitmaps
[2], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "Save file");
328 currentX
+= width
+ 5;
330 AddTool(3, bitmaps
[3], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "Copy");
331 currentX
+= width
+ 5;
332 AddTool(4, bitmaps
[4], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "Cut");
333 currentX
+= width
+ 5;
334 AddTool(5, bitmaps
[5], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "Paste");
335 currentX
+= width
+ 5;
337 AddTool(6, bitmaps
[6], wxNullBitmap
, FALSE
, (float)currentX
, -1, NULL
, "Print");
338 currentX
+= width
+ 5;
340 AddTool(7, bitmaps
[7], wxNullBitmap
, TRUE
, currentX
, -1, NULL
, "Help");
345 for (i
= 0; i
< 8; i
++)
349 bool TestRibbon::OnLeftClick(int toolIndex
, bool toggled
)
352 sprintf(buf
, "Clicked on tool %d", toolIndex
);
353 frame
->SetStatusText(buf
);
357 void TestRibbon::OnMouseEnter(int toolIndex
)
362 sprintf(buf
, "This is tool number %d", toolIndex
);
363 frame
->SetStatusText(buf
);
365 else frame
->SetStatusText("");
368 void TestRibbon::OnPaint(wxPaintEvent
& event
)
370 wxToolBar95::OnPaint(event
);
376 dc
.SetPen(wxBLACK_PEN
);
377 dc
.SetBrush(wxTRANSPARENT_BRUSH
);
378 dc
.DrawLine(0, h
-1, w
, h
-1);