[wxWidgets.git] / contrib / samples / deprecated / proplist / proplist.cpp

/////////////////////////////////////////////////////////////////////////////
// Name:        proplist.cpp
// Purpose:     Property sheet test implementation
// Author:      Julian Smart
// Modified by:
// Created:     04/01/98
// RCS-ID:      $Id$
// Copyright:   (c) Julian Smart
// Licence:     wxWindows license
/////////////////////////////////////////////////////////////////////////////

#ifdef __GNUG__
#pragma implementation "proplist_sample.h"
#endif

// For compilers that support precompilation, includes "wx/wx.h".
#include "wx/wxprec.h"

#ifdef __BORLANDC__
#pragma hdrstop
#endif

#ifndef WX_PRECOMP
#include "wx/wx.h"
#endif

#include "wx/deprecated/setup.h"

#if !wxUSE_PROPSHEET
#error Please set wxUSE_PROPSHEET to 1 in contrib/include/wx/deprecated/setup.h and recompile.
#endif

#include "proplist.h"

IMPLEMENT_APP(MyApp)

wxPropertyValidatorRegistry myListValidatorRegistry;
wxPropertyValidatorRegistry myFormValidatorRegistry;

MyApp::MyApp(void)
{
    m_childWindow = NULL;
    m_mainFrame = NULL;
}

bool MyApp::OnInit(void)
{
  RegisterValidators();

  // Create the main frame window
  m_mainFrame = new MyFrame(NULL, _T("wxPropertySheet Demo"), wxPoint(0, 0), wxSize(300, 400), wxDEFAULT_FRAME_STYLE);

  // Make a menubar
  wxMenu *file_menu = new wxMenu;
  file_menu->Append(PROPERTY_TEST_DIALOG_LIST, _T("Test property list &dialog..."));
  file_menu->Append(PROPERTY_TEST_FRAME_LIST, _T("Test property list &frame..."));
  file_menu->AppendSeparator();
  file_menu->Append(PROPERTY_TEST_DIALOG_FORM, _T("Test property form d&ialog..."));
  file_menu->Append(PROPERTY_TEST_FRAME_FORM, _T("Test property form f&rame..."));
  file_menu->AppendSeparator();
  file_menu->Append(PROPERTY_QUIT, _T("E&xit"));

  wxMenu *help_menu = new wxMenu;
  help_menu->Append(PROPERTY_ABOUT, _T("&About"));

  wxMenuBar *menu_bar = new wxMenuBar;

  menu_bar->Append(file_menu, _T("&File"));
  menu_bar->Append(help_menu, _T("&Help"));

  // Associate the menu bar with the frame
  m_mainFrame->SetMenuBar(menu_bar);

  m_mainFrame->Centre(wxBOTH);
  m_mainFrame->Show(TRUE);

  SetTopWindow(m_mainFrame);
    
  return TRUE;
}

BEGIN_EVENT_TABLE(MyFrame, wxFrame)
    EVT_CLOSE(MyFrame::OnCloseWindow)
    EVT_MENU(PROPERTY_QUIT, MyFrame::OnQuit)
    EVT_MENU(PROPERTY_ABOUT, MyFrame::OnAbout)
    EVT_MENU(PROPERTY_TEST_DIALOG_LIST, MyFrame::OnDialogList)
    EVT_MENU(PROPERTY_TEST_FRAME_LIST, MyFrame::OnFrameList)
    EVT_MENU(PROPERTY_TEST_DIALOG_FORM, MyFrame::OnDialogForm)
    EVT_MENU(PROPERTY_TEST_FRAME_FORM, MyFrame::OnFrameForm)
END_EVENT_TABLE()

// Define my frame constructor
MyFrame::MyFrame(wxFrame *frame, const wxString& title, const wxPoint& pos, const wxSize& size, long type):
  wxFrame(frame, -1, title, pos, size, type)
{
}

// Define the behaviour for the frame closing
// - must delete all frames except for the main one.
void MyFrame::OnCloseWindow(wxCloseEvent& event)
{
    if (wxGetApp().m_childWindow)
    {
        wxGetApp().m_childWindow->Close(TRUE);
    }

    Destroy();
}

void MyFrame::OnQuit(wxCommandEvent& event)
{
    Close(TRUE);
}

void MyFrame::OnDialogList(wxCommandEvent& event)
{
    wxGetApp().PropertyListTest(TRUE);
}

