]> git.saurik.com Git - wxWidgets.git/blame - samples/xrc/myframe.cpp
Rebaked makefiles after htmllistbox and collapsable panel additions.
[wxWidgets.git] / samples / xrc / myframe.cpp
CommitLineData
af1337b0
JS
1//-----------------------------------------------------------------------------
2// Name: myframe.cpp
3// Purpose: XML resources sample: A derived frame, called MyFrame
4// Author: Robert O'Connor (rob@medicalmnemonics.com), Vaclav Slavik
5// RCS-ID: $Id$
6// Copyright: (c) Robert O'Connor and Vaclav Slavik
7// Licence: wxWindows licence
8//-----------------------------------------------------------------------------
9
af1337b0 10//-----------------------------------------------------------------------------
be5a51fb 11// Standard wxWidgets headers
af1337b0
JS
12//-----------------------------------------------------------------------------
13
14// For compilers that support precompilation, includes "wx/wx.h".
15#include "wx/wxprec.h"
16
17#ifdef __BORLANDC__
18 #pragma hdrstop
19#endif
20
21// For all others, include the necessary headers (this file is usually all you
be5a51fb 22// need because it includes almost all "standard" wxWidgets headers)
af1337b0
JS
23#ifndef WX_PRECOMP
24 #include "wx/wx.h"
25#endif
26
188cb2af
VZ
27#include "wx/sysopt.h"
28
af1337b0
JS
29//-----------------------------------------------------------------------------
30// Header of this .cpp file
31//-----------------------------------------------------------------------------
32
33#include "myframe.h"
34
35//-----------------------------------------------------------------------------
36// Remaining headers: Needed wx headers, then wx/contrib headers, then application headers
37//-----------------------------------------------------------------------------
38
39// Since setting an icon
40#include "wx/image.h"
41
42//-----------------------------------------------------------------------------
43
44#include "wx/xrc/xmlres.h" // XRC XML resouces
45
46//-----------------------------------------------------------------------------
47
48// Our derived dialog for the derived dialog example.
49#include "derivdlg.h"
50// Our custom class, for the custom class example.
51#include "custclas.h"
52// For functions to manipulate our wxTreeCtrl and wxListCtrl
53#include "wx/treectrl.h"
54#include "wx/listctrl.h"
55
56//-----------------------------------------------------------------------------
57// Regular resources (the non-XRC kind).
58//-----------------------------------------------------------------------------
59
60// The application icon
61// All non-MSW platforms use an xpm. MSW uses an .ico file
62#if defined(__WXGTK__) || defined(__WXX11__) || defined(__WXMOTIF__) || defined(__WXMAC__) || defined(__WXMGL__)
63 #include "rc/appicon.xpm"
64#endif
65
66//-----------------------------------------------------------------------------
67// Event table: connect the events to the handler functions to process them
68//-----------------------------------------------------------------------------
69
be5a51fb 70// The event tables connect the wxWidgets events with the functions (event
af1337b0
JS
71// handlers) which process them. It can be also done at run-time, but for the
72// simple menu events like this the static method is much simpler.
f80ea77b 73// The reason why the menuitems and tools are given the same name in the
af1337b0 74// XRC file, is that both a tool (a toolbar item) and a menuitem are designed
f80ea77b
WS
75// to fire the same kind of event (an EVT_MENU) and thus I give them the same
76// ID name to help new users emphasize this point which is often overlooked
be5a51fb 77// when starting out with wxWidgets.
af1337b0 78BEGIN_EVENT_TABLE(MyFrame, wxFrame)
60982dea
VZ
79 EVT_MENU(XRCID("unload_resource_menuitem"), MyFrame::OnUnloadResourceMenuCommand)
80 EVT_MENU(XRCID("reload_resource_menuitem"), MyFrame::OnReloadResourceMenuCommand)
81 EVT_MENU(XRCID("exit_tool_or_menuitem"), MyFrame::OnExitToolOrMenuCommand)
af1337b0 82 EVT_MENU(XRCID("exit_tool_or_menuitem"), MyFrame::OnExitToolOrMenuCommand)
f80ea77b
WS
83 EVT_MENU(XRCID("non_derived_dialog_tool_or_menuitem"), MyFrame::OnNonDerivedDialogToolOrMenuCommand)
84 EVT_MENU(XRCID("derived_tool_or_menuitem"), MyFrame::OnDerivedDialogToolOrMenuCommand)
85 EVT_MENU(XRCID("controls_tool_or_menuitem"), MyFrame::OnControlsToolOrMenuCommand)
86 EVT_MENU(XRCID("uncentered_tool_or_menuitem"), MyFrame::OnUncenteredToolOrMenuCommand)
87 EVT_MENU(XRCID("custom_class_tool_or_menuitem"), MyFrame::OnCustomClassToolOrMenuCommand)
af1337b0
JS
88 EVT_MENU(XRCID("platform_property_tool_or_menuitem"), MyFrame::OnPlatformPropertyToolOrMenuCommand)
89 EVT_MENU(XRCID("art_provider_tool_or_menuitem"), MyFrame::OnArtProviderToolOrMenuCommand)
90 EVT_MENU(XRCID("variable_expansion_tool_or_menuitem"), MyFrame::OnVariableExpansionToolOrMenuCommand)
91 EVT_MENU(XRCID("about_tool_or_menuitem"), MyFrame::OnAboutToolOrMenuCommand)
92END_EVENT_TABLE()
93
94//-----------------------------------------------------------------------------
95// Public methods
96//-----------------------------------------------------------------------------
97
98// Constructor
99MyFrame::MyFrame(wxWindow* parent)
100{
101 // Load up this frame from XRC. [Note, instead of making a class's
f80ea77b
WS
102 // constructor take a wxWindow* parent with a default value of NULL,
103 // we could have just had designed MyFrame class with an empty
af1337b0
JS
104 // constructor and then written here:
105 // wxXmlResource::Get()->LoadFrame(this, (wxWindow* )NULL, "main_frame");
f80ea77b
WS
106 // since this frame will always be the top window, and thus parentless.
107 // However, the current approach has source code that can be recycled
af1337b0 108 // for other frames that aren't the top level window.]
2b5f62a0 109 wxXmlResource::Get()->LoadFrame(this, parent, wxT("main_frame"));
af1337b0
JS
110
111 // Set the icon for the frame.
112 SetIcon(wxICON(appicon));
113
114 // Load the menubar from XRC and set this frame's menubar to it.
2b5f62a0 115 SetMenuBar(wxXmlResource::Get()->LoadMenuBar(wxT("main_menu")));
af1337b0
JS
116 // Load the toolbar from XRC and set this frame's toolbar to it.
117 // NOTE: For toolbars you currently should do it exactly like this.
118 // With toolbars, you currently can't create one, and set it later. It
119 // needs to be all in one step.
188cb2af 120 wxSystemOptions::SetOption ( wxT("msw.remap"), 0 );
2b5f62a0 121 SetToolBar(wxXmlResource::Get()->LoadToolBar(this, wxT("main_toolbar")));
f80ea77b 122
d96cdd4a 123#if wxUSE_STATUSBAR
43e8916f 124 // Give the frame an optional statusbar. The '1' just means one field.
f80ea77b 125 // A gripsizer will automatically get put on into the corner, if that
af1337b0
JS
126 // is the normal OS behaviour for frames on that platform. Helptext
127 // for menu items and toolbar tools will automatically get displayed
128 // here.
129 CreateStatusBar( 1 );
d96cdd4a 130#endif // wxUSE_STATUSBAR
af1337b0
JS
131}
132
133//-----------------------------------------------------------------------------
134// Private methods
135//-----------------------------------------------------------------------------
136
60982dea
VZ
137void MyFrame::OnUnloadResourceMenuCommand(wxCommandEvent& WXUNUSED(event))
138{
139 if ( wxXmlResource::Get()->Unload(wxT("rc/basicdlg.xrc")) )
140 wxLogMessage(_T("Basic dialog resource has now been unloaded, you ")
141 _T("won't be able to use it before loading it again"));
142 else
143 wxLogWarning(_T("Failed to unload basic dialog resource"));
144}
145
146void MyFrame::OnReloadResourceMenuCommand(wxCommandEvent& WXUNUSED(event))
147{
148 if ( wxXmlResource::Get()->Load(wxT("rc/basicdlg.xrc")) )
149 wxLogStatus(_T("Basic dialog resource has been loaded."));
150 else
151 wxLogError(_T("Failed to load basic dialog resource"));
152}
153
af1337b0
JS
154void MyFrame::OnExitToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
155{
f80ea77b
WS
156 // true is to force the frame to close.
157 Close(true);
af1337b0
JS
158}
159
160
161void MyFrame::OnNonDerivedDialogToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
162{
163 wxDialog dlg;
164 // "non_derived_dialog" is the name of the wxDialog XRC node that should
165 // be loaded.
60982dea
VZ
166 if ( wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("non_derived_dialog")) )
167 dlg.ShowModal();
af1337b0
JS
168}
169
170
f80ea77b 171void MyFrame::OnDerivedDialogToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
af1337b0
JS
172{
173 // Make an instance of our derived dialog, passing it "this" window
f80ea77b 174 // (the main frame) as the parent of the dialog. This allows the dialog
af1337b0
JS
175 // to be destructed automatically when the parent is destroyed.
176 PreferencesDialog preferencesDialog(this);
177 // Show the instance of the dialog, modally.
178 preferencesDialog.ShowModal();
179}
180
d956f3e7
VZ
181void MyFrame::OnAnimationCtrlPlay(wxCommandEvent& event)
182{
183#if wxUSE_ANIMATIONCTRL
184 // get the pointers we need
185 wxButton *btn = wxDynamicCast(event.GetEventObject(), wxButton);
186 if (!btn || !btn->GetParent()) return;
187
188 wxWindow *win = btn->GetParent();
189 wxAnimationCtrl *ctrl = XRCCTRL(*win, "controls_animation_ctrl", wxAnimationCtrl);
190 if (ctrl->IsPlaying())
191 {
192 ctrl->Stop();
193 btn->SetLabel(wxT("Play"));
194 }
195 else
196 {
197 ctrl->Play();
198 btn->SetLabel(wxT("Stop"));
199 }
200#endif
201}
af1337b0 202
f80ea77b 203void MyFrame::OnControlsToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
af1337b0
JS
204{
205 wxDialog dlg;
2b5f62a0 206 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("controls_dialog"));
af1337b0
JS
207
208#if wxUSE_LISTCTRL
209 // There is no data in the listctrl. This will add some columns
43e8916f 210 // and some data. You don't need to use any pointers
af1337b0
JS
211 // at all to manipulate the controls, just simply use the XRCCTL(...) macros.
212 // "controls_treectrl" is the name of this control in the XRC.
213 // (1) Insert a column, with the column header of "Name"
214 // (The '_' function around "Name" marks this string as one to translate).
f80ea77b 215 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertColumn( 0,
af1337b0
JS
216 _("Name"),
217 wxLIST_FORMAT_LEFT,
218 ( 200 )
219 );
220 // (2) Insert some items into the listctrl
221 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertItem(0,wxT("Todd Hope"));
222 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertItem(1,wxT("Kim Wynd"));
223 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertItem(2,wxT("Leon Li"));
224#endif
225
f80ea77b 226#if wxUSE_TREECTRL
af1337b0 227 // There is no data in the tree ctrl. These lines will add some.
f80ea77b
WS
228 // (1) Instead of having to write out
229 // XRCCTRL(dlg, "controls_treectrl", wxTreeCtrl)->SomeFunction()
af1337b0 230 // each time (which is also OK), this example code will shown how
f80ea77b 231 // to make a pointer to the XRC control, so we can use
af1337b0
JS
232 // treectrl->SomeFunction() as a short cut. This is useful if you
233 // will be referring to this control often in the code.
234 wxTreeCtrl* treectrl = XRCCTRL(dlg, "controls_treectrl", wxTreeCtrl);
235 // (2) Add a root node
236 treectrl->AddRoot(_("Godfather"));
237 // (3)Append some items to the root node.
238 treectrl->AppendItem(treectrl->GetRootItem(), _("Evil henchman 1"));
239 treectrl->AppendItem(treectrl->GetRootItem(), _("Evil henchman 2"));
f80ea77b 240 treectrl->AppendItem(treectrl->GetRootItem(), _("Evil accountant"));
af1337b0 241#endif
f80ea77b 242
d956f3e7
VZ
243#if wxUSE_ANIMATIONCTRL
244 // dynamically connect our event handler for the "clicked" event of the "play" button
245 // in the animation ctrl page of our dialog
246 dlg.Connect(XRCID("controls_animation_button_play"), wxEVT_COMMAND_BUTTON_CLICKED,
247 wxCommandEventHandler(MyFrame::OnAnimationCtrlPlay));
248#endif
249
af1337b0
JS
250 // All done. Show the dialog.
251 dlg.ShowModal();
252}
253
254
f80ea77b 255void MyFrame::OnUncenteredToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
af1337b0
JS
256{
257 wxDialog dlg;
2b5f62a0 258 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("uncentered_dialog"));
af1337b0
JS
259 dlg.ShowModal();
260}
261
262
263void MyFrame::OnCustomClassToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
264{
265 wxDialog dlg;
2b5f62a0 266 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("custom_class_dialog"));
f80ea77b
WS
267
268 // Make an instance of our new custom class.
269 MyResizableListCtrl* a_myResizableListCtrl = new MyResizableListCtrl(&dlg,
270 wxID_ANY,
af1337b0
JS
271 wxDefaultPosition,
272 wxDefaultSize,
273 wxLC_REPORT,
274 wxDefaultValidator);
f80ea77b
WS
275
276 // "custom_control_placeholder" is the name of the "unknown" tag in the
af1337b0 277 // custctrl.xrc XRC file.
2b5f62a0 278 wxXmlResource::Get()->AttachUnknownControl(wxT("custom_control_placeholder"),
af1337b0
JS
279 a_myResizableListCtrl);
280 dlg.ShowModal();
281}
282
283
284void MyFrame::OnPlatformPropertyToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
285{
286 wxDialog dlg;
2b5f62a0 287 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("platform_property_dialog"));
af1337b0
JS
288 dlg.ShowModal();
289}
290
291
292void MyFrame::OnArtProviderToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
293{
294 wxDialog dlg;
2b5f62a0 295 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("art_provider_dialog"));
af1337b0
JS
296 dlg.ShowModal();
297}
298
299
300void MyFrame::OnVariableExpansionToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
301{
302 wxDialog dlg;
2b5f62a0 303 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("variable_expansion_dialog"));
af1337b0
JS
304 dlg.ShowModal();
305}
306
307
308void MyFrame::OnAboutToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
309{
310 wxString msg;
311 msg.Printf( _T("This is the about dialog of XML resources demo.\n")
312 _T("Welcome to %s"), wxVERSION_STRING);
313
2b5f62a0 314 wxMessageBox(msg, _("About XML resources demo"), wxOK | wxICON_INFORMATION, this);
af1337b0 315}