]> git.saurik.com Git - wxWidgets.git/blob - samples/xrc/myframe.cpp
add unit test for wxTextCtrl::SetSelection()
[wxWidgets.git] / samples / xrc / myframe.cpp
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
10 //-----------------------------------------------------------------------------
11 // Standard wxWidgets headers
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
22 // need because it includes almost all "standard" wxWidgets headers)
23 #ifndef WX_PRECOMP
24 #include "wx/wx.h"
25 #endif
26
27 #include "wx/sysopt.h"
28
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
70 // The event tables connect the wxWidgets events with the functions (event
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.
73 // The reason why the menuitems and tools are given the same name in the
74 // XRC file, is that both a tool (a toolbar item) and a menuitem are designed
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
77 // when starting out with wxWidgets.
78 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
79 EVT_MENU(XRCID("unload_resource_menuitem"), MyFrame::OnUnloadResourceMenuCommand)
80 EVT_MENU(XRCID("reload_resource_menuitem"), MyFrame::OnReloadResourceMenuCommand)
81 EVT_MENU(wxID_EXIT, MyFrame::OnExitToolOrMenuCommand)
82 EVT_MENU(XRCID("non_derived_dialog_tool_or_menuitem"), MyFrame::OnNonDerivedDialogToolOrMenuCommand)
83 EVT_MENU(XRCID("derived_tool_or_menuitem"), MyFrame::OnDerivedDialogToolOrMenuCommand)
84 EVT_MENU(XRCID("controls_tool_or_menuitem"), MyFrame::OnControlsToolOrMenuCommand)
85 EVT_MENU(XRCID("uncentered_tool_or_menuitem"), MyFrame::OnUncenteredToolOrMenuCommand)
86 EVT_MENU(XRCID("custom_class_tool_or_menuitem"), MyFrame::OnCustomClassToolOrMenuCommand)
87 EVT_MENU(XRCID("platform_property_tool_or_menuitem"), MyFrame::OnPlatformPropertyToolOrMenuCommand)
88 EVT_MENU(XRCID("art_provider_tool_or_menuitem"), MyFrame::OnArtProviderToolOrMenuCommand)
89 EVT_MENU(XRCID("variable_expansion_tool_or_menuitem"), MyFrame::OnVariableExpansionToolOrMenuCommand)
90 EVT_MENU(wxID_ABOUT, MyFrame::OnAboutToolOrMenuCommand)
91 END_EVENT_TABLE()
92
93 //-----------------------------------------------------------------------------
94 // Public methods
95 //-----------------------------------------------------------------------------
96
97 // Constructor
98 MyFrame::MyFrame(wxWindow* parent)
99 {
100 // Load up this frame from XRC. [Note, instead of making a class's
101 // constructor take a wxWindow* parent with a default value of NULL,
102 // we could have just had designed MyFrame class with an empty
103 // constructor and then written here:
104 // wxXmlResource::Get()->LoadFrame(this, (wxWindow* )NULL, "main_frame");
105 // since this frame will always be the top window, and thus parentless.
106 // However, the current approach has source code that can be recycled
107 // for other frames that aren't the top level window.]
108 wxXmlResource::Get()->LoadFrame(this, parent, wxT("main_frame"));
109
110 // Set the icon for the frame.
111 SetIcon(wxICON(appicon));
112
113 // Load the menubar from XRC and set this frame's menubar to it.
114 SetMenuBar(wxXmlResource::Get()->LoadMenuBar(wxT("main_menu")));
115 // Load the toolbar from XRC and set this frame's toolbar to it.
116 // NOTE: For toolbars you currently should do it exactly like this.
117 // With toolbars, you currently can't create one, and set it later. It
118 // needs to be all in one step.
119 wxSystemOptions::SetOption ( wxT("msw.remap"), 0 );
120 SetToolBar(wxXmlResource::Get()->LoadToolBar(this, wxT("main_toolbar")));
121
122 #if wxUSE_STATUSBAR
123 // Give the frame an optional statusbar. The '1' just means one field.
124 // A gripsizer will automatically get put on into the corner, if that
125 // is the normal OS behaviour for frames on that platform. Helptext
126 // for menu items and toolbar tools will automatically get displayed
127 // here.
128 CreateStatusBar( 1 );
129 #endif // wxUSE_STATUSBAR
130 }
131
132 //-----------------------------------------------------------------------------
133 // Private methods
134 //-----------------------------------------------------------------------------
135
136 void MyFrame::OnUnloadResourceMenuCommand(wxCommandEvent& WXUNUSED(event))
137 {
138 if ( wxXmlResource::Get()->Unload(wxT("rc/basicdlg.xrc")) )
139 wxLogMessage(_T("Basic dialog resource has now been unloaded, you ")
140 _T("won't be able to use it before loading it again"));
141 else
142 wxLogWarning(_T("Failed to unload basic dialog resource"));
143 }
144
145 void MyFrame::OnReloadResourceMenuCommand(wxCommandEvent& WXUNUSED(event))
146 {
147 if ( wxXmlResource::Get()->Load(wxT("rc/basicdlg.xrc")) )
148 wxLogStatus(_T("Basic dialog resource has been loaded."));
149 else
150 wxLogError(_T("Failed to load basic dialog resource"));
151 }
152
153 void MyFrame::OnExitToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
154 {
155 // true is to force the frame to close.
156 Close(true);
157 }
158
159
160 void MyFrame::OnNonDerivedDialogToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
161 {
162 wxDialog dlg;
163 // "non_derived_dialog" is the name of the wxDialog XRC node that should
164 // be loaded.
165 if ( wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("non_derived_dialog")) )
166 dlg.ShowModal();
167 }
168
169
170 void MyFrame::OnDerivedDialogToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
171 {
172 // Make an instance of our derived dialog, passing it "this" window
173 // (the main frame) as the parent of the dialog. This allows the dialog
174 // to be destructed automatically when the parent is destroyed.
175 PreferencesDialog preferencesDialog(this);
176 // Show the instance of the dialog, modally.
177 preferencesDialog.ShowModal();
178 }
179
180 void MyFrame::OnAnimationCtrlPlay(wxCommandEvent& event)
181 {
182 #if wxUSE_ANIMATIONCTRL
183 // get the pointers we need
184 wxButton *btn = wxDynamicCast(event.GetEventObject(), wxButton);
185 if (!btn || !btn->GetParent()) return;
186
187 wxWindow *win = btn->GetParent();
188 wxAnimationCtrl *ctrl = XRCCTRL(*win, "controls_animation_ctrl", wxAnimationCtrl);
189 if (ctrl->IsPlaying())
190 {
191 ctrl->Stop();
192 btn->SetLabel(wxT("Play"));
193 }
194 else
195 {
196 if (ctrl->Play())
197 btn->SetLabel(wxT("Stop"));
198 else
199 wxLogError(wxT("Cannot play the animation..."));
200 }
201 #endif
202 }
203
204 void MyFrame::OnControlsToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
205 {
206 wxDialog dlg;
207 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("controls_dialog"));
208
209 #if wxUSE_LISTCTRL
210 // There is no data in the listctrl. This will add some columns
211 // and some data. You don't need to use any pointers
212 // at all to manipulate the controls, just simply use the XRCCTL(...) macros.
213 // "controls_treectrl" is the name of this control in the XRC.
214 // (1) Insert a column, with the column header of "Name"
215 // (The '_' function around "Name" marks this string as one to translate).
216 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertColumn( 0,
217 _("Name"),
218 wxLIST_FORMAT_LEFT,
219 ( 200 )
220 );
221 // (2) Insert some items into the listctrl
222 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertItem(0,wxT("Todd Hope"));
223 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertItem(1,wxT("Kim Wynd"));
224 XRCCTRL(dlg, "controls_listctrl", wxListCtrl)->InsertItem(2,wxT("Leon Li"));
225 #endif
226
227 #if wxUSE_TREECTRL
228 // There is no data in the tree ctrl. These lines will add some.
229 // (1) Instead of having to write out
230 // XRCCTRL(dlg, "controls_treectrl", wxTreeCtrl)->SomeFunction()
231 // each time (which is also OK), this example code will shown how
232 // to make a pointer to the XRC control, so we can use
233 // treectrl->SomeFunction() as a short cut. This is useful if you
234 // will be referring to this control often in the code.
235 wxTreeCtrl* treectrl = XRCCTRL(dlg, "controls_treectrl", wxTreeCtrl);
236 // (2) Add a root node
237 treectrl->AddRoot(_("Godfather"));
238 // (3)Append some items to the root node.
239 treectrl->AppendItem(treectrl->GetRootItem(), _("Evil henchman 1"));
240 treectrl->AppendItem(treectrl->GetRootItem(), _("Evil henchman 2"));
241 treectrl->AppendItem(treectrl->GetRootItem(), _("Evil accountant"));
242 #endif
243
244 #if wxUSE_ANIMATIONCTRL
245 // dynamically connect our event handler for the "clicked" event of the "play" button
246 // in the animation ctrl page of our dialog
247 dlg.Connect(XRCID("controls_animation_button_play"), wxEVT_COMMAND_BUTTON_CLICKED,
248 wxCommandEventHandler(MyFrame::OnAnimationCtrlPlay));
249 #endif
250
251 // All done. Show the dialog.
252 dlg.ShowModal();
253 }
254
255
256 void MyFrame::OnUncenteredToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
257 {
258 wxDialog dlg;
259 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("uncentered_dialog"));
260 dlg.ShowModal();
261 }
262
263
264 void MyFrame::OnCustomClassToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
265 {
266 wxDialog dlg;
267 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("custom_class_dialog"));
268
269 // Make an instance of our new custom class.
270 MyResizableListCtrl* a_myResizableListCtrl = new MyResizableListCtrl(&dlg,
271 wxID_ANY,
272 wxDefaultPosition,
273 wxDefaultSize,
274 wxLC_REPORT,
275 wxDefaultValidator);
276
277 // "custom_control_placeholder" is the name of the "unknown" tag in the
278 // custctrl.xrc XRC file.
279 wxXmlResource::Get()->AttachUnknownControl(wxT("custom_control_placeholder"),
280 a_myResizableListCtrl);
281 dlg.ShowModal();
282 }
283
284
285 void MyFrame::OnPlatformPropertyToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
286 {
287 wxDialog dlg;
288 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("platform_property_dialog"));
289 dlg.ShowModal();
290 }
291
292
293 void MyFrame::OnArtProviderToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
294 {
295 wxDialog dlg;
296 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("art_provider_dialog"));
297 dlg.ShowModal();
298 }
299
300
301 void MyFrame::OnVariableExpansionToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
302 {
303 wxDialog dlg;
304 wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("variable_expansion_dialog"));
305 dlg.ShowModal();
306 }
307
308
309 void MyFrame::OnAboutToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
310 {
311 wxString msg;
312 msg.Printf( _T("This is the about dialog of XML resources demo.\n")
313 _T("Welcome to %s"), wxVERSION_STRING);
314
315 wxMessageBox(msg, _("About XML resources demo"), wxOK | wxICON_INFORMATION, this);
316 }