void MyFrame::OnFrameList(wxCommandEvent& event)
{
    wxGetApp().PropertyListTest(FALSE);
}

void MyFrame::OnDialogForm(wxCommandEvent& event)
{
    wxGetApp().PropertyFormTest(TRUE);
}

void MyFrame::OnFrameForm(wxCommandEvent& event)
{
    wxGetApp().PropertyFormTest(FALSE);
}

void MyFrame::OnAbout(wxCommandEvent& event)
{
    (void)wxMessageBox(_T("Property Classes Demo\nAuthor: Julian Smart"), _T("About Property Classes Test"));
}

void MyApp::RegisterValidators(void)
{
  myListValidatorRegistry.RegisterValidator((wxString)_T("real"), new wxRealListValidator);
  myListValidatorRegistry.RegisterValidator((wxString)_T("string"), new wxStringListValidator);
  myListValidatorRegistry.RegisterValidator((wxString)_T("integer"), new wxIntegerListValidator);
  myListValidatorRegistry.RegisterValidator((wxString)_T("bool"), new wxBoolListValidator);
  myListValidatorRegistry.RegisterValidator((wxString)_T("stringlist"), new wxListOfStringsListValidator);

  myFormValidatorRegistry.RegisterValidator((wxString)_T("real"), new wxRealFormValidator);
  myFormValidatorRegistry.RegisterValidator((wxString)_T("string"), new wxStringFormValidator);
  myFormValidatorRegistry.RegisterValidator((wxString)_T("integer"), new wxIntegerFormValidator);
  myFormValidatorRegistry.RegisterValidator((wxString)_T("bool"), new wxBoolFormValidator);
}

void MyApp::PropertyListTest(bool useDialog)
{
    if (m_childWindow)
        return;

    wxPropertySheet *sheet = new wxPropertySheet;

    sheet->AddProperty(new wxProperty(_T("fred"), 1.0, _T("real")));
    sheet->AddProperty(new wxProperty(_T("tough choice"), (bool)TRUE, _T("bool")));
    sheet->AddProperty(new wxProperty(_T("ian"), (long)45, _T("integer"), new wxIntegerListValidator(-50, 50)));
    sheet->AddProperty(new wxProperty(_T("bill"), 25.0, _T("real"), new wxRealListValidator(0.0, 100.0)));
    sheet->AddProperty(new wxProperty(_T("julian"), _T("one"), _T("string")));
    sheet->AddProperty(new wxProperty(_T("bitmap"), _T("none"), _T("string"), new wxFilenameListValidator(_T("Select a bitmap file"), _T("*.bmp"))));
    wxStringList *strings = new wxStringList(wxT("one"), wxT("two"), wxT("three"), NULL);
    sheet->AddProperty(new wxProperty(_T("constrained"), _T("one"), _T("string"), new wxStringListValidator(strings)));

    wxStringList *strings2 = new wxStringList(wxT("earth"), wxT("fire"), wxT("wind"), wxT("water"), NULL);
    sheet->AddProperty(new wxProperty(_T("string list"), strings2, _T("stringlist")));

    wxPropertyListView *view = new wxPropertyListView
        (
            NULL,
            wxPROP_BUTTON_OK | wxPROP_BUTTON_CANCEL | wxPROP_BUTTON_CHECK_CROSS
            |wxPROP_DYNAMIC_VALUE_FIELD|wxPROP_PULLDOWN|wxPROP_SHOWVALUES
        );

    wxDialog *propDialog = NULL;
    wxPropertyListFrame *propFrame = NULL;
    if (useDialog)
    {
        propDialog = new PropListDialog(view, NULL, _T("Property Sheet Test"),
        wxPoint(-1, -1), wxSize(400, 500), wxDEFAULT_DIALOG_STYLE|wxDIALOG_MODELESS);
        m_childWindow = propDialog;
    }
    else
    {
        propFrame = new PropListFrame(view, NULL, _T("Property Sheet Test"), wxPoint(-1, -1), wxSize(400, 500));
        m_childWindow = propFrame;
    }

    view->AddRegistry(&myListValidatorRegistry);

    if (useDialog)
    {
        view->ShowView(sheet, (wxPanel *)propDialog);
        propDialog->Centre(wxBOTH);
        propDialog->Show(TRUE);
    }
    else
    {
        propFrame->Initialize();
        view->ShowView(sheet, propFrame->GetPropertyPanel());

        propFrame->Centre(wxBOTH);
        propFrame->Show(TRUE);
    }
}

