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: myframe.cpp 43298 2006-11-11 01:15:42Z VZ $
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.
78BEGIN_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)
91END_EVENT_TABLE()
92
93//-----------------------------------------------------------------------------
94// Public methods
95//-----------------------------------------------------------------------------
96
97// Constructor
98MyFrame::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
136void 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
145void 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
153void MyFrame::OnExitToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
154{
155    // true is to force the frame to close.
156    Close(true);
157}
158
159
160void 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
170void 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
180void 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
204void 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
256void MyFrame::OnUncenteredToolOrMenuCommand(wxCommandEvent& WXUNUSED(event))
257{
258    wxDialog dlg;
259    wxXmlResource::Get()->LoadDialog(&dlg, this, wxT("uncentered_dialog"));
260    dlg.ShowModal();
261}
262
263
264void 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
285void 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
293void 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
301void 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
309void 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}
317