]> git.saurik.com Git - wxWidgets.git/blob - contrib/samples/deprecated/proplist/proplist.cpp
expat must be added to the template, not generated wxWindows.dsp
[wxWidgets.git] / contrib / samples / deprecated / proplist / proplist.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: proplist.cpp
3 // Purpose: Property sheet test implementation
4 // Author: Julian Smart
5 // Modified by:
6 // Created: 04/01/98
7 // RCS-ID: $Id$
8 // Copyright: (c) Julian Smart
9 // Licence: wxWindows license
10 /////////////////////////////////////////////////////////////////////////////
11
12 #ifdef __GNUG__
13 #pragma implementation "proplist_sample.h"
14 #endif
15
16 // For compilers that support precompilation, includes "wx/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 #include "wx/deprecated/setup.h"
28
29 #if !wxUSE_PROPSHEET
30 #error Please set wxUSE_PROPSHEET to 1 in contrib/include/wx/deprecated/setup.h and recompile.
31 #endif
32
33 #include "proplist.h"
34
35 IMPLEMENT_APP(MyApp)
36
37 wxPropertyValidatorRegistry myListValidatorRegistry;
38 wxPropertyValidatorRegistry myFormValidatorRegistry;
39
40 MyApp::MyApp(void)
41 {
42 m_childWindow = NULL;
43 m_mainFrame = NULL;
44 }
45
46 bool MyApp::OnInit(void)
47 {
48 RegisterValidators();
49
50 // Create the main frame window
51 m_mainFrame = new MyFrame(NULL, _T("wxPropertySheet Demo"), wxPoint(0, 0), wxSize(300, 400), wxDEFAULT_FRAME_STYLE);
52
53 // Make a menubar
54 wxMenu *file_menu = new wxMenu;
55 file_menu->Append(PROPERTY_TEST_DIALOG_LIST, _T("Test property list &dialog..."));
56 file_menu->Append(PROPERTY_TEST_FRAME_LIST, _T("Test property list &frame..."));
57 file_menu->AppendSeparator();
58 file_menu->Append(PROPERTY_TEST_DIALOG_FORM, _T("Test property form d&ialog..."));
59 file_menu->Append(PROPERTY_TEST_FRAME_FORM, _T("Test property form f&rame..."));
60 file_menu->AppendSeparator();
61 file_menu->Append(PROPERTY_QUIT, _T("E&xit"));
62
63 wxMenu *help_menu = new wxMenu;
64 help_menu->Append(PROPERTY_ABOUT, _T("&About"));
65
66 wxMenuBar *menu_bar = new wxMenuBar;
67
68 menu_bar->Append(file_menu, _T("&File"));
69 menu_bar->Append(help_menu, _T("&Help"));
70
71 // Associate the menu bar with the frame
72 m_mainFrame->SetMenuBar(menu_bar);
73
74 m_mainFrame->Centre(wxBOTH);
75 m_mainFrame->Show(TRUE);
76
77 SetTopWindow(m_mainFrame);
78
79 return TRUE;
80 }
81
82 BEGIN_EVENT_TABLE(MyFrame, wxFrame)
83 EVT_CLOSE(MyFrame::OnCloseWindow)
84 EVT_MENU(PROPERTY_QUIT, MyFrame::OnQuit)
85 EVT_MENU(PROPERTY_ABOUT, MyFrame::OnAbout)
86 EVT_MENU(PROPERTY_TEST_DIALOG_LIST, MyFrame::OnDialogList)
87 EVT_MENU(PROPERTY_TEST_FRAME_LIST, MyFrame::OnFrameList)
88 EVT_MENU(PROPERTY_TEST_DIALOG_FORM, MyFrame::OnDialogForm)
89 EVT_MENU(PROPERTY_TEST_FRAME_FORM, MyFrame::OnFrameForm)
90 END_EVENT_TABLE()
91
92 // Define my frame constructor
93 MyFrame::MyFrame(wxFrame *frame, const wxString& title, const wxPoint& pos, const wxSize& size, long type):
94 wxFrame(frame, -1, title, pos, size, type)
95 {
96 }
97
98 // Define the behaviour for the frame closing
99 // - must delete all frames except for the main one.
100 void MyFrame::OnCloseWindow(wxCloseEvent& event)
101 {
102 if (wxGetApp().m_childWindow)
103 {
104 wxGetApp().m_childWindow->Close(TRUE);
105 }
106
107 Destroy();
108 }
109
110 void MyFrame::OnQuit(wxCommandEvent& event)
111 {
112 Close(TRUE);
113 }
114
115 void MyFrame::OnDialogList(wxCommandEvent& event)
116 {
117 wxGetApp().PropertyListTest(TRUE);
118 }
119
120 void MyFrame::OnFrameList(wxCommandEvent& event)
121 {
122 wxGetApp().PropertyListTest(FALSE);
123 }
124
125 void MyFrame::OnDialogForm(wxCommandEvent& event)
126 {
127 wxGetApp().PropertyFormTest(TRUE);
128 }
129
130 void MyFrame::OnFrameForm(wxCommandEvent& event)
131 {
132 wxGetApp().PropertyFormTest(FALSE);
133 }
134
135 void MyFrame::OnAbout(wxCommandEvent& event)
136 {
137 (void)wxMessageBox(_T("Property Classes Demo\nAuthor: Julian Smart"), _T("About Property Classes Test"));
138 }
139
140 void MyApp::RegisterValidators(void)
141 {
142 myListValidatorRegistry.RegisterValidator((wxString)_T("real"), new wxRealListValidator);
143 myListValidatorRegistry.RegisterValidator((wxString)_T("string"), new wxStringListValidator);
144 myListValidatorRegistry.RegisterValidator((wxString)_T("integer"), new wxIntegerListValidator);
145 myListValidatorRegistry.RegisterValidator((wxString)_T("bool"), new wxBoolListValidator);
146 myListValidatorRegistry.RegisterValidator((wxString)_T("stringlist"), new wxListOfStringsListValidator);
147
148 myFormValidatorRegistry.RegisterValidator((wxString)_T("real"), new wxRealFormValidator);
149 myFormValidatorRegistry.RegisterValidator((wxString)_T("string"), new wxStringFormValidator);
150 myFormValidatorRegistry.RegisterValidator((wxString)_T("integer"), new wxIntegerFormValidator);
151 myFormValidatorRegistry.RegisterValidator((wxString)_T("bool"), new wxBoolFormValidator);
152 }
153
154 void MyApp::PropertyListTest(bool useDialog)
155 {
156 if (m_childWindow)
157 return;
158
159 wxPropertySheet *sheet = new wxPropertySheet;
160
161 sheet->AddProperty(new wxProperty(_T("fred"), 1.0, _T("real")));
162 sheet->AddProperty(new wxProperty(_T("tough choice"), (bool)TRUE, _T("bool")));
163 sheet->AddProperty(new wxProperty(_T("ian"), (long)45, _T("integer"), new wxIntegerListValidator(-50, 50)));
164 sheet->AddProperty(new wxProperty(_T("bill"), 25.0, _T("real"), new wxRealListValidator(0.0, 100.0)));
165 sheet->AddProperty(new wxProperty(_T("julian"), _T("one"), _T("string")));
166 sheet->AddProperty(new wxProperty(_T("bitmap"), _T("none"), _T("string"), new wxFilenameListValidator(_T("Select a bitmap file"), _T("*.bmp"))));
167 wxStringList *strings = new wxStringList(wxT("one"), wxT("two"), wxT("three"), NULL);
168 sheet->AddProperty(new wxProperty(_T("constrained"), _T("one"), _T("string"), new wxStringListValidator(strings)));
169
170 wxStringList *strings2 = new wxStringList(wxT("earth"), wxT("fire"), wxT("wind"), wxT("water"), NULL);
171 sheet->AddProperty(new wxProperty(_T("string list"), strings2, _T("stringlist")));
172
173 wxPropertyListView *view = new wxPropertyListView
174 (
175 NULL,
176 wxPROP_BUTTON_OK | wxPROP_BUTTON_CANCEL | wxPROP_BUTTON_CHECK_CROSS
177 |wxPROP_DYNAMIC_VALUE_FIELD|wxPROP_PULLDOWN|wxPROP_SHOWVALUES
178 );
179
180 wxDialog *propDialog = NULL;
181 wxPropertyListFrame *propFrame = NULL;
182 if (useDialog)
183 {
184 propDialog = new PropListDialog(view, NULL, _T("Property Sheet Test"),
185 wxPoint(-1, -1), wxSize(400, 500), wxDEFAULT_DIALOG_STYLE|wxDIALOG_MODELESS);
186 m_childWindow = propDialog;
187 }
188 else
189 {
190 propFrame = new PropListFrame(view, NULL, _T("Property Sheet Test"), wxPoint(-1, -1), wxSize(400, 500));
191 m_childWindow = propFrame;
192 }
193
194 view->AddRegistry(&myListValidatorRegistry);
195
196 if (useDialog)
197 {
198 view->ShowView(sheet, (wxPanel *)propDialog);
199 propDialog->Centre(wxBOTH);
200 propDialog->Show(TRUE);
201 }
202 else
203 {
204 propFrame->Initialize();
205 view->ShowView(sheet, propFrame->GetPropertyPanel());
206
207 propFrame->Centre(wxBOTH);
208 propFrame->Show(TRUE);
209 }
210 }
211
212 void MyApp::PropertyFormTest(bool useDialog)
213 {
214 if (m_childWindow)
215 return;
216
217 wxPropertySheet *sheet = new wxPropertySheet;
218
219 sheet->AddProperty(new wxProperty(_T("fred"), 25.0, _T("real"), new wxRealFormValidator(0.0, 100.0)));
220 sheet->AddProperty(new wxProperty(_T("tough choice"), (bool)TRUE, _T("bool")));
221 sheet->AddProperty(new wxProperty(_T("ian"), (long)45, _T("integer"), new wxIntegerFormValidator(-50, 50)));
222 sheet->AddProperty(new wxProperty(_T("julian"), _T("one"), _T("string")));
223 wxStringList *strings = new wxStringList(wxT("one"), wxT("two"), wxT("three"), NULL);
224 sheet->AddProperty(new wxProperty(_T("constrained"), _T("one"), _T("string"), new wxStringFormValidator(strings)));
225
226 wxPropertyFormView *view = new wxPropertyFormView(NULL);
227
228 wxDialog *propDialog = NULL;
229 wxPropertyFormFrame *propFrame = NULL;
230
231 if (useDialog)
232 {
233 propDialog = new PropFormDialog(view, NULL, _T("Property Form Test"),
234 wxPoint(-1, -1), wxSize(380, 250), wxDEFAULT_DIALOG_STYLE|wxDIALOG_MODAL);
235 m_childWindow = propDialog;
236 }
237 else
238 {
239 propFrame = new PropFormFrame(view, NULL, _T("Property Form Test"),
240 wxPoint(-1, -1), wxSize(380, 250));
241 propFrame->Initialize();
242 m_childWindow = propFrame;
243 }
244
245 // BCC32 does not like ?:
246 wxWindow *panel ;
247 if ( propDialog )
248 {
249 panel = propDialog;
250 }
251 else
252 {
253 panel = propFrame->GetPropertyPanel() ;
254 }
255
256 wxLayoutConstraints* c;
257
258 #if 0
259 if (!propDialog)
260 {
261 c = new wxLayoutConstraints;
262 c->left.SameAs(m_childWindow, wxLeft, 4);
263 c->right.SameAs(m_childWindow, wxRight, 4);
264 c->top.SameAs(m_childWindow, wxTop, 4);
265 c->bottom.SameAs(m_childWindow, wxBottom, 40);
266
267 panel->SetConstraints(c);
268 }
269 #endif
270
271 // Add items to the panel
272 wxButton *okButton = new wxButton(panel, wxID_OK, _T("OK"), wxPoint(-1, -1),
273 wxSize(80, 26), 0, wxDefaultValidator, _T("ok"));
274 wxButton *cancelButton = new wxButton(panel, wxID_CANCEL, _T("Cancel"), wxPoint(-1, -1),
275 wxSize(80, 26), 0, wxDefaultValidator, _T("cancel"));
276 wxButton *updateButton = new wxButton(panel, wxID_PROP_UPDATE, _T("Update"), wxPoint(-1, -1),
277 wxSize(80, 26), 0, wxDefaultValidator, _T("update"));
278 wxButton *revertButton = new wxButton(panel, wxID_PROP_REVERT, _T("Revert"), wxPoint(-1, -1),
279 wxSize(80, 26), 0, wxDefaultValidator, _T("revert"));
280
281 c = new wxLayoutConstraints;
282 c->right.SameAs(panel, wxRight, 4);
283 c->bottom.SameAs(panel, wxBottom, 4);
284 c->height.AsIs();
285 c->width.AsIs();
286 revertButton->SetConstraints(c);
287
288 c = new wxLayoutConstraints;
289 c->right.SameAs(revertButton, wxLeft, 4);
290 c->bottom.SameAs(panel, wxBottom, 4);
291 c->height.AsIs();
292 c->width.AsIs();
293 updateButton->SetConstraints(c);
294
295 c = new wxLayoutConstraints;
296 c->right.SameAs(updateButton, wxLeft, 4);
297 c->bottom.SameAs(panel, wxBottom, 4);
298 c->height.AsIs();
299 c->width.AsIs();
300 cancelButton->SetConstraints(c);
301
302 c = new wxLayoutConstraints;
303 c->right.SameAs(cancelButton, wxLeft, 4);
304 c->bottom.SameAs(panel, wxBottom, 4);
305 c->height.AsIs();
306 c->width.AsIs();
307 okButton->SetConstraints(c);
308
309 // The name of this text item matches the "fred" property
310 wxTextCtrl *text = new wxTextCtrl(panel, -1, _T("Fred"), wxPoint(-1, -1), wxSize(
311 200, -1), 0, wxDefaultValidator, _T("fred"));
312
313 c = new wxLayoutConstraints;
314 c->left.SameAs(panel, wxLeft, 4);
315 c->top.SameAs(panel, wxTop, 4);
316 c->height.AsIs();
317 c->width.AsIs();
318 text->SetConstraints(c);
319
320 wxCheckBox *checkBox = new wxCheckBox(panel, -1, _T("Yes or no"), wxPoint(-1, -1),
321 wxSize(-1, -1), 0, wxDefaultValidator, _T("tough choice"));
322
323 c = new wxLayoutConstraints;
324 c->left.SameAs(text, wxRight, 20);
325 c->top.SameAs(panel, wxTop, 4);
326 c->height.AsIs();
327 c->width.AsIs();
328 checkBox->SetConstraints(c);
329
330 wxSlider *slider = new wxSlider(panel, -1, -50, 50, 150, wxPoint(-1, -1),
331 wxSize(200,10), 0, wxDefaultValidator, _T("ian"));
332
333 c = new wxLayoutConstraints;
334 c->left.SameAs(panel, wxLeft, 4);
335 c->top.SameAs(text, wxBottom, 10);
336 c->height.AsIs();
337 c->width.AsIs();
338 slider->SetConstraints(c);
339
340 wxListBox *listBox = new wxListBox(panel, -1, wxPoint(-1, -1),
341 wxSize(200, 100), 0, NULL, 0, wxDefaultValidator, _T("constrained"));
342
343 c = new wxLayoutConstraints;
344 c->left.SameAs(panel, wxLeft, 4);
345 c->top.SameAs(slider, wxBottom, 10);
346 c->height.AsIs();
347 c->width.AsIs();
348 listBox->SetConstraints(c);
349
350 view->AddRegistry(&myFormValidatorRegistry);
351
352 panel->SetAutoLayout(TRUE);
353
354 view->ShowView(sheet, panel);
355 view->AssociateNames();
356 view->TransferToDialog();
357
358 if (useDialog) {
359 propDialog->Layout();
360 propDialog->Centre(wxBOTH);
361 propDialog->Show(TRUE);
362 }
363 else
364 {
365 // panel->Layout();
366 propFrame->Centre(wxBOTH);
367 propFrame->Show(TRUE);
368 }
369 }
370
371 BEGIN_EVENT_TABLE(PropListFrame, wxPropertyListFrame)
372 EVT_CLOSE(PropListFrame::OnCloseWindow)
373 END_EVENT_TABLE()
374
375 void PropListFrame::OnCloseWindow(wxCloseEvent& event)
376 {
377 wxGetApp().m_childWindow = NULL;
378
379 wxPropertyListFrame::OnCloseWindow(event);
380 }
381
382 BEGIN_EVENT_TABLE(PropListDialog, wxPropertyListDialog)
383 EVT_CLOSE(PropListDialog::OnCloseWindow)
384 END_EVENT_TABLE()
385
386 void PropListDialog::OnCloseWindow(wxCloseEvent& event)
387 {
388 wxGetApp().m_childWindow = NULL;
389
390 wxPropertyListDialog::OnCloseWindow(event);
391 }
392
393 BEGIN_EVENT_TABLE(PropFormFrame, wxPropertyFormFrame)
394 EVT_CLOSE(PropFormFrame::OnCloseWindow)
395 EVT_SIZE(PropFormFrame::OnSize)
396 END_EVENT_TABLE()
397
398 void PropFormFrame::OnCloseWindow(wxCloseEvent& event)
399 {
400 wxGetApp().m_childWindow = NULL;
401
402 wxPropertyFormFrame::OnCloseWindow(event);
403 }
404
405 void PropFormFrame::OnSize(wxSizeEvent& event)
406 {
407 wxPropertyFormFrame::OnSize(event);
408 GetPropertyPanel()->Layout();
409 }
410
411 BEGIN_EVENT_TABLE(PropFormDialog, wxPropertyFormDialog)
412 EVT_CLOSE(PropFormDialog::OnCloseWindow)
413 END_EVENT_TABLE()
414
415 void PropFormDialog::OnCloseWindow(wxCloseEvent& event)
416 {
417 wxGetApp().m_childWindow = NULL;
418
419 wxPropertyFormDialog::OnCloseWindow(event);
420 }
421