void MyApp::PropertyFormTest(bool useDialog)
{
    if (m_childWindow)
        return;

    wxPropertySheet *sheet = new wxPropertySheet;

    sheet->AddProperty(new wxProperty(_T("fred"), 25.0, _T("real"), new wxRealFormValidator(0.0, 100.0)));
    sheet->AddProperty(new wxProperty(_T("tough choice"), (bool)TRUE, _T("bool")));
    sheet->AddProperty(new wxProperty(_T("ian"), (long)45, _T("integer"), new wxIntegerFormValidator(-50, 50)));
    sheet->AddProperty(new wxProperty(_T("julian"), _T("one"), _T("string")));
    wxStringList *strings = new wxStringList(wxT("one"), wxT("two"), wxT("three"), NULL);
    sheet->AddProperty(new wxProperty(_T("constrained"), _T("one"), _T("string"), new wxStringFormValidator(strings)));

    wxPropertyFormView *view = new wxPropertyFormView(NULL);

    wxDialog *propDialog = NULL;
    wxPropertyFormFrame *propFrame = NULL;

    if (useDialog)
    {
        propDialog = new PropFormDialog(view, NULL, _T("Property Form Test"),
        wxPoint(-1, -1), wxSize(380, 250), wxDEFAULT_DIALOG_STYLE|wxDIALOG_MODAL);
        m_childWindow = propDialog;
    }
    else
    {
        propFrame = new PropFormFrame(view, NULL, _T("Property Form Test"),
            wxPoint(-1, -1), wxSize(380, 250));
        propFrame->Initialize();
        m_childWindow = propFrame;
    }

    // BCC32 does not like ?:
    wxWindow *panel ;
    if ( propDialog )
    {
        panel = propDialog;
    }
    else
    {
        panel = propFrame->GetPropertyPanel() ;
    }

    wxLayoutConstraints* c;

#if 0
    if (!propDialog)
    {
        c = new wxLayoutConstraints;
        c->left.SameAs(m_childWindow, wxLeft, 4);
        c->right.SameAs(m_childWindow, wxRight, 4);
        c->top.SameAs(m_childWindow, wxTop, 4);
        c->bottom.SameAs(m_childWindow, wxBottom, 40);

        panel->SetConstraints(c);
    }
#endif
 
    // Add items to the panel
    wxButton *okButton = new wxButton(panel, wxID_OK, _T("OK"), wxPoint(-1, -1),
        wxSize(80, 26), 0, wxDefaultValidator, _T("ok"));
    wxButton *cancelButton = new wxButton(panel, wxID_CANCEL, _T("Cancel"),  wxPoint(-1, -1),
        wxSize(80, 26), 0, wxDefaultValidator, _T("cancel"));
    wxButton *updateButton = new wxButton(panel, wxID_PROP_UPDATE, _T("Update"),  wxPoint(-1, -1),
        wxSize(80, 26), 0, wxDefaultValidator, _T("update"));
    wxButton *revertButton = new wxButton(panel, wxID_PROP_REVERT, _T("Revert"),  wxPoint(-1, -1),
        wxSize(80, 26), 0, wxDefaultValidator, _T("revert"));

    c = new wxLayoutConstraints;
    c->right.SameAs(panel, wxRight, 4);
    c->bottom.SameAs(panel, wxBottom, 4);
    c->height.AsIs();
    c->width.AsIs();
    revertButton->SetConstraints(c);

    c = new wxLayoutConstraints;
    c->right.SameAs(revertButton, wxLeft, 4);
    c->bottom.SameAs(panel, wxBottom, 4);
    c->height.AsIs();
    c->width.AsIs();
    updateButton->SetConstraints(c);

    c = new wxLayoutConstraints;
    c->right.SameAs(updateButton, wxLeft, 4);
    c->bottom.SameAs(panel, wxBottom, 4);
    c->height.AsIs();
    c->width.AsIs();
    cancelButton->SetConstraints(c);

    c = new wxLayoutConstraints;
    c->right.SameAs(cancelButton, wxLeft, 4);
    c->bottom.SameAs(panel, wxBottom, 4);
    c->height.AsIs();
    c->width.AsIs();
    okButton->SetConstraints(c);

    // The name of this text item matches the "fred" property
    wxTextCtrl *text = new wxTextCtrl(panel, -1, _T("Fred"), wxPoint(-1, -1), wxSize(
    200, -1), 0, wxDefaultValidator, _T("fred"));

    c = new wxLayoutConstraints;
    c->left.SameAs(panel, wxLeft, 4);
    c->top.SameAs(panel, wxTop, 4);
    c->height.AsIs();
    c->width.AsIs();
    text->SetConstraints(c);

    wxCheckBox *checkBox = new wxCheckBox(panel, -1, _T("Yes or no"), wxPoint(-1, -1),
        wxSize(-1, -1), 0, wxDefaultValidator, _T("tough choice"));

    c = new wxLayoutConstraints;
    c->left.SameAs(text, wxRight, 20);
    c->top.SameAs(panel, wxTop, 4);
    c->height.AsIs();
    c->width.AsIs();
    checkBox->SetConstraints(c);

  wxSlider *slider = new wxSlider(panel, -1, -50, 50, 150, wxPoint(-1, -1),
    wxSize(200,10), 0, wxDefaultValidator, _T("ian"));

    c = new wxLayoutConstraints;
    c->left.SameAs(panel, wxLeft, 4);
    c->top.SameAs(text, wxBottom, 10);
    c->height.AsIs();
    c->width.AsIs();
    slider->SetConstraints(c);

    wxListBox *listBox = new wxListBox(panel, -1, wxPoint(-1, -1),
        wxSize(200, 100), 0, NULL, 0, wxDefaultValidator, _T("constrained"));

    c = new wxLayoutConstraints;
    c->left.SameAs(panel, wxLeft, 4);
    c->top.SameAs(slider, wxBottom, 10);
    c->height.AsIs();
    c->width.AsIs();
    listBox->SetConstraints(c);

    view->AddRegistry(&myFormValidatorRegistry);

    panel->SetAutoLayout(TRUE);

    view->ShowView(sheet, panel);
    view->AssociateNames();
    view->TransferToDialog();

    if (useDialog) {
        propDialog->Layout();
        propDialog->Centre(wxBOTH);
        propDialog->Show(TRUE);
    }
    else
    {
        // panel->Layout();
        propFrame->Centre(wxBOTH);
        propFrame->Show(TRUE);
    }
}

BEGIN_EVENT_TABLE(PropListFrame, wxPropertyListFrame)
    EVT_CLOSE(PropListFrame::OnCloseWindow)
END_EVENT_TABLE()

void PropListFrame::OnCloseWindow(wxCloseEvent& event)
{
    wxGetApp().m_childWindow = NULL;

    wxPropertyListFrame::OnCloseWindow(event);
}

BEGIN_EVENT_TABLE(PropListDialog, wxPropertyListDialog)
    EVT_CLOSE(PropListDialog::OnCloseWindow)
END_EVENT_TABLE()

void PropListDialog::OnCloseWindow(wxCloseEvent& event)
{
    wxGetApp().m_childWindow = NULL;

    wxPropertyListDialog::OnCloseWindow(event);
}

BEGIN_EVENT_TABLE(PropFormFrame, wxPropertyFormFrame)
    EVT_CLOSE(PropFormFrame::OnCloseWindow)
    EVT_SIZE(PropFormFrame::OnSize)
END_EVENT_TABLE()

void PropFormFrame::OnCloseWindow(wxCloseEvent& event)
{
    wxGetApp().m_childWindow = NULL;

    wxPropertyFormFrame::OnCloseWindow(event);
}

void PropFormFrame::OnSize(wxSizeEvent& event)
{
    wxPropertyFormFrame::OnSize(event);
    GetPropertyPanel()->Layout();
}

BEGIN_EVENT_TABLE(PropFormDialog, wxPropertyFormDialog)
    EVT_CLOSE(PropFormDialog::OnCloseWindow)
END_EVENT_TABLE()

void PropFormDialog::OnCloseWindow(wxCloseEvent& event)
{
    wxGetApp().m_childWindow = NULL;

    wxPropertyFormDialog::OnCloseWindow(event);
}
Commit	Line	Data
07831c16 JS	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
7c9955d1	27	#include "wx/deprecated/setup.h"
07831c16 JS	28
07831c16 JS	29	#if !wxUSE_PROPSHEET
7c9955d1	30	#error Please set wxUSE_PROPSHEET to 1 in contrib/include/wx/deprecated/setup.h and recompile.
07831c16 JS	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