]> git.saurik.com Git - wxWidgets.git/blame - samples/propgrid/propgrid.cpp
Set correct m_state in wxPGCheckBoxEditor::SetValueToUnspecified()
[wxWidgets.git] / samples / propgrid / propgrid.cpp
CommitLineData
1c4293cb
VZ
1/////////////////////////////////////////////////////////////////////////////
2// Name: samples/propgrid/propgrid.cpp
3// Purpose: wxPropertyGrid sample
4// Author: Jaakko Salli
5// Modified by:
6// Created: 2004-09-25
ea5af9c5 7// RCS-ID: $Id$
1c4293cb
VZ
8// Copyright: (c) Jaakko Salli
9// Licence: wxWindows license
10/////////////////////////////////////////////////////////////////////////////
11
12//
13//
14// NOTES
15//
16// * Examples of custom property classes are in sampleprops.cpp.
17//
18// * Additional ones can be found below.
19//
20// * Currently there is no example of a custom property editor. However,
21// SpinCtrl editor sample is well-commented. It can be found in
7bb89a66 22// src/propgrid/advprops.cpp.
1c4293cb
VZ
23//
24// * To find code that populates the grid with properties, search for
25// string "::Populate".
26//
27// * To find code that handles property grid changes, search for string
28// "::OnPropertyGridChange".
29//
1c4293cb
VZ
30
31// For compilers that support precompilation, includes "wx/wx.h".
32#include "wx/wxprec.h"
33
34#ifdef __BORLANDC__
35 #pragma hdrstop
36#endif
37
38// for all others, include the necessary headers (this file is usually all you
39// need because it includes almost all "standard" wxWidgets headers)
40#ifndef WX_PRECOMP
41 #include "wx/wx.h"
42#endif
43
f4bc1aa2
JS
44#if !wxUSE_PROPGRID
45 #error "Please set wxUSE_PROPGRID to 1 and rebuild the library."
46#endif
47
1c4293cb
VZ
48#include <wx/numdlg.h>
49
50// -----------------------------------------------------------------------
51
52
53// Main propertygrid header.
54#include <wx/propgrid/propgrid.h>
55
56// Extra property classes.
57#include <wx/propgrid/advprops.h>
58
59// This defines wxPropertyGridManager.
60#include <wx/propgrid/manager.h>
61
62#include "propgrid.h"
63#include "sampleprops.h"
64
65#if wxUSE_DATEPICKCTRL
66 #include <wx/datectrl.h>
67#endif
68
69#include <wx/artprov.h>
70
41f02b9a
FM
71#ifndef __WXMSW__
72 #include "../sample.xpm"
73#endif
1c4293cb
VZ
74
75// -----------------------------------------------------------------------
76// wxSampleMultiButtonEditor
77// A sample editor class that has multiple buttons.
78// -----------------------------------------------------------------------
79
80class wxSampleMultiButtonEditor : public wxPGTextCtrlEditor
81{
7a344f1b 82 DECLARE_DYNAMIC_CLASS(wxSampleMultiButtonEditor)
1c4293cb
VZ
83public:
84 wxSampleMultiButtonEditor() {}
85 virtual ~wxSampleMultiButtonEditor() {}
86
7a344f1b
JS
87 virtual wxPGWindowList CreateControls( wxPropertyGrid* propGrid,
88 wxPGProperty* property,
89 const wxPoint& pos,
90 const wxSize& sz ) const;
1c4293cb
VZ
91 virtual bool OnEvent( wxPropertyGrid* propGrid,
92 wxPGProperty* property,
93 wxWindow* ctrl,
94 wxEvent& event ) const;
1c4293cb
VZ
95};
96
7a344f1b 97IMPLEMENT_DYNAMIC_CLASS(wxSampleMultiButtonEditor, wxPGTextCtrlEditor)
1c4293cb
VZ
98
99wxPGWindowList wxSampleMultiButtonEditor::CreateControls( wxPropertyGrid* propGrid,
100 wxPGProperty* property,
101 const wxPoint& pos,
102 const wxSize& sz ) const
103{
104 // Create and populate buttons-subwindow
105 wxPGMultiButton* buttons = new wxPGMultiButton( propGrid, sz );
106
7a344f1b 107 // Add two regular buttons
1c4293cb
VZ
108 buttons->Add( "..." );
109 buttons->Add( "A" );
7a344f1b 110 // Add a bitmap button
1c4293cb 111 buttons->Add( wxArtProvider::GetBitmap(wxART_FOLDER) );
1c4293cb
VZ
112
113 // Create the 'primary' editor control (textctrl in this case)
114 wxPGWindowList wndList = wxPGTextCtrlEditor::CreateControls
7a344f1b
JS
115 ( propGrid, property, pos,
116 buttons->GetPrimarySize() );
1c4293cb
VZ
117
118 // Finally, move buttons-subwindow to correct position and make sure
119 // returned wxPGWindowList contains our custom button list.
7a344f1b 120 buttons->Finalize(propGrid, pos);
1c4293cb
VZ
121
122 wndList.SetSecondary( buttons );
123 return wndList;
124}
125
126bool wxSampleMultiButtonEditor::OnEvent( wxPropertyGrid* propGrid,
127 wxPGProperty* property,
128 wxWindow* ctrl,
129 wxEvent& event ) const
130{
131 if ( event.GetEventType() == wxEVT_COMMAND_BUTTON_CLICKED )
132 {
133 wxPGMultiButton* buttons = (wxPGMultiButton*) propGrid->GetEditorControlSecondary();
134
7a344f1b
JS
135 if ( event.GetId() == buttons->GetButtonId(0) )
136 {
6086bcc8 137 // Do something when the first button is pressed
7a344f1b 138 wxLogDebug("First button pressed");
6086bcc8 139 return false; // Return false since value did not change
7a344f1b 140 }
1c4293cb
VZ
141 if ( event.GetId() == buttons->GetButtonId(1) )
142 {
6086bcc8
JS
143 // Do something when the second button is pressed
144 wxMessageBox("Second button pressed");
145 return false; // Return false since value did not change
1c4293cb
VZ
146 }
147 if ( event.GetId() == buttons->GetButtonId(2) )
148 {
6086bcc8
JS
149 // Do something when the third button is pressed
150 wxMessageBox("Third button pressed");
151 return false; // Return false since value did not change
1c4293cb
VZ
152 }
153 }
154 return wxPGTextCtrlEditor::OnEvent(propGrid, property, ctrl, event);
155}
156
157// -----------------------------------------------------------------------
158// Validator for wxValidator use sample
159// -----------------------------------------------------------------------
160
161#if wxUSE_VALIDATORS
162
163// wxValidator for testing
164
165class wxInvalidWordValidator : public wxValidator
166{
167public:
168
169 wxInvalidWordValidator( const wxString& invalidWord )
170 : wxValidator(), m_invalidWord(invalidWord)
171 {
172 }
173
174 virtual wxObject* Clone() const
175 {
176 return new wxInvalidWordValidator(m_invalidWord);
177 }
178
179 virtual bool Validate(wxWindow* WXUNUSED(parent))
180 {
181 wxTextCtrl* tc = wxDynamicCast(GetWindow(), wxTextCtrl);
182 wxCHECK_MSG(tc, true, wxT("validator window must be wxTextCtrl"));
183
184 wxString val = tc->GetValue();
185
186 if ( val.find(m_invalidWord) == wxString::npos )
187 return true;
188
189 ::wxMessageBox(wxString::Format(wxT("%s is not allowed word"),m_invalidWord.c_str()),
190 wxT("Validation Failure"));
191
192 return false;
193 }
194
195private:
196 wxString m_invalidWord;
197};
198
199#endif // wxUSE_VALIDATORS
200
201// -----------------------------------------------------------------------
202// AdvImageFile Property
203// -----------------------------------------------------------------------
204
205class wxMyImageInfo;
206
207WX_DECLARE_OBJARRAY(wxMyImageInfo, wxArrayMyImageInfo);
208
209class wxMyImageInfo
210{
211public:
212 wxString m_path;
213 wxBitmap* m_pThumbnail1; // smaller thumbnail
214 wxBitmap* m_pThumbnail2; // larger thumbnail
215
216 wxMyImageInfo ( const wxString& str )
217 {
218 m_path = str;
219 m_pThumbnail1 = (wxBitmap*) NULL;
220 m_pThumbnail2 = (wxBitmap*) NULL;
221 }
222 virtual ~wxMyImageInfo()
223 {
224 if ( m_pThumbnail1 )
225 delete m_pThumbnail1;
226 if ( m_pThumbnail2 )
227 delete m_pThumbnail2;
228 }
229
230};
231
232
233#include <wx/arrimpl.cpp>
234WX_DEFINE_OBJARRAY(wxArrayMyImageInfo);
235
236wxArrayMyImageInfo g_myImageArray;
237
238
239// Preferred thumbnail height.
240#define PREF_THUMBNAIL_HEIGHT 64
241
242
243wxPGChoices wxAdvImageFileProperty::ms_choices;
244
245WX_PG_IMPLEMENT_PROPERTY_CLASS(wxAdvImageFileProperty,wxFileProperty,
246 wxString,const wxString&,ChoiceAndButton)
247
248
249wxAdvImageFileProperty::wxAdvImageFileProperty( const wxString& label,
250 const wxString& name,
251 const wxString& value)
252 : wxFileProperty(label,name,value)
253{
254 m_wildcard = wxPGGetDefaultImageWildcard();
255
256 m_index = -1;
257
258 m_pImage = (wxImage*) NULL;
259
260 // Only show names.
261 m_flags &= ~(wxPG_PROP_SHOW_FULL_FILENAME);
262}
263
264wxAdvImageFileProperty::~wxAdvImageFileProperty ()
265{
266 // Delete old image
267 if ( m_pImage )
268 {
269 delete m_pImage;
270 m_pImage = (wxImage*) NULL;
271 }
272}
273
274void wxAdvImageFileProperty::OnSetValue()
275{
276 wxFileProperty::OnSetValue();
277
278 // Delete old image
279 if ( m_pImage )
280 {
281 delete m_pImage;
282 m_pImage = (wxImage*) NULL;
283 }
284
285 wxString imagename = GetValueAsString(0);
286
287 if ( imagename.length() )
288 {
1425eca5 289 wxFileName filename = GetFileName();
1c4293cb
VZ
290 size_t prevCount = g_myImageArray.GetCount();
291 int index = ms_choices.Index(imagename);
292
293 // If not in table, add now.
294 if ( index == wxNOT_FOUND )
295 {
296 ms_choices.Add( imagename );
1425eca5 297 g_myImageArray.Add( new wxMyImageInfo( filename.GetFullPath() ) );
1c4293cb
VZ
298
299 index = g_myImageArray.GetCount() - 1;
300 }
301
302 // If no thumbnail ready, then need to load image.
303 if ( !g_myImageArray[index].m_pThumbnail2 )
304 {
305 // Load if file exists.
1425eca5
JS
306 if ( filename.FileExists() )
307 m_pImage = new wxImage( filename.GetFullPath() );
1c4293cb
VZ
308 }
309
310 m_index = index;
311
312 wxPropertyGrid* pg = GetGrid();
313 wxWindow* control = pg->GetEditorControl();
314
315 if ( pg->GetSelection() == this && control )
316 {
317 wxString name = GetValueAsString(0);
318
319 if ( g_myImageArray.GetCount() != prevCount )
320 {
321 wxASSERT( g_myImageArray.GetCount() == (prevCount+1) );
322
323 // Add to the control's array.
324 // (should be added to own array earlier)
325
326 if ( control )
327 GetEditorClass()->InsertItem(control, name, -1);
328 }
329
330 if ( control )
331 GetEditorClass()->UpdateControl(this, control);
332 }
333 }
334 else
335 m_index = -1;
336}
337
1c4293cb
VZ
338bool wxAdvImageFileProperty::IntToValue( wxVariant& variant, int number, int WXUNUSED(argFlags) ) const
339{
340 wxASSERT( number >= 0 );
341 return StringToValue( variant, ms_choices.GetLabel(number), wxPG_FULL_VALUE );
342}
343
344bool wxAdvImageFileProperty::OnEvent( wxPropertyGrid* propgrid, wxWindow* primary,
345 wxEvent& event )
346{
347 if ( propgrid->IsMainButtonEvent(event) )
348 {
349 return wxFileProperty::OnEvent(propgrid,primary,event);
350 }
351 return false;
352}
353
354wxSize wxAdvImageFileProperty::OnMeasureImage( int item ) const
355{
356 if ( item == -1 )
357 return wxPG_DEFAULT_IMAGE_SIZE;
358
359 return wxSize(PREF_THUMBNAIL_HEIGHT,PREF_THUMBNAIL_HEIGHT);
360}
361
362void wxAdvImageFileProperty::LoadThumbnails( size_t index )
363{
364 wxMyImageInfo& mii = g_myImageArray[index];
365
366 if ( !mii.m_pThumbnail2 )
367 {
1425eca5 368 wxFileName filename = GetFileName();
1c4293cb
VZ
369
370 if ( !m_pImage || !m_pImage->Ok() ||
1425eca5 371 filename != mii.m_path
1c4293cb
VZ
372 )
373 {
374 if ( m_pImage )
375 delete m_pImage;
376 m_pImage = new wxImage( mii.m_path );
377 }
378
379 if ( m_pImage && m_pImage->Ok() )
380 {
381 int im_wid = m_pImage->GetWidth();
382 int im_hei = m_pImage->GetHeight();
383 if ( im_hei > PREF_THUMBNAIL_HEIGHT )
384 {
385 // TNW = (TNH*IW)/IH
386 im_wid = (PREF_THUMBNAIL_HEIGHT*m_pImage->GetWidth())/m_pImage->GetHeight();
387 im_hei = PREF_THUMBNAIL_HEIGHT;
388 }
389
390 m_pImage->Rescale( im_wid, im_hei );
391
392 mii.m_pThumbnail2 = new wxBitmap( *m_pImage );
393
394 wxSize cis = GetParentState()->GetGrid()->GetImageSize();
395 m_pImage->Rescale ( cis.x, cis.y );
396
397 mii.m_pThumbnail1 = new wxBitmap( *m_pImage );
398
399 }
400
401 if ( m_pImage )
402 {
403 delete m_pImage;
404 m_pImage = (wxImage*) NULL;
405 }
406 }
407}
408
409void wxAdvImageFileProperty::OnCustomPaint( wxDC& dc,
410 const wxRect& rect,
411 wxPGPaintData& pd )
412{
413 int index = m_index;
414 if ( pd.m_choiceItem >= 0 )
415 index = pd.m_choiceItem;
416
417 //wxLogDebug(wxT("%i"),index);
418
419 if ( index >= 0 )
420 {
421 LoadThumbnails(index);
422
423 // Is this a measure item call?
424 if ( rect.x < 0 )
425 {
426 // Variable height
427 //pd.m_drawnHeight = PREF_THUMBNAIL_HEIGHT;
428 wxBitmap* pBitmap = (wxBitmap*)g_myImageArray[index].m_pThumbnail2;
429 if ( pBitmap )
430 pd.m_drawnHeight = pBitmap->GetHeight();
431 else
432 pd.m_drawnHeight = 16;
433 return;
434 }
435
436 // Draw the thumbnail
437
438 wxBitmap* pBitmap;
439
440 if ( pd.m_choiceItem >= 0 )
441 pBitmap = (wxBitmap*)g_myImageArray[index].m_pThumbnail2;
442 else
443 pBitmap = (wxBitmap*)g_myImageArray[index].m_pThumbnail1;
444
445 if ( pBitmap )
446 {
447 dc.DrawBitmap ( *pBitmap, rect.x, rect.y, FALSE );
448
449 // Tell the caller how wide we drew.
450 pd.m_drawnWidth = pBitmap->GetWidth();
451
452 return;
453 }
454 }
455
456 // No valid file - just draw a white box.
457 dc.SetBrush ( *wxWHITE_BRUSH );
458 dc.DrawRectangle ( rect );
459}
460
461
462// -----------------------------------------------------------------------
463// wxVectorProperty
464// -----------------------------------------------------------------------
465
466// See propgridsample.h for wxVector3f class
467
0372d42e 468WX_PG_IMPLEMENT_VARIANT_DATA_DUMMY_EQ(wxVector3f)
1c4293cb
VZ
469
470WX_PG_IMPLEMENT_PROPERTY_CLASS(wxVectorProperty,wxPGProperty,
471 wxVector3f,const wxVector3f&,TextCtrl)
472
473
474wxVectorProperty::wxVectorProperty( const wxString& label,
475 const wxString& name,
476 const wxVector3f& value )
477 : wxPGProperty(label,name)
478{
0372d42e 479 SetValue( WXVARIANT(value) );
48a32cf6
JS
480 AddPrivateChild( new wxFloatProperty(wxT("X"),wxPG_LABEL,value.x) );
481 AddPrivateChild( new wxFloatProperty(wxT("Y"),wxPG_LABEL,value.y) );
482 AddPrivateChild( new wxFloatProperty(wxT("Z"),wxPG_LABEL,value.z) );
1c4293cb
VZ
483}
484
485wxVectorProperty::~wxVectorProperty() { }
486
487void wxVectorProperty::RefreshChildren()
488{
489 if ( !GetChildCount() ) return;
0372d42e 490 const wxVector3f& vector = wxVector3fRefFromVariant(m_value);
1c4293cb
VZ
491 Item(0)->SetValue( vector.x );
492 Item(1)->SetValue( vector.y );
493 Item(2)->SetValue( vector.z );
494}
495
b8b1ff48
JS
496wxVariant wxVectorProperty::ChildChanged( wxVariant& thisValue,
497 int childIndex,
498 wxVariant& childValue ) const
1c4293cb 499{
0372d42e
JS
500 wxVector3f vector;
501 vector << thisValue;
1c4293cb
VZ
502 switch ( childIndex )
503 {
504 case 0: vector.x = childValue.GetDouble(); break;
505 case 1: vector.y = childValue.GetDouble(); break;
506 case 2: vector.z = childValue.GetDouble(); break;
507 }
b8b1ff48
JS
508 wxVariant newVariant;
509 newVariant << vector;
510 return newVariant;
1c4293cb
VZ
511}
512
513
514// -----------------------------------------------------------------------
515// wxTriangleProperty
516// -----------------------------------------------------------------------
517
518// See propgridsample.h for wxTriangle class
519
0372d42e 520WX_PG_IMPLEMENT_VARIANT_DATA_DUMMY_EQ(wxTriangle)
1c4293cb
VZ
521
522WX_PG_IMPLEMENT_PROPERTY_CLASS(wxTriangleProperty,wxPGProperty,
523 wxTriangle,const wxTriangle&,TextCtrl)
524
525
526wxTriangleProperty::wxTriangleProperty( const wxString& label,
527 const wxString& name,
528 const wxTriangle& value)
529 : wxPGProperty(label,name)
530{
0372d42e 531 SetValue( WXVARIANT(value) );
48a32cf6
JS
532 AddPrivateChild( new wxVectorProperty(wxT("A"),wxPG_LABEL,value.a) );
533 AddPrivateChild( new wxVectorProperty(wxT("B"),wxPG_LABEL,value.b) );
534 AddPrivateChild( new wxVectorProperty(wxT("C"),wxPG_LABEL,value.c) );
1c4293cb
VZ
535}
536
537wxTriangleProperty::~wxTriangleProperty() { }
538
539void wxTriangleProperty::RefreshChildren()
540{
541 if ( !GetChildCount() ) return;
0372d42e
JS
542 const wxTriangle& triangle = wxTriangleRefFromVariant(m_value);
543 Item(0)->SetValue( WXVARIANT(triangle.a) );
544 Item(1)->SetValue( WXVARIANT(triangle.b) );
545 Item(2)->SetValue( WXVARIANT(triangle.c) );
1c4293cb
VZ
546}
547
b8b1ff48
JS
548wxVariant wxTriangleProperty::ChildChanged( wxVariant& thisValue,
549 int childIndex,
550 wxVariant& childValue ) const
1c4293cb 551{
0372d42e
JS
552 wxTriangle triangle;
553 triangle << thisValue;
554 const wxVector3f& vector = wxVector3fRefFromVariant(childValue);
1c4293cb
VZ
555 switch ( childIndex )
556 {
557 case 0: triangle.a = vector; break;
558 case 1: triangle.b = vector; break;
559 case 2: triangle.c = vector; break;
560 }
b8b1ff48
JS
561 wxVariant newVariant;
562 newVariant << triangle;
563 return newVariant;
1c4293cb
VZ
564}
565
566
567// -----------------------------------------------------------------------
568// wxSingleChoiceDialogAdapter (wxPGEditorDialogAdapter sample)
569// -----------------------------------------------------------------------
570
571class wxSingleChoiceDialogAdapter : public wxPGEditorDialogAdapter
572{
573public:
574
575 wxSingleChoiceDialogAdapter( const wxPGChoices& choices )
576 : wxPGEditorDialogAdapter(), m_choices(choices)
577 {
578 }
579
580 virtual bool DoShowDialog( wxPropertyGrid* WXUNUSED(propGrid),
581 wxPGProperty* WXUNUSED(property) )
582 {
583 wxString s = ::wxGetSingleChoice(wxT("Message"),
584 wxT("Caption"),
585 m_choices.GetLabels());
586 if ( s.length() )
587 {
588 SetValue(s);
589 return true;
590 }
591
592 return false;
593 }
594
595protected:
596 const wxPGChoices& m_choices;
597};
598
599
600class SingleChoiceProperty : public wxStringProperty
601{
602public:
603
604 SingleChoiceProperty( const wxString& label,
605 const wxString& name = wxPG_LABEL,
606 const wxString& value = wxEmptyString )
607 : wxStringProperty(label, name, value)
608 {
609 // Prepare choices
610 m_choices.Add(wxT("Cat"));
611 m_choices.Add(wxT("Dog"));
612 m_choices.Add(wxT("Gibbon"));
613 m_choices.Add(wxT("Otter"));
614 }
615
616 // Set editor to have button
617 virtual const wxPGEditor* DoGetEditorClass() const
618 {
58f43b41 619 return wxPGEditor_TextCtrlAndButton;
1c4293cb
VZ
620 }
621
622 // Set what happens on button click
623 virtual wxPGEditorDialogAdapter* GetEditorDialog() const
624 {
625 return new wxSingleChoiceDialogAdapter(m_choices);
626 }
627
628protected:
629 wxPGChoices m_choices;
630};
631
632// -----------------------------------------------------------------------
633// Menu IDs
634// -----------------------------------------------------------------------
635
636enum
637{
638 PGID = 1,
639 TCID,
640 ID_ABOUT,
641 ID_QUIT,
642 ID_APPENDPROP,
643 ID_APPENDCAT,
644 ID_INSERTPROP,
645 ID_INSERTCAT,
646 ID_ENABLE,
647 ID_HIDE,
648 ID_DELETE,
649 ID_DELETER,
650 ID_DELETEALL,
651 ID_UNSPECIFY,
652 ID_ITERATE1,
653 ID_ITERATE2,
654 ID_ITERATE3,
655 ID_ITERATE4,
656 ID_CLEARMODIF,
657 ID_FREEZE,
658 ID_DUMPLIST,
659 ID_COLOURSCHEME1,
660 ID_COLOURSCHEME2,
661 ID_COLOURSCHEME3,
662 ID_CATCOLOURS,
d7e2b522
JS
663 ID_SETBGCOLOUR,
664 ID_SETBGCOLOURRECUR,
1c4293cb 665 ID_STATICLAYOUT,
1c4293cb
VZ
666 ID_POPULATE1,
667 ID_POPULATE2,
668 ID_COLLAPSE,
669 ID_COLLAPSEALL,
670 ID_GETVALUES,
671 ID_SETVALUES,
672 ID_SETVALUES2,
673 ID_RUNTESTFULL,
674 ID_RUNTESTPARTIAL,
675 ID_FITCOLUMNS,
676 ID_CHANGEFLAGSITEMS,
677 ID_TESTINSERTCHOICE,
678 ID_TESTDELETECHOICE,
679 ID_INSERTPAGE,
680 ID_REMOVEPAGE,
681 ID_SETSPINCTRLEDITOR,
682 ID_SETPROPERTYVALUE,
683 ID_TESTREPLACE,
684 ID_SETCOLUMNS,
685 ID_TESTXRC,
686 ID_ENABLECOMMONVALUES,
687 ID_SELECTSTYLE,
688 ID_SAVESTATE,
689 ID_RESTORESTATE,
58935d4a 690 ID_RUNMINIMAL,
5405bfb4 691 ID_ENABLELABELEDITING,
f5254768
JS
692 ID_VETOCOLDRAG,
693 ID_SHOWHEADER
1c4293cb
VZ
694};
695
696// -----------------------------------------------------------------------
697// Event table
698// -----------------------------------------------------------------------
699
700BEGIN_EVENT_TABLE(FormMain, wxFrame)
701 EVT_IDLE(FormMain::OnIdle)
702 EVT_MOVE(FormMain::OnMove)
703 EVT_SIZE(FormMain::OnResize)
704
705 // This occurs when a property is selected
706 EVT_PG_SELECTED( PGID, FormMain::OnPropertyGridSelect )
707 // This occurs when a property value changes
708 EVT_PG_CHANGED( PGID, FormMain::OnPropertyGridChange )
709 // This occurs just prior a property value is changed
710 EVT_PG_CHANGING( PGID, FormMain::OnPropertyGridChanging )
711 // This occurs when a mouse moves over another property
712 EVT_PG_HIGHLIGHTED( PGID, FormMain::OnPropertyGridHighlight )
713 // This occurs when mouse is right-clicked.
714 EVT_PG_RIGHT_CLICK( PGID, FormMain::OnPropertyGridItemRightClick )
715 // This occurs when mouse is double-clicked.
716 EVT_PG_DOUBLE_CLICK( PGID, FormMain::OnPropertyGridItemDoubleClick )
717 // This occurs when propgridmanager's page changes.
718 EVT_PG_PAGE_CHANGED( PGID, FormMain::OnPropertyGridPageChange )
58935d4a
JS
719 // This occurs when user starts editing a property label
720 EVT_PG_LABEL_EDIT_BEGIN( PGID,
721 FormMain::OnPropertyGridLabelEditBegin )
722 // This occurs when user stops editing a property label
723 EVT_PG_LABEL_EDIT_ENDING( PGID,
724 FormMain::OnPropertyGridLabelEditEnding )
1c4293cb
VZ
725 // This occurs when property's editor button (if any) is clicked.
726 EVT_BUTTON( PGID, FormMain::OnPropertyGridButtonClick )
727
728 EVT_PG_ITEM_COLLAPSED( PGID, FormMain::OnPropertyGridItemCollapse )
729 EVT_PG_ITEM_EXPANDED( PGID, FormMain::OnPropertyGridItemExpand )
730
5405bfb4
JS
731 EVT_PG_COL_BEGIN_DRAG( PGID, FormMain::OnPropertyGridColBeginDrag )
732 EVT_PG_COL_DRAGGING( PGID, FormMain::OnPropertyGridColDragging )
733 EVT_PG_COL_END_DRAG( PGID, FormMain::OnPropertyGridColEndDrag )
734
1c4293cb
VZ
735 EVT_TEXT( PGID, FormMain::OnPropertyGridTextUpdate )
736
737 //
738 // Rest of the events are not property grid specific
739 EVT_KEY_DOWN( FormMain::OnPropertyGridKeyEvent )
740 EVT_KEY_UP( FormMain::OnPropertyGridKeyEvent )
741
742 EVT_MENU( ID_APPENDPROP, FormMain::OnAppendPropClick )
743 EVT_MENU( ID_APPENDCAT, FormMain::OnAppendCatClick )
744 EVT_MENU( ID_INSERTPROP, FormMain::OnInsertPropClick )
745 EVT_MENU( ID_INSERTCAT, FormMain::OnInsertCatClick )
746 EVT_MENU( ID_DELETE, FormMain::OnDelPropClick )
747 EVT_MENU( ID_DELETER, FormMain::OnDelPropRClick )
748 EVT_MENU( ID_UNSPECIFY, FormMain::OnMisc )
749 EVT_MENU( ID_DELETEALL, FormMain::OnClearClick )
750 EVT_MENU( ID_ENABLE, FormMain::OnEnableDisable )
751 EVT_MENU( ID_HIDE, FormMain::OnHideShow )
d7e2b522 752
1c4293cb
VZ
753 EVT_MENU( ID_ITERATE1, FormMain::OnIterate1Click )
754 EVT_MENU( ID_ITERATE2, FormMain::OnIterate2Click )
755 EVT_MENU( ID_ITERATE3, FormMain::OnIterate3Click )
756 EVT_MENU( ID_ITERATE4, FormMain::OnIterate4Click )
d7e2b522
JS
757 EVT_MENU( ID_SETBGCOLOUR, FormMain::OnSetBackgroundColour )
758 EVT_MENU( ID_SETBGCOLOURRECUR, FormMain::OnSetBackgroundColour )
1c4293cb
VZ
759 EVT_MENU( ID_CLEARMODIF, FormMain::OnClearModifyStatusClick )
760 EVT_MENU( ID_FREEZE, FormMain::OnFreezeClick )
58935d4a 761 EVT_MENU( ID_ENABLELABELEDITING, FormMain::OnEnableLabelEditing )
f5254768 762 EVT_MENU( ID_SHOWHEADER, FormMain::OnShowHeader )
1c4293cb
VZ
763 EVT_MENU( ID_DUMPLIST, FormMain::OnDumpList )
764
765 EVT_MENU( ID_COLOURSCHEME1, FormMain::OnColourScheme )
766 EVT_MENU( ID_COLOURSCHEME2, FormMain::OnColourScheme )
767 EVT_MENU( ID_COLOURSCHEME3, FormMain::OnColourScheme )
768 EVT_MENU( ID_COLOURSCHEME4, FormMain::OnColourScheme )
769
770 EVT_MENU( ID_ABOUT, FormMain::OnAbout )
771 EVT_MENU( ID_QUIT, FormMain::OnCloseClick )
772
773 EVT_MENU( ID_CATCOLOURS, FormMain::OnCatColours )
774 EVT_MENU( ID_SETCOLUMNS, FormMain::OnSetColumns )
775 EVT_MENU( ID_TESTXRC, FormMain::OnTestXRC )
776 EVT_MENU( ID_ENABLECOMMONVALUES, FormMain::OnEnableCommonValues )
777 EVT_MENU( ID_SELECTSTYLE, FormMain::OnSelectStyle )
778
779 EVT_MENU( ID_STATICLAYOUT, FormMain::OnMisc )
1c4293cb
VZ
780 EVT_MENU( ID_COLLAPSE, FormMain::OnMisc )
781 EVT_MENU( ID_COLLAPSEALL, FormMain::OnMisc )
782
783 EVT_MENU( ID_POPULATE1, FormMain::OnPopulateClick )
784 EVT_MENU( ID_POPULATE2, FormMain::OnPopulateClick )
785
786 EVT_MENU( ID_GETVALUES, FormMain::OnMisc )
787 EVT_MENU( ID_SETVALUES, FormMain::OnMisc )
788 EVT_MENU( ID_SETVALUES2, FormMain::OnMisc )
789
790 EVT_MENU( ID_FITCOLUMNS, FormMain::OnFitColumnsClick )
791
792 EVT_MENU( ID_CHANGEFLAGSITEMS, FormMain::OnChangeFlagsPropItemsClick )
793
794 EVT_MENU( ID_RUNTESTFULL, FormMain::OnMisc )
795 EVT_MENU( ID_RUNTESTPARTIAL, FormMain::OnMisc )
796
797 EVT_MENU( ID_TESTINSERTCHOICE, FormMain::OnInsertChoice )
798 EVT_MENU( ID_TESTDELETECHOICE, FormMain::OnDeleteChoice )
799
800 EVT_MENU( ID_INSERTPAGE, FormMain::OnInsertPage )
801 EVT_MENU( ID_REMOVEPAGE, FormMain::OnRemovePage )
802
803 EVT_MENU( ID_SAVESTATE, FormMain::OnSaveState )
804 EVT_MENU( ID_RESTORESTATE, FormMain::OnRestoreState )
805
806 EVT_MENU( ID_SETSPINCTRLEDITOR, FormMain::OnSetSpinCtrlEditorClick )
807 EVT_MENU( ID_TESTREPLACE, FormMain::OnTestReplaceClick )
808 EVT_MENU( ID_SETPROPERTYVALUE, FormMain::OnSetPropertyValue )
809
810 EVT_MENU( ID_RUNMINIMAL, FormMain::OnRunMinimalClick )
811
812 EVT_CONTEXT_MENU( FormMain::OnContextMenu )
813END_EVENT_TABLE()
814
815// -----------------------------------------------------------------------
816
817void FormMain::OnMove( wxMoveEvent& event )
818{
819 if ( !m_pPropGridManager )
820 {
821 // this check is here so the frame layout can be tested
822 // without creating propertygrid
823 event.Skip();
824 return;
825 }
826
827 // Update position properties
828 int x, y;
829 GetPosition(&x,&y);
830
831 wxPGProperty* id;
832
833 // Must check if properties exist (as they may be deleted).
834
835 // Using m_pPropGridManager, we can scan all pages automatically.
836 id = m_pPropGridManager->GetPropertyByName( wxT("X") );
837 if ( id )
838 m_pPropGridManager->SetPropertyValue( id, x );
839
840 id = m_pPropGridManager->GetPropertyByName( wxT("Y") );
841 if ( id )
842 m_pPropGridManager->SetPropertyValue( id, y );
843
844 id = m_pPropGridManager->GetPropertyByName( wxT("Position") );
845 if ( id )
effb029c 846 m_pPropGridManager->SetPropertyValue( id, WXVARIANT(wxPoint(x,y)) );
1c4293cb
VZ
847
848 // Should always call event.Skip() in frame's MoveEvent handler
849 event.Skip();
850}
851
852// -----------------------------------------------------------------------
853
854void FormMain::OnResize( wxSizeEvent& event )
855{
856 if ( !m_pPropGridManager )
857 {
858 // this check is here so the frame layout can be tested
859 // without creating propertygrid
860 event.Skip();
861 return;
862 }
863
864 // Update size properties
865 int w, h;
866 GetSize(&w,&h);
867
868 wxPGProperty* id;
869 wxPGProperty* p;
870
871 // Must check if properties exist (as they may be deleted).
872
873 // Using m_pPropGridManager, we can scan all pages automatically.
874 p = m_pPropGridManager->GetPropertyByName( wxT("Width") );
875 if ( p && !p->IsValueUnspecified() )
876 m_pPropGridManager->SetPropertyValue( p, w );
877
878 p = m_pPropGridManager->GetPropertyByName( wxT("Height") );
879 if ( p && !p->IsValueUnspecified() )
880 m_pPropGridManager->SetPropertyValue( p, h );
881
882 id = m_pPropGridManager->GetPropertyByName ( wxT("Size") );
883 if ( id )
effb029c 884 m_pPropGridManager->SetPropertyValue( id, WXVARIANT(wxSize(w,h)) );
1c4293cb
VZ
885
886 // Should always call event.Skip() in frame's SizeEvent handler
887 event.Skip();
888}
889
890// -----------------------------------------------------------------------
891
892void FormMain::OnPropertyGridChanging( wxPropertyGridEvent& event )
893{
894 wxPGProperty* p = event.GetProperty();
895
896 if ( p->GetName() == wxT("Font") )
897 {
898 int res =
899 wxMessageBox(wxString::Format(wxT("'%s' is about to change (to variant of type '%s')\n\nAllow or deny?"),
900 p->GetName().c_str(),event.GetValue().GetType().c_str()),
901 wxT("Testing wxEVT_PG_CHANGING"), wxYES_NO, m_pPropGridManager);
902
903 if ( res == wxNO )
904 {
905 wxASSERT(event.CanVeto());
906
907 event.Veto();
908
909 // Since we ask a question, it is better if we omit any validation
910 // failure behavior.
911 event.SetValidationFailureBehavior(0);
912 }
913 }
914}
915
916//
917// Note how we use three types of value getting in this method:
918// A) event.GetPropertyValueAsXXX
919// B) event.GetPropertValue, and then variant's GetXXX
920// C) grid's GetPropertyValueAsXXX(id)
921//
922void FormMain::OnPropertyGridChange( wxPropertyGridEvent& event )
923{
924 wxPGProperty* property = event.GetProperty();
925
926 const wxString& name = property->GetName();
927 wxVariant value = property->GetValue();
928
929 // Don't handle 'unspecified' values
930 if ( value.IsNull() )
931 return;
932
933 // Some settings are disabled outside Windows platform
934 if ( name == wxT("X") )
935 SetSize ( m_pPropGridManager->GetPropertyValueAsInt(property), -1, -1, -1, wxSIZE_USE_EXISTING );
936 else if ( name == wxT("Y") )
937 // wxPGVariantToInt is safe long int value getter
4e00b908 938 SetSize ( -1, value.GetLong(), -1, -1, wxSIZE_USE_EXISTING );
1c4293cb
VZ
939 else if ( name == wxT("Width") )
940 SetSize ( -1, -1, m_pPropGridManager->GetPropertyValueAsInt(property), -1, wxSIZE_USE_EXISTING );
941 else if ( name == wxT("Height") )
4e00b908 942 SetSize ( -1, -1, -1, value.GetLong(), wxSIZE_USE_EXISTING );
1c4293cb
VZ
943 else if ( name == wxT("Label") )
944 {
945 SetTitle ( m_pPropGridManager->GetPropertyValueAsString(property) );
946 }
947 else if ( name == wxT("Password") )
948 {
949 static int pwdMode = 0;
950
951 //m_pPropGridManager->SetPropertyAttribute(property, wxPG_STRING_PASSWORD, (long)pwdMode);
952
953 pwdMode++;
954 pwdMode &= 1;
955 }
956 else
957 if ( name == wxT("Font") )
958 {
0372d42e
JS
959 wxFont font;
960 font << value;
961 wxASSERT( font.Ok() );
1c4293cb
VZ
962
963 m_pPropGridManager->SetFont( font );
964 }
965 else
966 if ( name == wxT("Margin Colour") )
967 {
0372d42e
JS
968 wxColourPropertyValue cpv;
969 cpv << value;
970 m_pPropGridManager->GetGrid()->SetMarginColour( cpv.m_colour );
1c4293cb
VZ
971 }
972 else if ( name == wxT("Cell Colour") )
973 {
0372d42e
JS
974 wxColourPropertyValue cpv;
975 cpv << value;
976 m_pPropGridManager->GetGrid()->SetCellBackgroundColour( cpv.m_colour );
1c4293cb
VZ
977 }
978 else if ( name == wxT("Line Colour") )
979 {
0372d42e
JS
980 wxColourPropertyValue cpv;
981 cpv << value;
982 m_pPropGridManager->GetGrid()->SetLineColour( cpv.m_colour );
1c4293cb
VZ
983 }
984 else if ( name == wxT("Cell Text Colour") )
985 {
0372d42e
JS
986 wxColourPropertyValue cpv;
987 cpv << value;
988 m_pPropGridManager->GetGrid()->SetCellTextColour( cpv.m_colour );
1c4293cb
VZ
989 }
990}
991
992// -----------------------------------------------------------------------
993
994void FormMain::OnPropertyGridSelect( wxPropertyGridEvent& event )
995{
996 wxPGProperty* property = event.GetProperty();
997 if ( property )
998 {
999 m_itemEnable->Enable( TRUE );
1000 if ( property->IsEnabled() )
1001 m_itemEnable->SetItemLabel( wxT("Disable") );
1002 else
1003 m_itemEnable->SetItemLabel( wxT("Enable") );
1004 }
1005 else
1006 {
1007 m_itemEnable->Enable( FALSE );
1008 }
1009
1010#if wxUSE_STATUSBAR
1011 wxPGProperty* prop = event.GetProperty();
1012 wxStatusBar* sb = GetStatusBar();
1013 if ( prop )
1014 {
1015 wxString text(wxT("Selected: "));
1016 text += m_pPropGridManager->GetPropertyLabel( prop );
1017 sb->SetStatusText ( text );
1018 }
1019#endif
1020}
1021
1022// -----------------------------------------------------------------------
1023
1024void FormMain::OnPropertyGridPageChange( wxPropertyGridEvent& WXUNUSED(event) )
1025{
1026#if wxUSE_STATUSBAR
1027 wxStatusBar* sb = GetStatusBar();
1028 wxString text(wxT("Page Changed: "));
1029 text += m_pPropGridManager->GetPageName(m_pPropGridManager->GetSelectedPage());
1030 sb->SetStatusText( text );
1031#endif
1032}
1033
1034// -----------------------------------------------------------------------
1035
58935d4a
JS
1036void FormMain::OnPropertyGridLabelEditBegin( wxPropertyGridEvent& event )
1037{
9d136b8b
JS
1038 wxLogMessage("wxPG_EVT_LABEL_EDIT_BEGIN(%s)",
1039 event.GetProperty()->GetLabel().c_str());
58935d4a
JS
1040}
1041
1042// -----------------------------------------------------------------------
1043
1044void FormMain::OnPropertyGridLabelEditEnding( wxPropertyGridEvent& event )
1045{
9d136b8b
JS
1046 wxLogMessage("wxPG_EVT_LABEL_EDIT_ENDING(%s)",
1047 event.GetProperty()->GetLabel().c_str());
58935d4a
JS
1048}
1049
1050// -----------------------------------------------------------------------
1051
1c4293cb
VZ
1052void FormMain::OnPropertyGridHighlight( wxPropertyGridEvent& WXUNUSED(event) )
1053{
1054}
1055
1056// -----------------------------------------------------------------------
1057
1058void FormMain::OnPropertyGridItemRightClick( wxPropertyGridEvent& event )
1059{
1060#if wxUSE_STATUSBAR
1061 wxPGProperty* prop = event.GetProperty();
1062 wxStatusBar* sb = GetStatusBar();
1063 if ( prop )
1064 {
1065 wxString text(wxT("Right-clicked: "));
1066 text += prop->GetLabel();
1067 text += wxT(", name=");
1068 text += m_pPropGridManager->GetPropertyName(prop);
1069 sb->SetStatusText( text );
1070 }
1071 else
1072 {
1073 sb->SetStatusText( wxEmptyString );
1074 }
1075#endif
1076}
1077
1078// -----------------------------------------------------------------------
1079
1080void FormMain::OnPropertyGridItemDoubleClick( wxPropertyGridEvent& event )
1081{
1082#if wxUSE_STATUSBAR
1083 wxPGProperty* prop = event.GetProperty();
1084 wxStatusBar* sb = GetStatusBar();
1085 if ( prop )
1086 {
1087 wxString text(wxT("Double-clicked: "));
1088 text += prop->GetLabel();
1089 text += wxT(", name=");
1090 text += m_pPropGridManager->GetPropertyName(prop);
1091 sb->SetStatusText ( text );
1092 }
1093 else
1094 {
1095 sb->SetStatusText ( wxEmptyString );
1096 }
1097#endif
1098}
1099
1100// -----------------------------------------------------------------------
1101
1102void FormMain::OnPropertyGridButtonClick ( wxCommandEvent& )
1103{
1104#if wxUSE_STATUSBAR
0f457f4d 1105 wxPGProperty* prop = m_pPropGridManager->GetSelection();
1c4293cb
VZ
1106 wxStatusBar* sb = GetStatusBar();
1107 if ( prop )
1108 {
1109 wxString text(wxT("Button clicked: "));
1110 text += m_pPropGridManager->GetPropertyLabel(prop);
1111 text += wxT(", name=");
1112 text += m_pPropGridManager->GetPropertyName(prop);
1113 sb->SetStatusText( text );
1114 }
1115 else
1116 {
1117 ::wxMessageBox(wxT("SHOULD NOT HAPPEN!!!"));
1118 }
1119#endif
1120}
1121
1122// -----------------------------------------------------------------------
1123
1124void FormMain::OnPropertyGridItemCollapse( wxPropertyGridEvent& )
1125{
9d136b8b 1126 wxLogMessage(wxT("Item was Collapsed"));
1c4293cb
VZ
1127}
1128
1129// -----------------------------------------------------------------------
1130
1131void FormMain::OnPropertyGridItemExpand( wxPropertyGridEvent& )
1132{
9d136b8b 1133 wxLogMessage(wxT("Item was Expanded"));
1c4293cb
VZ
1134}
1135
1136// -----------------------------------------------------------------------
1137
5405bfb4
JS
1138void FormMain::OnPropertyGridColBeginDrag( wxPropertyGridEvent& event )
1139{
1140 if ( m_itemVetoDragging->IsChecked() )
1141 {
9d136b8b 1142 wxLogMessage("Splitter %i resize was vetoed", event.GetColumn());
5405bfb4
JS
1143 event.Veto();
1144 }
1145 else
1146 {
9d136b8b 1147 wxLogMessage("Splitter %i resize began", event.GetColumn());
5405bfb4
JS
1148 }
1149}
1150
1151// -----------------------------------------------------------------------
1152
1153void FormMain::OnPropertyGridColDragging( wxPropertyGridEvent& event )
1154{
9d136b8b 1155 wxUnusedVar(event);
5405bfb4 1156 // For now, let's not spam the log output
9d136b8b 1157 //wxLogMessage("Splitter %i is being resized", event.GetColumn());
5405bfb4
JS
1158}
1159
1160// -----------------------------------------------------------------------
1161
1162void FormMain::OnPropertyGridColEndDrag( wxPropertyGridEvent& event )
1163{
9d136b8b 1164 wxLogMessage("Splitter %i resize ended", event.GetColumn());
5405bfb4
JS
1165}
1166
1167// -----------------------------------------------------------------------
1168
1c4293cb
VZ
1169// EVT_TEXT handling
1170void FormMain::OnPropertyGridTextUpdate( wxCommandEvent& event )
1171{
1172 event.Skip();
1173}
1174
1175// -----------------------------------------------------------------------
1176
1177void FormMain::OnPropertyGridKeyEvent( wxKeyEvent& WXUNUSED(event) )
1178{
1179 // Occurs on wxGTK mostly, but not wxMSW.
1180}
1181
1182// -----------------------------------------------------------------------
1183
1184void FormMain::OnLabelTextChange( wxCommandEvent& WXUNUSED(event) )
1185{
1186// Uncomment following to allow property label modify in real-time
1187// wxPGProperty& p = m_pPropGridManager->GetGrid()->GetSelection();
1188// if ( !p.IsOk() ) return;
1189// m_pPropGridManager->SetPropertyLabel( p, m_tcPropLabel->DoGetValue() );
1190}
1191
1192// -----------------------------------------------------------------------
1193
1194static const wxChar* _fs_windowstyle_labels[] = {
1195 wxT("wxSIMPLE_BORDER"),
1196 wxT("wxDOUBLE_BORDER"),
1197 wxT("wxSUNKEN_BORDER"),
1198 wxT("wxRAISED_BORDER"),
1199 wxT("wxNO_BORDER"),
1200 wxT("wxTRANSPARENT_WINDOW"),
1201 wxT("wxTAB_TRAVERSAL"),
1202 wxT("wxWANTS_CHARS"),
1203#if wxNO_FULL_REPAINT_ON_RESIZE
1204 wxT("wxNO_FULL_REPAINT_ON_RESIZE"),
1205#endif
1206 wxT("wxVSCROLL"),
1207 wxT("wxALWAYS_SHOW_SB"),
1208 wxT("wxCLIP_CHILDREN"),
1209#if wxFULL_REPAINT_ON_RESIZE
1210 wxT("wxFULL_REPAINT_ON_RESIZE"),
1211#endif
1212 (const wxChar*) NULL // terminator is always needed
1213};
1214
1215static const long _fs_windowstyle_values[] = {
1216 wxSIMPLE_BORDER,
1217 wxDOUBLE_BORDER,
1218 wxSUNKEN_BORDER,
1219 wxRAISED_BORDER,
1220 wxNO_BORDER,
1221 wxTRANSPARENT_WINDOW,
1222 wxTAB_TRAVERSAL,
1223 wxWANTS_CHARS,
1224#if wxNO_FULL_REPAINT_ON_RESIZE
1225 wxNO_FULL_REPAINT_ON_RESIZE,
1226#endif
1227 wxVSCROLL,
1228 wxALWAYS_SHOW_SB,
1229 wxCLIP_CHILDREN,
1230#if wxFULL_REPAINT_ON_RESIZE
1231 wxFULL_REPAINT_ON_RESIZE
1232#endif
1233};
1234
1235static const wxChar* _fs_framestyle_labels[] = {
1236 wxT("wxCAPTION"),
1237 wxT("wxMINIMIZE"),
1238 wxT("wxMAXIMIZE"),
1239 wxT("wxCLOSE_BOX"),
1240 wxT("wxSTAY_ON_TOP"),
1241 wxT("wxSYSTEM_MENU"),
1242 wxT("wxRESIZE_BORDER"),
1243 wxT("wxFRAME_TOOL_WINDOW"),
1244 wxT("wxFRAME_NO_TASKBAR"),
1245 wxT("wxFRAME_FLOAT_ON_PARENT"),
1246 wxT("wxFRAME_SHAPED"),
1247 (const wxChar*) NULL
1248};
1249
1250static const long _fs_framestyle_values[] = {
1251 wxCAPTION,
1252 wxMINIMIZE,
1253 wxMAXIMIZE,
1254 wxCLOSE_BOX,
1255 wxSTAY_ON_TOP,
1256 wxSYSTEM_MENU,
1257 wxRESIZE_BORDER,
1258 wxFRAME_TOOL_WINDOW,
1259 wxFRAME_NO_TASKBAR,
1260 wxFRAME_FLOAT_ON_PARENT,
1261 wxFRAME_SHAPED
1262};
1263
1264// -----------------------------------------------------------------------
1265
1266void FormMain::OnTestXRC(wxCommandEvent& WXUNUSED(event))
1267{
1268 wxMessageBox(wxT("Sorrt, not yet implemented"));
1269}
1270
1271void FormMain::OnEnableCommonValues(wxCommandEvent& WXUNUSED(event))
1272{
0f457f4d 1273 wxPGProperty* prop = m_pPropGridManager->GetSelection();
1c4293cb
VZ
1274 if ( prop )
1275 prop->EnableCommonValue();
1276 else
1277 wxMessageBox(wxT("First select a property"));
1278}
1279
1280void FormMain::PopulateWithStandardItems ()
1281{
1282 wxPropertyGridManager* pgman = m_pPropGridManager;
1283 wxPropertyGridPage* pg = pgman->GetPage(wxT("Standard Items"));
1284
1285 // Append is ideal way to add items to wxPropertyGrid.
1286 pg->Append( new wxPropertyCategory(wxT("Appearance"),wxPG_LABEL) );
1287
1288 pg->Append( new wxStringProperty(wxT("Label"),wxPG_LABEL,GetTitle()) );
1289 pg->Append( new wxFontProperty(wxT("Font"),wxPG_LABEL) );
1290 pg->SetPropertyHelpString ( wxT("Font"), wxT("Editing this will change font used in the property grid.") );
1291
1292 pg->Append( new wxSystemColourProperty(wxT("Margin Colour"),wxPG_LABEL,
1293 pg->GetGrid()->GetMarginColour()) );
1294
1295 pg->Append( new wxSystemColourProperty(wxT("Cell Colour"),wxPG_LABEL,
1296 pg->GetGrid()->GetCellBackgroundColour()) );
1297 pg->Append( new wxSystemColourProperty(wxT("Cell Text Colour"),wxPG_LABEL,
1298 pg->GetGrid()->GetCellTextColour()) );
1299 pg->Append( new wxSystemColourProperty(wxT("Line Colour"),wxPG_LABEL,
1300 pg->GetGrid()->GetLineColour()) );
1301 pg->Append( new wxFlagsProperty(wxT("Window Styles"),wxPG_LABEL,
1302 m_combinedFlags, GetWindowStyle()) );
1303
1304 //pg->SetPropertyAttribute(wxT("Window Styles"),wxPG_BOOL_USE_CHECKBOX,true,wxPG_RECURSE);
1305
1306 pg->Append( new wxCursorProperty(wxT("Cursor"),wxPG_LABEL) );
1307
1308 pg->Append( new wxPropertyCategory(wxT("Position"),wxT("PositionCategory")) );
1309 pg->SetPropertyHelpString( wxT("PositionCategory"), wxT("Change in items in this category will cause respective changes in frame.") );
1310
1311 // Let's demonstrate 'Units' attribute here
1312
1313 // Note that we use many attribute constants instead of strings here
1314 // (for instance, wxPG_ATTR_MIN, instead of wxT("min")).
1315 // Using constant may reduce binary size.
1316
1317 pg->Append( new wxIntProperty(wxT("Height"),wxPG_LABEL,480) );
1318 pg->SetPropertyAttribute(wxT("Height"), wxPG_ATTR_MIN, (long)10 );
1319 pg->SetPropertyAttribute(wxT("Height"), wxPG_ATTR_MAX, (long)2048 );
1320 pg->SetPropertyAttribute(wxT("Height"), wxPG_ATTR_UNITS, wxT("Pixels") );
1321
1322 // Set value to unspecified so that InlineHelp attribute will be demonstrated
1323 pg->SetPropertyValueUnspecified(wxT("Height"));
1324 pg->SetPropertyAttribute(wxT("Height"), wxPG_ATTR_INLINE_HELP, wxT("Enter new height for window") );
1325 pg->SetPropertyHelpString(wxT("Height"), wxT("This property uses attributes \"Units\" and \"InlineHelp\".") );
1326
1327 pg->Append( new wxIntProperty(wxT("Width"),wxPG_LABEL,640) );
1328 pg->SetPropertyAttribute(wxT("Width"), wxPG_ATTR_MIN, (long)10 );
1329 pg->SetPropertyAttribute(wxT("Width"), wxPG_ATTR_MAX, (long)2048 );
1330 pg->SetPropertyAttribute(wxT("Width"), wxPG_ATTR_UNITS, wxT("Pixels") );
1331
1332 pg->SetPropertyValueUnspecified(wxT("Width"));
1333 pg->SetPropertyAttribute(wxT("Width"), wxPG_ATTR_INLINE_HELP, wxT("Enter new width for window") );
1334 pg->SetPropertyHelpString(wxT("Width"), wxT("This property uses attributes \"Units\" and \"InlineHelp\".") );
1335
1336 pg->Append( new wxIntProperty(wxT("X"),wxPG_LABEL,10) );
1337 pg->SetPropertyAttribute(wxT("X"), wxPG_ATTR_UNITS, wxT("Pixels") );
1338 pg->SetPropertyHelpString(wxT("X"), wxT("This property uses \"Units\" attribute.") );
1339
1340 pg->Append( new wxIntProperty(wxT("Y"),wxPG_LABEL,10) );
1341 pg->SetPropertyAttribute(wxT("Y"), wxPG_ATTR_UNITS, wxT("Pixels") );
1342 pg->SetPropertyHelpString(wxT("Y"), wxT("This property uses \"Units\" attribute.") );
1343
1344 const wxChar* disabledHelpString = wxT("This property is simply disabled. Inorder to have label disabled as well, ")
1345 wxT("you need to set wxPG_EX_GREY_LABEL_WHEN_DISABLED using SetExtraStyle.");
1346
1347 pg->Append( new wxPropertyCategory(wxT("Environment"),wxPG_LABEL) );
1348 pg->Append( new wxStringProperty(wxT("Operating System"),wxPG_LABEL,::wxGetOsDescription()) );
1349
1350 pg->Append( new wxStringProperty(wxT("User Id"),wxPG_LABEL,::wxGetUserId()) );
1351 pg->Append( new wxDirProperty(wxT("User Home"),wxPG_LABEL,::wxGetUserHome()) );
1352 pg->Append( new wxStringProperty(wxT("User Name"),wxPG_LABEL,::wxGetUserName()) );
1353
1354 // Disable some of them
1355 pg->DisableProperty( wxT("Operating System") );
1356 pg->DisableProperty( wxT("User Id") );
1357 pg->DisableProperty( wxT("User Name") );
1358
1359 pg->SetPropertyHelpString( wxT("Operating System"), disabledHelpString );
1360 pg->SetPropertyHelpString( wxT("User Id"), disabledHelpString );
1361 pg->SetPropertyHelpString( wxT("User Name"), disabledHelpString );
1362
1363 pg->Append( new wxPropertyCategory(wxT("More Examples"),wxPG_LABEL) );
1364
1365 pg->Append( new wxFontDataProperty( wxT("FontDataProperty"), wxPG_LABEL) );
1366 pg->SetPropertyHelpString( wxT("FontDataProperty"),
1367 wxT("This demonstrates wxFontDataProperty class defined in this sample app. ")
1368 wxT("It is exactly like wxFontProperty from the library, but also has colour sub-property.")
1369 );
1370
1371 pg->Append( new wxDirsProperty(wxT("DirsProperty"),wxPG_LABEL) );
1372 pg->SetPropertyHelpString( wxT("DirsProperty"),
1373 wxT("This demonstrates wxDirsProperty class defined in this sample app. ")
1374 wxT("It is built with WX_PG_IMPLEMENT_ARRAYSTRING_PROPERTY_WITH_VALIDATOR macro, ")
1375 wxT("with custom action (dir dialog popup) defined.")
1376 );
1377
1378 pg->Append( new wxAdvImageFileProperty(wxT("AdvImageFileProperty"),wxPG_LABEL) );
1379 pg->SetPropertyHelpString( wxT("AdvImageFileProperty"),
1380 wxT("This demonstrates wxAdvImageFileProperty class defined in this sample app. ")
1381 wxT("Button can be used to add new images to the popup list.")
1382 );
1383
1384 wxArrayDouble arrdbl;
1385 arrdbl.Add(-1.0);
1386 arrdbl.Add(-0.5);
1387 arrdbl.Add(0.0);
1388 arrdbl.Add(0.5);
1389 arrdbl.Add(1.0);
1390
1391 pg->Append( new wxArrayDoubleProperty(wxT("ArrayDoubleProperty"),wxPG_LABEL,arrdbl) );
1392 //pg->SetPropertyAttribute(wxT("ArrayDoubleProperty"),wxPG_FLOAT_PRECISION,(long)2);
1393 pg->SetPropertyHelpString( wxT("ArrayDoubleProperty"),
1394 wxT("This demonstrates wxArrayDoubleProperty class defined in this sample app. ")
1395 wxT("It is an example of a custom list editor property.")
1396 );
1397
1398 pg->Append( new wxLongStringProperty(wxT("Information"),wxPG_LABEL,
1399 wxT("Editing properties will have immediate effect on this window, ")
1400 wxT("and vice versa (atleast in most cases, that is).")
1401 ) );
1402 pg->SetPropertyHelpString( wxT("Information"),
1403 wxT("This property is read-only.") );
1404
1405 pg->SetPropertyReadOnly( wxT("Information"), true );
1406
1407 //
1408 // Set test information for cells in columns 3 and 4
1409 // (reserve column 2 for displaying units)
1410 wxPropertyGridIterator it;
1411 wxBitmap bmp = wxArtProvider::GetBitmap(wxART_FOLDER);
1412
1413 for ( it = pg->GetGrid()->GetIterator();
1414 !it.AtEnd();
1415 it++ )
1416 {
1417 wxPGProperty* p = *it;
1418 if ( p->IsCategory() )
1419 continue;
1420
1421 pg->SetPropertyCell( p, 3, wxT("Cell 3"), bmp );
1422 pg->SetPropertyCell( p, 4, wxT("Cell 4"), wxNullBitmap, *wxWHITE, *wxBLACK );
1423 }
1424}
1425
1426// -----------------------------------------------------------------------
1427
1428void FormMain::PopulateWithExamples ()
1429{
1430 wxPropertyGridManager* pgman = m_pPropGridManager;
1431 wxPropertyGridPage* pg = pgman->GetPage(wxT("Examples"));
1432 wxPGProperty* pid;
d5774494 1433 wxPGProperty* prop;
1c4293cb
VZ
1434
1435 //pg->Append( new wxPropertyCategory(wxT("Examples (low priority)"),wxT("Examples")) );
1436 //pg->SetPropertyHelpString ( wxT("Examples"), wxT("This category has example of (almost) every built-in property class.") );
1437
1438#if wxUSE_SPINBTN
1439 pg->Append( new wxIntProperty ( wxT("SpinCtrl"), wxPG_LABEL, 0 ) );
1440
58f43b41 1441 pg->SetPropertyEditor( wxT("SpinCtrl"), wxPGEditor_SpinCtrl );
1c4293cb 1442 pg->SetPropertyAttribute( wxT("SpinCtrl"), wxPG_ATTR_MIN, (long)-10 ); // Use constants instead of string
8a337f95 1443 pg->SetPropertyAttribute( wxT("SpinCtrl"), wxPG_ATTR_MAX, (long)16384 ); // for reduced binary size.
1c4293cb 1444 pg->SetPropertyAttribute( wxT("SpinCtrl"), wxT("Step"), (long)2 );
18e046a7 1445 pg->SetPropertyAttribute( wxT("SpinCtrl"), wxT("MotionSpin"), true );
1c4293cb
VZ
1446 //pg->SetPropertyAttribute( wxT("SpinCtrl"), wxT("Wrap"), true );
1447
1448 pg->SetPropertyHelpString( wxT("SpinCtrl"),
1449 wxT("This is regular wxIntProperty, which editor has been ")
58f43b41 1450 wxT("changed to wxPGEditor_SpinCtrl. Note however that ")
1c4293cb
VZ
1451 wxT("static wxPropertyGrid::RegisterAdditionalEditors() ")
1452 wxT("needs to be called prior to using it."));
1453
1454#endif
1455
1456 // Add bool property
1457 pg->Append( new wxBoolProperty( wxT("BoolProperty"), wxPG_LABEL, false ) );
1458
1459 // Add bool property with check box
1460 pg->Append( new wxBoolProperty( wxT("BoolProperty with CheckBox"), wxPG_LABEL, false ) );
1461 pg->SetPropertyAttribute( wxT("BoolProperty with CheckBox"),
1462 wxPG_BOOL_USE_CHECKBOX,
1463 true );
1464
1465 pg->SetPropertyHelpString( wxT("BoolProperty with CheckBox"),
1466 wxT("Property attribute wxPG_BOOL_USE_CHECKBOX has been set to true.") );
1467
1c4293cb
VZ
1468 pid = pg->Append( new wxFloatProperty( wxT("FloatProperty"),
1469 wxPG_LABEL,
1470 1234500.23 ) );
1471
1472 // A string property that can be edited in a separate editor dialog.
1473 pg->Append( new wxLongStringProperty( wxT("LongStringProperty"), wxT("LongStringProp"),
1474 wxT("This is much longer string than the first one. Edit it by clicking the button.") ) );
1475
1476 // A property that edits a wxArrayString.
1477 wxArrayString example_array;
1478 example_array.Add( wxT("String 1"));
1479 example_array.Add( wxT("String 2"));
1480 example_array.Add( wxT("String 3"));
1481 pg->Append( new wxArrayStringProperty( wxT("ArrayStringProperty"), wxPG_LABEL,
1482 example_array) );
1483
1484 // Test adding same category multiple times ( should not actually create a new one )
1485 //pg->Append( new wxPropertyCategory(wxT("Examples (low priority)"),wxT("Examples")) );
1486
1487 // A file selector property. Note that argument between name
1488 // and initial value is wildcard (format same as in wxFileDialog).
d5774494 1489 prop = new wxFileProperty( wxT("FileProperty"), wxT("TextFile") );
1c4293cb
VZ
1490 pg->Append( prop );
1491
1492 prop->SetAttribute(wxPG_FILE_WILDCARD,wxT("Text Files (*.txt)|*.txt"));
1493 prop->SetAttribute(wxPG_FILE_DIALOG_TITLE,wxT("Custom File Dialog Title"));
1494 prop->SetAttribute(wxPG_FILE_SHOW_FULL_PATH,false);
1495
1496#ifdef __WXMSW__
1497 prop->SetAttribute(wxPG_FILE_SHOW_RELATIVE_PATH,wxT("C:\\Windows"));
1498 pg->SetPropertyValue(prop,wxT("C:\\Windows\\System32\\msvcrt71.dll"));
1499#endif
1500
1501#if wxUSE_IMAGE
1502 // An image file property. Arguments are just like for FileProperty, but
1503 // wildcard is missing (it is autogenerated from supported image formats).
1504 // If you really need to override it, create property separately, and call
1505 // its SetWildcard method.
1506 pg->Append( new wxImageFileProperty( wxT("ImageFile"), wxPG_LABEL ) );
1507#endif
1508
1509 pid = pg->Append( new wxColourProperty(wxT("ColourProperty"),wxPG_LABEL,*wxRED) );
1510 //pg->SetPropertyAttribute(pid,wxPG_COLOUR_ALLOW_CUSTOM,false);
58f43b41 1511 pg->SetPropertyEditor( wxT("ColourProperty"), wxPGEditor_ComboBox );
1c4293cb
VZ
1512 pg->GetProperty(wxT("ColourProperty"))->SetFlag(wxPG_PROP_AUTO_UNSPECIFIED);
1513 pg->SetPropertyHelpString( wxT("ColourProperty"),
1514 wxT("wxPropertyGrid::SetPropertyEditor method has been used to change ")
58f43b41 1515 wxT("editor of this property to wxPGEditor_ComboBox)"));
1c4293cb
VZ
1516
1517 //
1518 // This demonstrates using alternative editor for colour property
1519 // to trigger colour dialog directly from button.
1520 pg->Append( new wxColourProperty(wxT("ColourProperty2"),wxPG_LABEL,*wxGREEN) );
1521
1522 //
1523 // wxEnumProperty does not store strings or even list of strings
1524 // ( so that's why they are static in function ).
1525 static const wxChar* enum_prop_labels[] = { wxT("One Item"),
1526 wxT("Another Item"), wxT("One More"), wxT("This Is Last"), NULL };
1527
1528 // this value array would be optional if values matched string indexes
1529 static long enum_prop_values[] = { 40, 80, 120, 160 };
1530
1531 // note that the initial value (the last argument) is the actual value,
1532 // not index or anything like that. Thus, our value selects "Another Item".
1533 //
1534 // 0 before value is number of items. If it is 0, like in our example,
1535 // number of items is calculated, and this requires that the string pointer
1536 // array is terminated with NULL.
1537 pg->Append( new wxEnumProperty(wxT("EnumProperty"),wxPG_LABEL,
1538 enum_prop_labels, enum_prop_values, 80 ) );
1539
1540 wxPGChoices soc;
1541
1542 // use basic table from our previous example
1543 // can also set/add wxArrayStrings and wxArrayInts directly.
1544 soc.Set( enum_prop_labels, enum_prop_values );
1545
1546 // add extra items
1547 soc.Add( wxT("Look, it continues"), 200 );
1548 soc.Add( wxT("Even More"), 240 );
1549 soc.Add( wxT("And More"), 280 );
1550 soc.Add( wxT("True End of the List"), 320 );
1551
1552 // Test custom colours ([] operator of wxPGChoices returns
1553 // references to wxPGChoiceEntry).
1554 soc[1].SetFgCol(*wxRED);
1555 soc[1].SetBgCol(*wxLIGHT_GREY);
1556 soc[2].SetFgCol(*wxGREEN);
1557 soc[2].SetBgCol(*wxLIGHT_GREY);
1558 soc[3].SetFgCol(*wxBLUE);
1559 soc[3].SetBgCol(*wxLIGHT_GREY);
1560 soc[4].SetBitmap(wxArtProvider::GetBitmap(wxART_FOLDER));
1561
1562 pg->Append( new wxEnumProperty(wxT("EnumProperty 2"),
1563 wxPG_LABEL,
1564 soc,
1565 240) );
939d9364 1566 pg->GetProperty(wxT("EnumProperty 2"))->AddChoice(wxT("Testing Extra"), 360);
1c4293cb 1567
2728c3bf
JS
1568 // Here we only display the original 'soc' choices
1569 pg->Append( new wxEnumProperty(wxT("EnumProperty 3"),wxPG_LABEL,
1c4293cb 1570 soc, 240 ) );
1c4293cb 1571
2728c3bf
JS
1572 // 'soc' plus one exclusive extra choice "4th only"
1573 pg->Append( new wxEnumProperty(wxT("EnumProperty 4"),wxPG_LABEL,
1c4293cb 1574 soc, 240 ) );
2728c3bf 1575 pg->GetProperty(wxT("EnumProperty 4"))->AddChoice(wxT("4th only"), 360);
939d9364 1576
2728c3bf
JS
1577 pg->SetPropertyHelpString(wxT("EnumProperty 4"),
1578 wxT("Should have one extra item when compared to EnumProperty 3"));
1c4293cb
VZ
1579
1580 // Password property example.
1581 pg->Append( new wxStringProperty(wxT("Password"),wxPG_LABEL, wxT("password")) );
1582 pg->SetPropertyAttribute( wxT("Password"), wxPG_STRING_PASSWORD, true );
1583 pg->SetPropertyHelpString( wxT("Password"),
1584 wxT("Has attribute wxPG_STRING_PASSWORD set to true") );
1585
1586 // String editor with dir selector button. Uses wxEmptyString as name, which
1587 // is allowed (naturally, in this case property cannot be accessed by name).
1588 pg->Append( new wxDirProperty( wxT("DirProperty"), wxPG_LABEL, ::wxGetUserHome()) );
1589 pg->SetPropertyAttribute( wxT("DirProperty"),
1590 wxPG_DIR_DIALOG_MESSAGE,
1591 wxT("This is a custom dir dialog message") );
1592
1593 // Add string property - first arg is label, second name, and third initial value
1594 pg->Append( new wxStringProperty ( wxT("StringProperty"), wxPG_LABEL ) );
1595 pg->SetPropertyMaxLength( wxT("StringProperty"), 6 );
1596 pg->SetPropertyHelpString( wxT("StringProperty"),
1597 wxT("Max length of this text has been limited to 6, using wxPropertyGrid::SetPropertyMaxLength.") );
1598
1599 // Set value after limiting so that it will be applied
1600 pg->SetPropertyValue( wxT("StringProperty"), wxT("some text") );
1601
66fb9e12
JS
1602 //
1603 // Demonstrate "AutoComplete" attribute
1604 pg->Append( new wxStringProperty( "StringProperty AutoComplete",
1605 wxPG_LABEL ) );
1606
1607 wxArrayString autoCompleteStrings;
1608 autoCompleteStrings.Add("One choice");
1609 autoCompleteStrings.Add("Another choice");
1610 autoCompleteStrings.Add("Another choice, yeah");
1611 autoCompleteStrings.Add("Yet another choice");
1612 autoCompleteStrings.Add("Yet another choice, bear with me");
1613 pg->SetPropertyAttribute( "StringProperty AutoComplete",
1614 "AutoComplete",
1615 autoCompleteStrings );
1616
1617 pg->SetPropertyHelpString( "StringProperty AutoComplete",
1618 "AutoComplete attribute has been set for this property "
1619 "(try writing something beginning with 'a', 'o' or 'y').");
1620
4aee8334
JS
1621 // Add string property with arbitrarily wide bitmap in front of it. We
1622 // intentionally lower-than-typical row height here so that the ugly
1623 // scaling code wont't be run.
1624 pg->Append( new wxStringProperty( wxT("StringPropertyWithBitmap"),
1625 wxPG_LABEL,
1626 wxT("Test Text")) );
1627 wxBitmap myTestBitmap(60, 15, 32);
1628 wxMemoryDC mdc;
1629 mdc.SelectObject(myTestBitmap);
1630 mdc.Clear();
1631 mdc.SetPen(*wxBLACK);
1632 mdc.DrawLine(0, 0, 60, 15);
1633 mdc.SelectObject(wxNullBitmap);
1634 pg->SetPropertyImage( wxT("StringPropertyWithBitmap"), myTestBitmap );
1635
1c4293cb
VZ
1636
1637 // this value array would be optional if values matched string indexes
1638 //long flags_prop_values[] = { wxICONIZE, wxCAPTION, wxMINIMIZE_BOX, wxMAXIMIZE_BOX };
1639
1640 //pg->Append( wxFlagsProperty(wxT("Example of FlagsProperty"),wxT("FlagsProp"),
1641 // flags_prop_labels, flags_prop_values, 0, GetWindowStyle() ) );
1642
1643
1644 // Multi choice dialog.
1645 wxArrayString tchoices;
1646 tchoices.Add(wxT("Cabbage"));
1647 tchoices.Add(wxT("Carrot"));
1648 tchoices.Add(wxT("Onion"));
1649 tchoices.Add(wxT("Potato"));
1650 tchoices.Add(wxT("Strawberry"));
1651
1652 wxArrayString tchoicesValues;
1653 tchoicesValues.Add(wxT("Carrot"));
1654 tchoicesValues.Add(wxT("Potato"));
1655
1656 pg->Append( new wxEnumProperty(wxT("EnumProperty X"),wxPG_LABEL, tchoices ) );
1657
1658 pg->Append( new wxMultiChoiceProperty( wxT("MultiChoiceProperty"), wxPG_LABEL,
1659 tchoices, tchoicesValues ) );
1660 pg->SetPropertyAttribute( wxT("MultiChoiceProperty"), wxT("UserStringMode"), true );
1661
1662 pg->Append( new wxSizeProperty( wxT("SizeProperty"), wxT("Size"), GetSize() ) );
1663 pg->Append( new wxPointProperty( wxT("PointProperty"), wxT("Position"), GetPosition() ) );
1664
1c4293cb
VZ
1665 // UInt samples
1666 pg->Append( new wxUIntProperty( wxT("UIntProperty"), wxPG_LABEL, wxULongLong(wxULL(0xFEEEFEEEFEEE))));
1667 pg->SetPropertyAttribute( wxT("UIntProperty"), wxPG_UINT_PREFIX, wxPG_PREFIX_NONE );
1668 pg->SetPropertyAttribute( wxT("UIntProperty"), wxPG_UINT_BASE, wxPG_BASE_HEX );
1669 //pg->SetPropertyAttribute( wxT("UIntProperty"), wxPG_UINT_PREFIX, wxPG_PREFIX_NONE );
1670 //pg->SetPropertyAttribute( wxT("UIntProperty"), wxPG_UINT_BASE, wxPG_BASE_OCT );
1671
1672 //
1673 // wxEditEnumProperty
1674 wxPGChoices eech;
1675 eech.Add(wxT("Choice 1"));
1676 eech.Add(wxT("Choice 2"));
1677 eech.Add(wxT("Choice 3"));
97f16261
JS
1678 pg->Append( new wxEditEnumProperty("EditEnumProperty",
1679 wxPG_LABEL,
1680 eech,
1681 "Choice not in the list") );
1c4293cb
VZ
1682
1683 //wxString v_;
1684 //wxTextValidator validator1(wxFILTER_NUMERIC,&v_);
1685 //pg->SetPropertyValidator( wxT("EditEnumProperty"), validator1 );
1686
1687#if wxUSE_DATETIME
1688 //
1689 // wxDateTimeProperty
1690 pg->Append( new wxDateProperty(wxT("DateProperty"), wxPG_LABEL, wxDateTime::Now() ) );
1691
1692#if wxUSE_DATEPICKCTRL
1693 pg->SetPropertyAttribute( wxT("DateProperty"), wxPG_DATE_PICKER_STYLE,
b6fd0b42
JS
1694 (long)(wxDP_DROPDOWN |
1695 wxDP_SHOWCENTURY |
1696 wxDP_ALLOWNONE) );
1c4293cb
VZ
1697
1698 pg->SetPropertyHelpString( wxT("DateProperty"),
b6fd0b42
JS
1699 wxT("Attribute wxPG_DATE_PICKER_STYLE has been set to (long)")
1700 wxT("(wxDP_DROPDOWN | wxDP_SHOWCENTURY | wxDP_ALLOWNONE).") );
1c4293cb
VZ
1701#endif
1702
1703#endif
1704
1705 //
1706 // Add Triangle properties as both wxTriangleProperty and
1707 // a generic parent property (using wxStringProperty).
1708 //
1709 wxPGProperty* topId = pg->Append( new wxStringProperty(wxT("3D Object"), wxPG_LABEL, wxT("<composed>")) );
1710
1711 pid = pg->AppendIn( topId, new wxStringProperty(wxT("Triangle 1"), wxT("Triangle 1"), wxT("<composed>")) );
d665918b
JS
1712 pg->AppendIn( pid, new wxVectorProperty( wxT("A"), wxPG_LABEL ) );
1713 pg->AppendIn( pid, new wxVectorProperty( wxT("B"), wxPG_LABEL ) );
1714 pg->AppendIn( pid, new wxVectorProperty( wxT("C"), wxPG_LABEL ) );
1c4293cb
VZ
1715
1716 pg->AppendIn( topId, new wxTriangleProperty( wxT("Triangle 2"), wxT("Triangle 2") ) );
1717
1718 pg->SetPropertyHelpString( wxT("3D Object"),
1719 wxT("3D Object is wxStringProperty with value \"<composed>\". Two of its children are similar wxStringProperties with ")
1720 wxT("three wxVectorProperty children, and other two are custom wxTriangleProperties.") );
1721
1722 pid = pg->AppendIn( topId, new wxStringProperty(wxT("Triangle 3"), wxT("Triangle 3"), wxT("<composed>")) );
d665918b
JS
1723 pg->AppendIn( pid, new wxVectorProperty( wxT("A"), wxPG_LABEL ) );
1724 pg->AppendIn( pid, new wxVectorProperty( wxT("B"), wxPG_LABEL ) );
1725 pg->AppendIn( pid, new wxVectorProperty( wxT("C"), wxPG_LABEL ) );
1c4293cb
VZ
1726
1727 pg->AppendIn( topId, new wxTriangleProperty( wxT("Triangle 4"), wxT("Triangle 4") ) );
1728
1729 //
1730 // This snippet is a doc sample test
1731 //
bba3f9b5
JS
1732 wxPGProperty* carProp = pg->Append(new wxStringProperty(wxT("Car"),
1733 wxPG_LABEL,
1734 wxT("<composed>")));
1735
1736 pg->AppendIn(carProp, new wxStringProperty(wxT("Model"),
1737 wxPG_LABEL,
1738 wxT("Lamborghini Diablo SV")));
1c4293cb 1739
bba3f9b5 1740 pg->AppendIn(carProp, new wxIntProperty(wxT("Engine Size (cc)"),
1c4293cb 1741 wxPG_LABEL,
bba3f9b5 1742 5707) );
1c4293cb 1743
bba3f9b5
JS
1744 wxPGProperty* speedsProp = pg->AppendIn(carProp,
1745 new wxStringProperty(wxT("Speeds"),
1746 wxPG_LABEL,
1747 wxT("<composed>")));
1c4293cb 1748
bba3f9b5
JS
1749 pg->AppendIn( speedsProp, new wxIntProperty(wxT("Max. Speed (mph)"),
1750 wxPG_LABEL,290) );
1751 pg->AppendIn( speedsProp, new wxFloatProperty(wxT("0-100 mph (sec)"),
1752 wxPG_LABEL,3.9) );
1753 pg->AppendIn( speedsProp, new wxFloatProperty(wxT("1/4 mile (sec)"),
1754 wxPG_LABEL,8.6) );
1c4293cb 1755
bba3f9b5 1756 // This is how child property can be referred to by name
1c4293cb
VZ
1757 pg->SetPropertyValue( wxT("Car.Speeds.Max. Speed (mph)"), 300 );
1758
bba3f9b5
JS
1759 pg->AppendIn(carProp, new wxIntProperty(wxT("Price ($)"),
1760 wxPG_LABEL,
1761 300000) );
1762
80f71102
JS
1763 pg->AppendIn(carProp, new wxBoolProperty(wxT("Convertible"),
1764 wxPG_LABEL,
1765 false) );
1766
bba3f9b5
JS
1767 // Displayed value of "Car" property is now very close to this:
1768 // "Lamborghini Diablo SV; 5707 [300; 3.9; 8.6] 300000"
1c4293cb
VZ
1769
1770 //
1771 // Test wxSampleMultiButtonEditor
1c4293cb 1772 pg->Append( new wxLongStringProperty(wxT("MultipleButtons"), wxPG_LABEL) );
524d97b1 1773 pg->SetPropertyEditor(wxT("MultipleButtons"), m_pSampleMultiButtonEditor );
1c4293cb
VZ
1774
1775 // Test SingleChoiceProperty
1776 pg->Append( new SingleChoiceProperty(wxT("SingleChoiceProperty")) );
1777
1778
1779 //
1780 // Test adding variable height bitmaps in wxPGChoices
1781 wxPGChoices bc;
1782
1783 bc.Add(wxT("Wee"), wxBitmap(16, 16));
1784 bc.Add(wxT("Not so wee"), wxBitmap(32, 32));
1785 bc.Add(wxT("Friggin' huge"), wxBitmap(64, 64));
1786
1787 pg->Append( new wxEnumProperty(wxT("Variable Height Bitmaps"),
1788 wxPG_LABEL,
1789 bc,
1790 0) );
1791
1792 //
1793 // Test how non-editable composite strings appear
2fd4a524 1794 pid = new wxStringProperty(wxT("wxWidgets Traits"), wxPG_LABEL, wxT("<composed>"));
1c4293cb
VZ
1795 pg->SetPropertyReadOnly(pid);
1796
2fd4a524
JS
1797 //
1798 // For testing purposes, combine two methods of adding children
1799 //
1800
48a32cf6
JS
1801 pid->AppendChild( new wxStringProperty(wxT("Latest Release"),
1802 wxPG_LABEL,
1803 wxT("2.8.10")));
1804 pid->AppendChild( new wxBoolProperty(wxT("Win API"),
1805 wxPG_LABEL,
1806 true) );
2fd4a524
JS
1807
1808 pg->Append( pid );
1809
1c4293cb
VZ
1810 pg->AppendIn(pid, new wxBoolProperty(wxT("QT"), wxPG_LABEL, false) );
1811 pg->AppendIn(pid, new wxBoolProperty(wxT("Cocoa"), wxPG_LABEL, true) );
1812 pg->AppendIn(pid, new wxBoolProperty(wxT("BeOS"), wxPG_LABEL, false) );
1813 pg->AppendIn(pid, new wxStringProperty(wxT("SVN Trunk Version"), wxPG_LABEL, wxT("2.9.0")) );
1814 pg->AppendIn(pid, new wxBoolProperty(wxT("GTK+"), wxPG_LABEL, true) );
1815 pg->AppendIn(pid, new wxBoolProperty(wxT("Sky OS"), wxPG_LABEL, false) );
1816 pg->AppendIn(pid, new wxBoolProperty(wxT("QT"), wxPG_LABEL, false) );
1817
1818 AddTestProperties(pg);
1819}
1820
1821// -----------------------------------------------------------------------
1822
1823void FormMain::PopulateWithLibraryConfig ()
1824{
1825 wxPropertyGridManager* pgman = m_pPropGridManager;
1826 wxPropertyGridPage* pg = pgman->GetPage(wxT("wxWidgets Library Config"));
1827
1828 wxPGProperty* cat;
1829
1830 wxBitmap bmp = wxArtProvider::GetBitmap(wxART_REPORT_VIEW);
1831
1832 wxPGProperty* pid;
1833
aaf5f986
JS
1834 wxFont italicFont = pgman->GetGrid()->GetCaptionFont();
1835 italicFont.SetStyle(wxFONTSTYLE_ITALIC);
1836
1837 wxString italicFontHelp = "Font of this property's wxPGCell has "
1838 "been modified. Obtain property's cell "
1839 "with wxPGProperty::"
1840 "GetOrCreateCell(column).";
1841
1c4293cb
VZ
1842#define ADD_WX_LIB_CONF_GROUP(A) \
1843 cat = pg->AppendIn( pid, new wxPropertyCategory(A) ); \
aaf5f986
JS
1844 pg->SetPropertyCell( cat, 0, wxPG_LABEL, bmp ); \
1845 cat->GetCell(0).SetFont(italicFont); \
1846 cat->SetHelpString(italicFontHelp);
1c4293cb
VZ
1847
1848#define ADD_WX_LIB_CONF(A) pg->Append( new wxBoolProperty(wxT(#A),wxPG_LABEL,(bool)((A>0)?true:false)));
1849#define ADD_WX_LIB_CONF_NODEF(A) pg->Append( new wxBoolProperty(wxT(#A),wxPG_LABEL,(bool)false) ); \
1850 pg->DisableProperty(wxT(#A));
1851
1852 pid = pg->Append( new wxPropertyCategory( wxT("wxWidgets Library Configuration") ) );
1853 pg->SetPropertyCell( pid, 0, wxPG_LABEL, bmp );
1854
1855 ADD_WX_LIB_CONF_GROUP(wxT("Global Settings"))
1856 ADD_WX_LIB_CONF( wxUSE_GUI )
1857
1858 ADD_WX_LIB_CONF_GROUP(wxT("Compatibility Settings"))
1859#if defined(WXWIN_COMPATIBILITY_2_2)
1860 ADD_WX_LIB_CONF( WXWIN_COMPATIBILITY_2_2 )
1861#endif
1862#if defined(WXWIN_COMPATIBILITY_2_4)
1863 ADD_WX_LIB_CONF( WXWIN_COMPATIBILITY_2_4 )
1864#endif
1865#if defined(WXWIN_COMPATIBILITY_2_6)
1866 ADD_WX_LIB_CONF( WXWIN_COMPATIBILITY_2_6 )
1867#endif
1868#if defined(WXWIN_COMPATIBILITY_2_8)
1869 ADD_WX_LIB_CONF( WXWIN_COMPATIBILITY_2_8 )
1870#endif
1871#ifdef wxFONT_SIZE_COMPATIBILITY
1872 ADD_WX_LIB_CONF( wxFONT_SIZE_COMPATIBILITY )
1873#else
1874 ADD_WX_LIB_CONF_NODEF ( wxFONT_SIZE_COMPATIBILITY )
1875#endif
1876#ifdef wxDIALOG_UNIT_COMPATIBILITY
1877 ADD_WX_LIB_CONF( wxDIALOG_UNIT_COMPATIBILITY )
1878#else
1879 ADD_WX_LIB_CONF_NODEF ( wxDIALOG_UNIT_COMPATIBILITY )
1880#endif
1881
1882 ADD_WX_LIB_CONF_GROUP(wxT("Debugging Settings"))
1883 ADD_WX_LIB_CONF( wxUSE_DEBUG_CONTEXT )
1884 ADD_WX_LIB_CONF( wxUSE_MEMORY_TRACING )
1885 ADD_WX_LIB_CONF( wxUSE_GLOBAL_MEMORY_OPERATORS )
1886 ADD_WX_LIB_CONF( wxUSE_DEBUG_NEW_ALWAYS )
1887 ADD_WX_LIB_CONF( wxUSE_ON_FATAL_EXCEPTION )
1888
1889 ADD_WX_LIB_CONF_GROUP(wxT("Unicode Support"))
1890 ADD_WX_LIB_CONF( wxUSE_UNICODE )
1891 ADD_WX_LIB_CONF( wxUSE_UNICODE_MSLU )
1892 ADD_WX_LIB_CONF( wxUSE_WCHAR_T )
1893
1894 ADD_WX_LIB_CONF_GROUP(wxT("Global Features"))
1895 ADD_WX_LIB_CONF( wxUSE_EXCEPTIONS )
1896 ADD_WX_LIB_CONF( wxUSE_EXTENDED_RTTI )
1897 ADD_WX_LIB_CONF( wxUSE_STL )
1898 ADD_WX_LIB_CONF( wxUSE_LOG )
1899 ADD_WX_LIB_CONF( wxUSE_LOGWINDOW )
1900 ADD_WX_LIB_CONF( wxUSE_LOGGUI )
1901 ADD_WX_LIB_CONF( wxUSE_LOG_DIALOG )
1902 ADD_WX_LIB_CONF( wxUSE_CMDLINE_PARSER )
1903 ADD_WX_LIB_CONF( wxUSE_THREADS )
1904 ADD_WX_LIB_CONF( wxUSE_STREAMS )
1905 ADD_WX_LIB_CONF( wxUSE_STD_IOSTREAM )
1906
1907 ADD_WX_LIB_CONF_GROUP(wxT("Non-GUI Features"))
1908 ADD_WX_LIB_CONF( wxUSE_LONGLONG )
1909 ADD_WX_LIB_CONF( wxUSE_FILE )
1910 ADD_WX_LIB_CONF( wxUSE_FFILE )
1911 ADD_WX_LIB_CONF( wxUSE_FSVOLUME )
1912 ADD_WX_LIB_CONF( wxUSE_TEXTBUFFER )
1913 ADD_WX_LIB_CONF( wxUSE_TEXTFILE )
1914 ADD_WX_LIB_CONF( wxUSE_INTL )
1915 ADD_WX_LIB_CONF( wxUSE_DATETIME )
1916 ADD_WX_LIB_CONF( wxUSE_TIMER )
1917 ADD_WX_LIB_CONF( wxUSE_STOPWATCH )
1918 ADD_WX_LIB_CONF( wxUSE_CONFIG )
1919#ifdef wxUSE_CONFIG_NATIVE
1920 ADD_WX_LIB_CONF( wxUSE_CONFIG_NATIVE )
1921#else
1922 ADD_WX_LIB_CONF_NODEF ( wxUSE_CONFIG_NATIVE )
1923#endif
1924 ADD_WX_LIB_CONF( wxUSE_DIALUP_MANAGER )
1925 ADD_WX_LIB_CONF( wxUSE_DYNLIB_CLASS )
1926 ADD_WX_LIB_CONF( wxUSE_DYNAMIC_LOADER )
1927 ADD_WX_LIB_CONF( wxUSE_SOCKETS )
1928 ADD_WX_LIB_CONF( wxUSE_FILESYSTEM )
1929 ADD_WX_LIB_CONF( wxUSE_FS_ZIP )
1930 ADD_WX_LIB_CONF( wxUSE_FS_INET )
1931 ADD_WX_LIB_CONF( wxUSE_ZIPSTREAM )
1932 ADD_WX_LIB_CONF( wxUSE_ZLIB )
1933 ADD_WX_LIB_CONF( wxUSE_APPLE_IEEE )
1934 ADD_WX_LIB_CONF( wxUSE_JOYSTICK )
1935 ADD_WX_LIB_CONF( wxUSE_FONTMAP )
1936 ADD_WX_LIB_CONF( wxUSE_MIMETYPE )
1937 ADD_WX_LIB_CONF( wxUSE_PROTOCOL )
1938 ADD_WX_LIB_CONF( wxUSE_PROTOCOL_FILE )
1939 ADD_WX_LIB_CONF( wxUSE_PROTOCOL_FTP )
1940 ADD_WX_LIB_CONF( wxUSE_PROTOCOL_HTTP )
1941 ADD_WX_LIB_CONF( wxUSE_URL )
1942#ifdef wxUSE_URL_NATIVE
1943 ADD_WX_LIB_CONF( wxUSE_URL_NATIVE )
1944#else
1945 ADD_WX_LIB_CONF_NODEF ( wxUSE_URL_NATIVE )
1946#endif
1947 ADD_WX_LIB_CONF( wxUSE_REGEX )
1948 ADD_WX_LIB_CONF( wxUSE_SYSTEM_OPTIONS )
1949 ADD_WX_LIB_CONF( wxUSE_SOUND )
1950#ifdef wxUSE_XRC
1951 ADD_WX_LIB_CONF( wxUSE_XRC )
1952#else
1953 ADD_WX_LIB_CONF_NODEF ( wxUSE_XRC )
1954#endif
1955 ADD_WX_LIB_CONF( wxUSE_XML )
1956
1957 // Set them to use check box.
1958 pg->SetPropertyAttribute(pid,wxPG_BOOL_USE_CHECKBOX,true,wxPG_RECURSE);
1959}
1960
1961
1962//
1963// Handle events of the third page here.
1964class wxMyPropertyGridPage : public wxPropertyGridPage
1965{
1966public:
1967
1968 // Return false here to indicate unhandled events should be
1969 // propagated to manager's parent, as normal.
1970 virtual bool IsHandlingAllEvents() const { return false; }
1971
1972protected:
1973
1974 virtual wxPGProperty* DoInsert( wxPGProperty* parent,
1975 int index,
1976 wxPGProperty* property )
1977 {
1978 return wxPropertyGridPage::DoInsert(parent,index,property);
1979 }
1980
1981 void OnPropertySelect( wxPropertyGridEvent& event );
1982 void OnPropertyChanging( wxPropertyGridEvent& event );
1983 void OnPropertyChange( wxPropertyGridEvent& event );
1984 void OnPageChange( wxPropertyGridEvent& event );
1985
1986private:
1987 DECLARE_EVENT_TABLE()
1988};
1989
1990
1991BEGIN_EVENT_TABLE(wxMyPropertyGridPage, wxPropertyGridPage)
1992 EVT_PG_SELECTED( wxID_ANY, wxMyPropertyGridPage::OnPropertySelect )
1993 EVT_PG_CHANGING( wxID_ANY, wxMyPropertyGridPage::OnPropertyChanging )
1994 EVT_PG_CHANGED( wxID_ANY, wxMyPropertyGridPage::OnPropertyChange )
1995 EVT_PG_PAGE_CHANGED( wxID_ANY, wxMyPropertyGridPage::OnPageChange )
1996END_EVENT_TABLE()
1997
1998
1999void wxMyPropertyGridPage::OnPropertySelect( wxPropertyGridEvent& WXUNUSED(event) )
2000{
2001 wxLogDebug(wxT("wxMyPropertyGridPage::OnPropertySelect()"));
2002}
2003
2004void wxMyPropertyGridPage::OnPropertyChange( wxPropertyGridEvent& event )
2005{
2006 wxPGProperty* p = event.GetProperty();
8a28bf76 2007 wxLogVerbose(wxT("wxMyPropertyGridPage::OnPropertyChange('%s', to value '%s')"),
1c4293cb
VZ
2008 p->GetName().c_str(),
2009 p->GetDisplayedString().c_str());
2010}
2011
2012void wxMyPropertyGridPage::OnPropertyChanging( wxPropertyGridEvent& event )
2013{
2014 wxPGProperty* p = event.GetProperty();
8a28bf76 2015 wxLogVerbose(wxT("wxMyPropertyGridPage::OnPropertyChanging('%s', to value '%s')"),
1c4293cb
VZ
2016 p->GetName().c_str(),
2017 event.GetValue().GetString().c_str());
2018}
2019
2020void wxMyPropertyGridPage::OnPageChange( wxPropertyGridEvent& WXUNUSED(event) )
2021{
2022 wxLogDebug(wxT("wxMyPropertyGridPage::OnPageChange()"));
2023}
2024
2025
2026class wxPGKeyHandler : public wxEvtHandler
2027{
2028public:
2029
2030 void OnKeyEvent( wxKeyEvent& event )
2031 {
2032 wxMessageBox(wxString::Format(wxT("%i"),event.GetKeyCode()));
2033 event.Skip();
2034 }
2035private:
2036 DECLARE_EVENT_TABLE()
2037};
2038
2039BEGIN_EVENT_TABLE(wxPGKeyHandler,wxEvtHandler)
2040 EVT_KEY_DOWN( wxPGKeyHandler::OnKeyEvent )
2041END_EVENT_TABLE()
2042
2043
2044// -----------------------------------------------------------------------
2045
2046void FormMain::InitPanel()
2047{
2048 if ( m_panel )
2049 m_panel->Destroy();
2050
68f9e025
JS
2051 wxWindow* panel = new wxPanel(this, wxID_ANY,
2052 wxPoint(0, 0), wxSize(400, 400),
2053 wxTAB_TRAVERSAL);
1c4293cb
VZ
2054 m_panel = panel;
2055
2056 // Column
2057 wxBoxSizer* topSizer = new wxBoxSizer ( wxVERTICAL );
2058
2059 m_topSizer = topSizer;
2060}
2061
2062void FormMain::FinalizePanel( bool wasCreated )
2063{
68f9e025
JS
2064 // Button for tab traversal testing
2065 m_topSizer->Add( new wxButton(m_panel, wxID_ANY,
2066 wxS("Should be able to move here with Tab")),
2067 0, wxEXPAND );
2068
1c4293cb
VZ
2069 m_panel->SetSizer( m_topSizer );
2070 m_topSizer->SetSizeHints( m_panel );
2071
2072 wxBoxSizer* panelSizer = new wxBoxSizer( wxHORIZONTAL );
2073 panelSizer->Add( m_panel, 1, wxEXPAND|wxFIXED_MINSIZE );
68f9e025 2074
1c4293cb
VZ
2075 SetSizer( panelSizer );
2076 panelSizer->SetSizeHints( this );
2077
2078 if ( wasCreated )
c324ed94 2079 FinalizeFramePosition();
1c4293cb
VZ
2080}
2081
2082void FormMain::PopulateGrid()
2083{
2084 wxPropertyGridManager* pgman = m_pPropGridManager;
2085 pgman->AddPage(wxT("Standard Items"));
2086
2087 PopulateWithStandardItems();
2088
2089 pgman->AddPage(wxT("wxWidgets Library Config"));
2090
2091 PopulateWithLibraryConfig();
2092
2093 wxPropertyGridPage* myPage = new wxMyPropertyGridPage();
2094 myPage->Append( new wxIntProperty ( wxT("IntProperty"), wxPG_LABEL, 12345678 ) );
2095
2096 // Use wxMyPropertyGridPage (see above) to test the
2097 // custom wxPropertyGridPage feature.
2098 pgman->AddPage(wxT("Examples"),wxNullBitmap,myPage);
2099
2100 PopulateWithExamples();
2101}
2102
2103void FormMain::CreateGrid( int style, int extraStyle )
2104{
2105 //
2106 // This function (re)creates the property grid in our sample
2107 //
2108
2109 if ( style == -1 )
2110 style = // default style
2111 wxPG_BOLD_MODIFIED |
2112 wxPG_SPLITTER_AUTO_CENTER |
2113 wxPG_AUTO_SORT |
2114 //wxPG_HIDE_MARGIN|wxPG_STATIC_SPLITTER |
2115 //wxPG_TOOLTIPS |
2116 //wxPG_HIDE_CATEGORIES |
2117 //wxPG_LIMITED_EDITING |
1c4293cb
VZ
2118 wxPG_TOOLBAR |
2119 wxPG_DESCRIPTION;
2120
2121 if ( extraStyle == -1 )
2122 // default extra style
fc72fab6
JS
2123 extraStyle = wxPG_EX_MODE_BUTTONS |
2124 wxPG_EX_MULTIPLE_SELECTION;
1c4293cb
VZ
2125 //| wxPG_EX_AUTO_UNSPECIFIED_VALUES
2126 //| wxPG_EX_GREY_LABEL_WHEN_DISABLED
2127 //| wxPG_EX_NATIVE_DOUBLE_BUFFERING
2128 //| wxPG_EX_HELP_AS_TOOLTIPS
2129
2130 bool wasCreated = m_panel ? false : true;
2131
2132 InitPanel();
2133
2134 //
2135 // This shows how to combine two static choice descriptors
2136 m_combinedFlags.Add( _fs_windowstyle_labels, _fs_windowstyle_values );
2137 m_combinedFlags.Add( _fs_framestyle_labels, _fs_framestyle_values );
2138
2139 wxPropertyGridManager* pgman = m_pPropGridManager =
2140 new wxPropertyGridManager(m_panel,
2141 // Don't change this into wxID_ANY in the sample, or the
2142 // event handling will obviously be broken.
2143 PGID, /*wxID_ANY*/
2144 wxDefaultPosition,
521f1d83
JS
2145 wxSize(100, 100), // FIXME: wxDefaultSize gives assertion in propgrid.
2146 // But calling SetInitialSize in manager changes the code
2147 // order to the grid gets created immediately, before SetExtraStyle
2148 // is called.
1c4293cb
VZ
2149 style );
2150
2151 m_propGrid = pgman->GetGrid();
2152
2153 pgman->SetExtraStyle(extraStyle);
2154
2155 m_pPropGridManager->SetValidationFailureBehavior( wxPG_VFB_BEEP | wxPG_VFB_MARK_CELL | wxPG_VFB_SHOW_MESSAGE );
2156
2157 m_pPropGridManager->GetGrid()->SetVerticalSpacing( 2 );
2158
2159 PopulateGrid();
2160
2161 // Change some attributes in all properties
2162 //pgman->SetPropertyAttributeAll(wxPG_BOOL_USE_DOUBLE_CLICK_CYCLING,true);
2163 //pgman->SetPropertyAttributeAll(wxPG_BOOL_USE_CHECKBOX,true);
2164
2165 //m_pPropGridManager->SetSplitterLeft(true);
2166 //m_pPropGridManager->SetSplitterPosition(137);
2167
2168 /*
2169 // This would setup event handling without event table entries
2170 Connect(m_pPropGridManager->GetId(), wxEVT_PG_SELECTED,
adea5244 2171 wxPropertyGridEventHandler(FormMain::OnPropertyGridSelect) );
1c4293cb 2172 Connect(m_pPropGridManager->GetId(), wxEVT_PG_CHANGED,
adea5244 2173 wxPropertyGridEventHandler(FormMain::OnPropertyGridChange) );
1c4293cb
VZ
2174 */
2175
2176 m_topSizer->Add( m_pPropGridManager, 1, wxEXPAND );
2177
2178 FinalizePanel(wasCreated);
2179}
2180
2181// -----------------------------------------------------------------------
2182
2183FormMain::FormMain(const wxString& title, const wxPoint& pos, const wxSize& size) :
2184 wxFrame((wxFrame *)NULL, -1, title, pos, size,
2185 (wxMINIMIZE_BOX|wxMAXIMIZE_BOX|wxRESIZE_BORDER|wxSYSTEM_MENU|wxCAPTION|
2186 wxTAB_TRAVERSAL|wxCLOSE_BOX|wxNO_FULL_REPAINT_ON_RESIZE) )
2187{
41f02b9a
FM
2188 SetIcon(wxICON(sample));
2189
1c4293cb
VZ
2190 m_propGrid = NULL;
2191 m_panel = NULL;
2192
2193#ifdef __WXMAC__
2194 // we need this in order to allow the about menu relocation, since ABOUT is
2195 // not the default id of the about menu
2196 wxApp::s_macAboutMenuItemId = ID_ABOUT;
2197#endif
2198
2199#if wxUSE_IMAGE
2200 // This is here to really test the wxImageFileProperty.
2201 wxInitAllImageHandlers();
2202#endif
2203
c8074be0
JS
2204 // Register all editors (SpinCtrl etc.)
2205 m_pPropGridManager->RegisterAdditionalEditors();
2206
2207 // Register our sample custom editors
2208 m_pSampleMultiButtonEditor =
2209 wxPropertyGrid::RegisterEditorClass(new wxSampleMultiButtonEditor());
2210
1c4293cb
VZ
2211 CreateGrid( // style
2212 wxPG_BOLD_MODIFIED |
2213 wxPG_SPLITTER_AUTO_CENTER |
2214 wxPG_AUTO_SORT |
2215 //wxPG_HIDE_MARGIN|wxPG_STATIC_SPLITTER |
2216 //wxPG_TOOLTIPS |
2217 //wxPG_HIDE_CATEGORIES |
2218 //wxPG_LIMITED_EDITING |
1c4293cb
VZ
2219 wxPG_TOOLBAR |
2220 wxPG_DESCRIPTION,
2221 // extra style
fc72fab6
JS
2222 wxPG_EX_MODE_BUTTONS |
2223 wxPG_EX_MULTIPLE_SELECTION
1c4293cb
VZ
2224 //| wxPG_EX_AUTO_UNSPECIFIED_VALUES
2225 //| wxPG_EX_GREY_LABEL_WHEN_DISABLED
2226 //| wxPG_EX_NATIVE_DOUBLE_BUFFERING
2227 //| wxPG_EX_HELP_AS_TOOLTIPS
2228 );
2229
1c4293cb
VZ
2230 //
2231 // Create menubar
2232 wxMenu *menuFile = new wxMenu(wxEmptyString, wxMENU_TEAROFF);
2233 wxMenu *menuTry = new wxMenu;
2234 wxMenu *menuTools1 = new wxMenu;
2235 wxMenu *menuTools2 = new wxMenu;
2236 wxMenu *menuHelp = new wxMenu;
2237
2238 menuHelp->Append(ID_ABOUT, wxT("&About..."), wxT("Show about dialog") );
2239
2240 menuTools1->Append(ID_APPENDPROP, wxT("Append New Property") );
2241 menuTools1->Append(ID_APPENDCAT, wxT("Append New Category\tCtrl-S") );
2242 menuTools1->AppendSeparator();
2243 menuTools1->Append(ID_INSERTPROP, wxT("Insert New Property\tCtrl-Q") );
2244 menuTools1->Append(ID_INSERTCAT, wxT("Insert New Category\tCtrl-W") );
2245 menuTools1->AppendSeparator();
2246 menuTools1->Append(ID_DELETE, wxT("Delete Selected") );
2247 menuTools1->Append(ID_DELETER, wxT("Delete Random") );
2248 menuTools1->Append(ID_DELETEALL, wxT("Delete All") );
2249 menuTools1->AppendSeparator();
d7e2b522
JS
2250 menuTools1->Append(ID_SETBGCOLOUR, wxT("Set Bg Colour") );
2251 menuTools1->Append(ID_SETBGCOLOURRECUR, wxT("Set Bg Colour (Recursively)") );
1c4293cb 2252 menuTools1->Append(ID_UNSPECIFY, wxT("Set to Unspecified") );
1c4293cb
VZ
2253 menuTools1->AppendSeparator();
2254 m_itemEnable = menuTools1->Append(ID_ENABLE, wxT("Enable"),
2255 wxT("Toggles item's enabled state.") );
2256 m_itemEnable->Enable( FALSE );
2257 menuTools1->Append(ID_HIDE, wxT("Hide"), wxT("Shows or hides a property") );
2258
2259 menuTools2->Append(ID_ITERATE1, wxT("Iterate Over Properties") );
2260 menuTools2->Append(ID_ITERATE2, wxT("Iterate Over Visible Items") );
2261 menuTools2->Append(ID_ITERATE3, wxT("Reverse Iterate Over Properties") );
2262 menuTools2->Append(ID_ITERATE4, wxT("Iterate Over Categories") );
2263 menuTools2->AppendSeparator();
2264 menuTools2->Append(ID_SETPROPERTYVALUE, wxT("Set Property Value") );
2265 menuTools2->Append(ID_CLEARMODIF, wxT("Clear Modified Status"), wxT("Clears wxPG_MODIFIED flag from all properties.") );
2266 menuTools2->AppendSeparator();
2267 m_itemFreeze = menuTools2->AppendCheckItem(ID_FREEZE, wxT("Freeze"),
2268 wxT("Disables painting, auto-sorting, etc.") );
2269 menuTools2->AppendSeparator();
2270 menuTools2->Append(ID_DUMPLIST, wxT("Display Values as wxVariant List"), wxT("Tests GetAllValues method and wxVariant conversion.") );
2271 menuTools2->AppendSeparator();
2272 menuTools2->Append(ID_GETVALUES, wxT("Get Property Values"), wxT("Stores all property values.") );
2273 menuTools2->Append(ID_SETVALUES, wxT("Set Property Values"), wxT("Reverts property values to those last stored.") );
2274 menuTools2->Append(ID_SETVALUES2, wxT("Set Property Values 2"), wxT("Adds property values that should not initially be as items (so new items are created).") );
2275 menuTools2->AppendSeparator();
2276 menuTools2->Append(ID_SAVESTATE, wxT("Save Editable State") );
2277 menuTools2->Append(ID_RESTORESTATE, wxT("Restore Editable State") );
2278 menuTools2->AppendSeparator();
2279 menuTools2->Append(ID_ENABLECOMMONVALUES, wxT("Enable Common Value"),
2280 wxT("Enable values that are common to all properties, for selected property."));
2281 menuTools2->AppendSeparator();
2282 menuTools2->Append(ID_COLLAPSE, wxT("Collapse Selected") );
2283 menuTools2->Append(ID_COLLAPSEALL, wxT("Collapse All") );
2284 menuTools2->AppendSeparator();
2285 menuTools2->Append(ID_INSERTPAGE, wxT("Add Page") );
2286 menuTools2->Append(ID_REMOVEPAGE, wxT("Remove Page") );
2287 menuTools2->AppendSeparator();
2288 menuTools2->Append(ID_FITCOLUMNS, wxT("Fit Columns") );
5405bfb4
JS
2289 m_itemVetoDragging =
2290 menuTools2->AppendCheckItem(ID_VETOCOLDRAG,
2291 "Veto Column Dragging");
1c4293cb
VZ
2292 menuTools2->AppendSeparator();
2293 menuTools2->Append(ID_CHANGEFLAGSITEMS, wxT("Change Children of FlagsProp") );
2294 menuTools2->AppendSeparator();
2295 menuTools2->Append(ID_TESTINSERTCHOICE, wxT("Test InsertPropertyChoice") );
2296 menuTools2->Append(ID_TESTDELETECHOICE, wxT("Test DeletePropertyChoice") );
2297 menuTools2->AppendSeparator();
2298 menuTools2->Append(ID_SETSPINCTRLEDITOR, wxT("Use SpinCtrl Editor") );
2299 menuTools2->Append(ID_TESTREPLACE, wxT("Test ReplaceProperty") );
2300
2301 menuTry->Append(ID_SELECTSTYLE, wxT("Set Window Style"),
2302 wxT("Select window style flags used by the grid."));
58935d4a
JS
2303 menuTry->Append(ID_ENABLELABELEDITING, "Enable label editing",
2304 "This calls wxPropertyGrid::MakeColumnEditable(0)");
f5254768
JS
2305 menuTry->AppendCheckItem(ID_SHOWHEADER,
2306 "Enable header",
2307 "This calls wxPropertyGridManager::ShowHeader()");
1c4293cb
VZ
2308 menuTry->AppendSeparator();
2309 menuTry->AppendRadioItem( ID_COLOURSCHEME1, wxT("Standard Colour Scheme") );
2310 menuTry->AppendRadioItem( ID_COLOURSCHEME2, wxT("White Colour Scheme") );
2311 menuTry->AppendRadioItem( ID_COLOURSCHEME3, wxT(".NET Colour Scheme") );
2312 menuTry->AppendRadioItem( ID_COLOURSCHEME4, wxT("Cream Colour Scheme") );
2313 menuTry->AppendSeparator();
2314 m_itemCatColours = menuTry->AppendCheckItem(ID_CATCOLOURS, wxT("Category Specific Colours"),
2315 wxT("Switches between category-specific cell colours and default scheme (actually done using SetPropertyTextColour and SetPropertyBackgroundColour).") );
2316 menuTry->AppendSeparator();
2317 menuTry->AppendCheckItem(ID_STATICLAYOUT, wxT("Static Layout"),
2318 wxT("Switches between user-modifiedable and static layouts.") );
2319 menuTry->Append(ID_SETCOLUMNS, wxT("Set Number of Columns") );
2320 menuTry->AppendSeparator();
2321 menuTry->Append(ID_TESTXRC, wxT("Display XRC sample") );
2322 menuTry->AppendSeparator();
2323 menuTry->Append(ID_RUNTESTFULL, wxT("Run Tests (full)") );
2324 menuTry->Append(ID_RUNTESTPARTIAL, wxT("Run Tests (fast)") );
2325
2326 menuFile->Append(ID_RUNMINIMAL, wxT("Run Minimal Sample") );
2327 menuFile->AppendSeparator();
2328 menuFile->Append(ID_QUIT, wxT("E&xit\tAlt-X"), wxT("Quit this program") );
2329
2330 // Now append the freshly created menu to the menu bar...
2331 wxMenuBar *menuBar = new wxMenuBar();
2332 menuBar->Append(menuFile, wxT("&File") );
2333 menuBar->Append(menuTry, wxT("&Try These!") );
2334 menuBar->Append(menuTools1, wxT("&Basic") );
2335 menuBar->Append(menuTools2, wxT("&Advanced") );
2336 menuBar->Append(menuHelp, wxT("&Help") );
2337
2338 // ... and attach this menu bar to the frame
2339 SetMenuBar(menuBar);
2340
2341#if wxUSE_STATUSBAR
2342 // create a status bar
2343 CreateStatusBar(1);
2344 SetStatusText(wxEmptyString);
2345#endif // wxUSE_STATUSBAR
2346
c324ed94 2347 FinalizeFramePosition();
9d136b8b
JS
2348
2349#if wxUSE_LOGWINDOW
2350 // Create log window
2351 m_logWindow = new wxLogWindow(this, "Log Messages", false);
2352 m_logWindow->GetFrame()->Move(GetPosition().x + GetSize().x + 10,
2353 GetPosition().y);
2354 m_logWindow->Show();
2355#endif
c324ed94 2356}
1c4293cb 2357
c324ed94
JS
2358void FormMain::FinalizeFramePosition()
2359{
2360 wxSize frameSize((wxSystemSettings::GetMetric(wxSYS_SCREEN_X)/10)*4,
2361 (wxSystemSettings::GetMetric(wxSYS_SCREEN_Y)/10)*8);
2362
2363 if ( frameSize.x > 500 )
2364 frameSize.x = 500;
2365
2366 SetSize(frameSize);
1c4293cb 2367
1c4293cb
VZ
2368 Centre();
2369}
2370
2371//
2372// Normally, wxPropertyGrid does not check whether item with identical
2373// label already exists. However, since in this sample we use labels for
2374// identifying properties, we have to be sure not to generate identical
2375// labels.
2376//
2377void GenerateUniquePropertyLabel( wxPropertyGridManager* pg, wxString& baselabel )
2378{
2379 int count = -1;
2380 wxString newlabel;
2381
2382 if ( pg->GetPropertyByLabel( baselabel ) )
2383 {
2384 for (;;)
2385 {
2386 count++;
2387 newlabel.Printf(wxT("%s%i"),baselabel.c_str(),count);
2388 if ( !pg->GetPropertyByLabel( newlabel ) ) break;
2389 }
2390 }
2391
2392 if ( count >= 0 )
2393 {
2394 baselabel = newlabel;
2395 }
2396}
2397
2398// -----------------------------------------------------------------------
2399
2400void FormMain::OnInsertPropClick( wxCommandEvent& WXUNUSED(event) )
2401{
2402 wxString propLabel;
2403
5a8009d2 2404 if ( !m_pPropGridManager->GetGrid()->GetRoot()->GetChildCount() )
1c4293cb
VZ
2405 {
2406 wxMessageBox(wxT("No items to relate - first add some with Append."));
2407 return;
2408 }
2409
2410 wxPGProperty* id = m_pPropGridManager->GetGrid()->GetSelection();
2411 if ( !id )
2412 {
2413 wxMessageBox(wxT("First select a property - new one will be inserted right before that."));
2414 return;
2415 }
2416 if ( propLabel.Len() < 1 ) propLabel = wxT("Property");
2417
2418 GenerateUniquePropertyLabel( m_pPropGridManager, propLabel );
2419
2420 m_pPropGridManager->Insert( m_pPropGridManager->GetPropertyParent(id),
effb029c
JS
2421 id->GetIndexInParent(),
2422 new wxStringProperty(propLabel) );
1c4293cb
VZ
2423
2424}
2425
2426// -----------------------------------------------------------------------
2427
2428void FormMain::OnAppendPropClick( wxCommandEvent& WXUNUSED(event) )
2429{
2430 wxString propLabel;
2431
2432 if ( propLabel.Len() < 1 ) propLabel = wxT("Property");
2433
2434 GenerateUniquePropertyLabel( m_pPropGridManager, propLabel );
2435
2436 m_pPropGridManager->Append( new wxStringProperty(propLabel) );
2437
2438 m_pPropGridManager->Refresh();
2439}
2440
2441// -----------------------------------------------------------------------
2442
2443void FormMain::OnClearClick( wxCommandEvent& WXUNUSED(event) )
2444{
2445 m_pPropGridManager->GetGrid()->Clear();
2446}
2447
2448// -----------------------------------------------------------------------
2449
2450void FormMain::OnAppendCatClick( wxCommandEvent& WXUNUSED(event) )
2451{
2452 wxString propLabel;
2453
2454 if ( propLabel.Len() < 1 ) propLabel = wxT("Category");
2455
2456 GenerateUniquePropertyLabel( m_pPropGridManager, propLabel );
2457
2458 m_pPropGridManager->Append( new wxPropertyCategory (propLabel) );
2459
2460 m_pPropGridManager->Refresh();
2461
2462}
2463
2464// -----------------------------------------------------------------------
2465
2466void FormMain::OnInsertCatClick( wxCommandEvent& WXUNUSED(event) )
2467{
2468 wxString propLabel;
2469
5a8009d2 2470 if ( !m_pPropGridManager->GetGrid()->GetRoot()->GetChildCount() )
1c4293cb
VZ
2471 {
2472 wxMessageBox(wxT("No items to relate - first add some with Append."));
2473 return;
2474 }
2475
2476 wxPGProperty* id = m_pPropGridManager->GetGrid()->GetSelection();
2477 if ( !id )
2478 {
2479 wxMessageBox(wxT("First select a property - new one will be inserted right before that."));
2480 return;
2481 }
2482
2483 if ( propLabel.Len() < 1 ) propLabel = wxT("Category");
2484
2485 GenerateUniquePropertyLabel( m_pPropGridManager, propLabel );
2486
2487 m_pPropGridManager->Insert( m_pPropGridManager->GetPropertyParent(id),
effb029c
JS
2488 id->GetIndexInParent(),
2489 new wxPropertyCategory (propLabel) );
1c4293cb
VZ
2490}
2491
2492// -----------------------------------------------------------------------
2493
2494void FormMain::OnDelPropClick( wxCommandEvent& WXUNUSED(event) )
2495{
2496 wxPGProperty* id = m_pPropGridManager->GetGrid()->GetSelection();
2497 if ( !id )
2498 {
2499 wxMessageBox(wxT("First select a property."));
2500 return;
2501 }
2502
2503 m_pPropGridManager->DeleteProperty( id );
2504}
2505
2506// -----------------------------------------------------------------------
2507
2508void FormMain::OnDelPropRClick( wxCommandEvent& WXUNUSED(event) )
2509{
2510 // Delete random property
2511 wxPGProperty* p = m_pPropGridManager->GetGrid()->GetRoot();
2512
2513 for (;;)
2514 {
2515 if ( !p->IsCategory() )
2516 {
2517 m_pPropGridManager->DeleteProperty( p );
2518 break;
2519 }
2520
2521 if ( !p->GetChildCount() )
2522 break;
2523
2524 int n = rand() % ((int)p->GetChildCount());
2525
2526 p = p->Item(n);
2527 }
2528}
2529
2530// -----------------------------------------------------------------------
2531
62c4453a 2532void FormMain::OnContextMenu( wxContextMenuEvent& event )
1c4293cb
VZ
2533{
2534 wxLogDebug(wxT("FormMain::OnContextMenu(%i,%i)"),
2535 event.GetPosition().x,event.GetPosition().y);
2536
62c4453a
JS
2537 wxUnusedVar(event);
2538
1c4293cb
VZ
2539 //event.Skip();
2540}
2541
2542// -----------------------------------------------------------------------
2543
2544void FormMain::OnCloseClick( wxCommandEvent& WXUNUSED(event) )
2545{
2546/*#ifdef __WXDEBUG__
2547 m_pPropGridManager->GetGrid()->DumpAllocatedChoiceSets();
2548 wxLogDebug(wxT("\\-> Don't worry, this is perfectly normal in this sample."));
2549#endif*/
2550
2551 Close(false);
2552}
2553
2554// -----------------------------------------------------------------------
2555
2556int IterateMessage( wxPGProperty* prop )
2557{
2558 wxString s;
2559
2560 s.Printf( wxT("\"%s\" class = %s, valuetype = %s"), prop->GetLabel().c_str(),
2561 prop->GetClassInfo()->GetClassName(), prop->GetValueType().c_str() );
2562
2563 return wxMessageBox( s, wxT("Iterating... (press CANCEL to end)"), wxOK|wxCANCEL );
2564}
2565
2566// -----------------------------------------------------------------------
2567
2568void FormMain::OnIterate1Click( wxCommandEvent& WXUNUSED(event) )
2569{
2570 wxPropertyGridIterator it;
2571
2572 for ( it = m_pPropGridManager->GetCurrentPage()->
2573 GetIterator();
2574 !it.AtEnd();
2575 it++ )
2576 {
2577 wxPGProperty* p = *it;
2578 int res = IterateMessage( p );
2579 if ( res == wxCANCEL ) break;
2580 }
2581}
2582
2583// -----------------------------------------------------------------------
2584
2585void FormMain::OnIterate2Click( wxCommandEvent& WXUNUSED(event) )
2586{
2587 wxPropertyGridIterator it;
2588
2589 for ( it = m_pPropGridManager->GetCurrentPage()->
2590 GetIterator( wxPG_ITERATE_VISIBLE );
2591 !it.AtEnd();
2592 it++ )
2593 {
2594 wxPGProperty* p = *it;
2595
2596 int res = IterateMessage( p );
2597 if ( res == wxCANCEL ) break;
2598 }
2599}
2600
2601// -----------------------------------------------------------------------
2602
2603void FormMain::OnIterate3Click( wxCommandEvent& WXUNUSED(event) )
2604{
2605 // iterate over items in reverse order
2606 wxPropertyGridIterator it;
2607
2608 for ( it = m_pPropGridManager->GetCurrentPage()->
2609 GetIterator( wxPG_ITERATE_DEFAULT, wxBOTTOM );
2610 !it.AtEnd();
2611 it-- )
2612 {
2613 wxPGProperty* p = *it;
2614
2615 int res = IterateMessage( p );
2616 if ( res == wxCANCEL ) break;
2617 }
2618}
2619
2620// -----------------------------------------------------------------------
2621
2622void FormMain::OnIterate4Click( wxCommandEvent& WXUNUSED(event) )
2623{
2624 wxPropertyGridIterator it;
2625
2626 for ( it = m_pPropGridManager->GetCurrentPage()->
2627 GetIterator( wxPG_ITERATE_CATEGORIES );
2628 !it.AtEnd();
2629 it++ )
2630 {
2631 wxPGProperty* p = *it;
2632
2633 int res = IterateMessage( p );
2634 if ( res == wxCANCEL ) break;
2635 }
2636}
2637
2638// -----------------------------------------------------------------------
2639
2640void FormMain::OnFitColumnsClick( wxCommandEvent& WXUNUSED(event) )
2641{
2642 wxPropertyGridPage* page = m_pPropGridManager->GetCurrentPage();
2643
2644 // Remove auto-centering
2645 m_pPropGridManager->SetWindowStyle( m_pPropGridManager->GetWindowStyle() & ~wxPG_SPLITTER_AUTO_CENTER);
2646
2647 // Grow manager size just prior fit - otherwise
2648 // column information may be lost.
2649 wxSize oldGridSize = m_pPropGridManager->GetGrid()->GetClientSize();
2650 wxSize oldFullSize = GetSize();
2651 SetSize(1000, oldFullSize.y);
2652
2653 wxSize newSz = page->FitColumns();
2654
2655 int dx = oldFullSize.x - oldGridSize.x;
2656 int dy = oldFullSize.y - oldGridSize.y;
2657
2658 newSz.x += dx;
2659 newSz.y += dy;
2660
2661 SetSize(newSz);
2662}
2663
2664// -----------------------------------------------------------------------
2665
2666void FormMain::OnChangeFlagsPropItemsClick( wxCommandEvent& WXUNUSED(event) )
2667{
939d9364 2668 wxPGProperty* p = m_pPropGridManager->GetPropertyByName(wxT("Window Styles"));
1c4293cb
VZ
2669
2670 wxPGChoices newChoices;
2671
2672 newChoices.Add(wxT("Fast"),0x1);
2673 newChoices.Add(wxT("Powerful"),0x2);
2674 newChoices.Add(wxT("Safe"),0x4);
2675 newChoices.Add(wxT("Sleek"),0x8);
2676
939d9364 2677 p->SetChoices(newChoices);
1c4293cb
VZ
2678}
2679
2680// -----------------------------------------------------------------------
2681
2682void FormMain::OnEnableDisable( wxCommandEvent& )
2683{
2684 wxPGProperty* id = m_pPropGridManager->GetGrid()->GetSelection();
2685 if ( !id )
2686 {
2687 wxMessageBox(wxT("First select a property."));
2688 return;
2689 }
2690
2691 if ( m_pPropGridManager->IsPropertyEnabled( id ) )
2692 {
2693 m_pPropGridManager->DisableProperty ( id );
2694 m_itemEnable->SetItemLabel( wxT("Enable") );
2695 }
2696 else
2697 {
2698 m_pPropGridManager->EnableProperty ( id );
2699 m_itemEnable->SetItemLabel( wxT("Disable") );
2700 }
2701}
2702
2703// -----------------------------------------------------------------------
2704
2705void FormMain::OnHideShow( wxCommandEvent& WXUNUSED(event) )
2706{
2707 wxPGProperty* id = m_pPropGridManager->GetGrid()->GetSelection();
2708 if ( !id )
2709 {
2710 wxMessageBox(wxT("First select a property."));
2711 return;
2712 }
2713
2714 if ( m_pPropGridManager->IsPropertyShown( id ) )
2715 {
2716 m_pPropGridManager->HideProperty( id, true );
2717 m_itemEnable->SetItemLabel( wxT("Show") );
2718 }
2719 else
2720 {
2721 m_pPropGridManager->HideProperty( id, false );
2722 m_itemEnable->SetItemLabel( wxT("Hide") );
2723 }
2724
2725 wxPropertyGridPage* curPage = m_pPropGridManager->GetCurrentPage();
2726
2727 // Check for bottomY precalculation validity
2728 unsigned int byPre = curPage->GetVirtualHeight();
2729 unsigned int byAct = curPage->GetActualVirtualHeight();
2730
2731 if ( byPre != byAct )
2732 {
2733 wxLogDebug(wxT("VirtualHeight is %u, should be %u"), byPre, byAct);
2734 }
2735}
2736
2737// -----------------------------------------------------------------------
2738
d7e2b522
JS
2739#include "wx/colordlg.h"
2740
2741void
2742FormMain::OnSetBackgroundColour( wxCommandEvent& event )
2743{
2744 wxPropertyGrid* pg = m_pPropGridManager->GetGrid();
2745 wxPGProperty* prop = pg->GetSelection();
2746 if ( !prop )
2747 {
2748 wxMessageBox(wxT("First select a property."));
2749 return;
2750 }
2751
2752 wxColour col = ::wxGetColourFromUser(this, *wxWHITE, "Choose colour");
2753
2754 if ( col.IsOk() )
2755 {
2756 bool recursively = (event.GetId()==ID_SETBGCOLOURRECUR) ? true : false;
2757 pg->SetPropertyBackgroundColour(prop, col, recursively);
2758 }
2759}
2760
2761// -----------------------------------------------------------------------
2762
1c4293cb
VZ
2763void FormMain::OnInsertPage( wxCommandEvent& WXUNUSED(event) )
2764{
2765 m_pPropGridManager->AddPage(wxT("New Page"));
2766}
2767
2768// -----------------------------------------------------------------------
2769
2770void FormMain::OnRemovePage( wxCommandEvent& WXUNUSED(event) )
2771{
2772 m_pPropGridManager->RemovePage(m_pPropGridManager->GetSelectedPage());
2773}
2774
2775// -----------------------------------------------------------------------
2776
2777void FormMain::OnSaveState( wxCommandEvent& WXUNUSED(event) )
2778{
2779 m_savedState = m_pPropGridManager->SaveEditableState();
2780 wxLogDebug(wxT("Saved editable state string: \"%s\""), m_savedState.c_str());
2781}
2782
2783// -----------------------------------------------------------------------
2784
2785void FormMain::OnRestoreState( wxCommandEvent& WXUNUSED(event) )
2786{
2787 m_pPropGridManager->RestoreEditableState(m_savedState);
2788}
2789
2790// -----------------------------------------------------------------------
2791
2792void FormMain::OnSetSpinCtrlEditorClick( wxCommandEvent& WXUNUSED(event) )
2793{
2794#if wxUSE_SPINBTN
0f457f4d 2795 wxPGProperty* pgId = m_pPropGridManager->GetSelection();
1c4293cb 2796 if ( pgId )
58f43b41 2797 m_pPropGridManager->SetPropertyEditor( pgId, wxPGEditor_SpinCtrl );
1c4293cb
VZ
2798 else
2799 wxMessageBox(wxT("First select a property"));
2800#endif
2801}
2802
2803// -----------------------------------------------------------------------
2804
2805void FormMain::OnTestReplaceClick( wxCommandEvent& WXUNUSED(event) )
2806{
0f457f4d 2807 wxPGProperty* pgId = m_pPropGridManager->GetSelection();
1c4293cb
VZ
2808 if ( pgId )
2809 {
2810 wxPGChoices choices;
2811 choices.Add(wxT("Flag 0"),0x0001);
2812 choices.Add(wxT("Flag 1"),0x0002);
2813 choices.Add(wxT("Flag 2"),0x0004);
2814 choices.Add(wxT("Flag 3"),0x0008);
2815 wxPGProperty* newId = m_pPropGridManager->ReplaceProperty( pgId,
2816 new wxFlagsProperty(wxT("ReplaceFlagsProperty"), wxPG_LABEL, choices, 0x0003) );
2817 m_pPropGridManager->SetPropertyAttribute( newId,
2818 wxPG_BOOL_USE_CHECKBOX,
2819 true,
2820 wxPG_RECURSE );
2821 }
2822 else
2823 wxMessageBox(wxT("First select a property"));
2824}
2825
2826// -----------------------------------------------------------------------
2827
2828void FormMain::OnClearModifyStatusClick( wxCommandEvent& WXUNUSED(event) )
2829{
2830 m_pPropGridManager->ClearModifiedStatus();
2831}
2832
2833// -----------------------------------------------------------------------
2834
2835// Freeze check-box checked?
2836void FormMain::OnFreezeClick( wxCommandEvent& event )
2837{
2838 if ( !m_pPropGridManager ) return;
2839
2840 if ( event.IsChecked() )
2841 {
2842 if ( !m_pPropGridManager->IsFrozen() )
2843 {
2844 m_pPropGridManager->Freeze();
2845 }
2846 }
2847 else
2848 {
2849 if ( m_pPropGridManager->IsFrozen() )
2850 {
2851 m_pPropGridManager->Thaw();
2852 m_pPropGridManager->Refresh();
2853 }
2854 }
2855}
2856
2857// -----------------------------------------------------------------------
2858
58935d4a
JS
2859void FormMain::OnEnableLabelEditing( wxCommandEvent& WXUNUSED(event) )
2860{
2861 m_propGrid->MakeColumnEditable(0);
2862}
2863
2864// -----------------------------------------------------------------------
2865
f5254768
JS
2866void FormMain::OnShowHeader( wxCommandEvent& event )
2867{
2868 m_pPropGridManager->ShowHeader(event.IsChecked());
2869 m_pPropGridManager->SetColumnTitle(2, _("Units"));
2870}
2871
2872// -----------------------------------------------------------------------
2873
1c4293cb
VZ
2874void FormMain::OnAbout(wxCommandEvent& WXUNUSED(event))
2875{
2876 wxString msg;
2877 msg.Printf( wxT("wxPropertyGrid Sample")
2878#if wxUSE_UNICODE
2879 #if defined(wxUSE_UNICODE_UTF8) && wxUSE_UNICODE_UTF8
2880 wxT(" <utf-8>")
2881 #else
2882 wxT(" <unicode>")
2883 #endif
2884#else
2885 wxT(" <ansi>")
2886#endif
2887#ifdef __WXDEBUG__
2888 wxT(" <debug>")
2889#else
2890 wxT(" <release>")
2891#endif
2892 wxT("\n\n")
2893 wxT("Programmed by %s\n\n")
2894 wxT("Using %s\n\n"),
2895 wxT("Jaakko Salli"), wxVERSION_STRING
2896 );
2897
9a83f860 2898 wxMessageBox(msg, wxT("About"), wxOK | wxICON_INFORMATION, this);
1c4293cb
VZ
2899}
2900
2901// -----------------------------------------------------------------------
2902
2903void FormMain::OnColourScheme( wxCommandEvent& event )
2904{
2905 int id = event.GetId();
2906 if ( id == ID_COLOURSCHEME1 )
2907 {
2908 m_pPropGridManager->GetGrid()->ResetColours();
2909 }
2910 else if ( id == ID_COLOURSCHEME2 )
2911 {
2912 // white
2913 wxColour my_grey_1(212,208,200);
2914 wxColour my_grey_3(113,111,100);
2915 m_pPropGridManager->Freeze();
2916 m_pPropGridManager->GetGrid()->SetMarginColour( *wxWHITE );
2917 m_pPropGridManager->GetGrid()->SetCaptionBackgroundColour( *wxWHITE );
2918 m_pPropGridManager->GetGrid()->SetCellBackgroundColour( *wxWHITE );
2919 m_pPropGridManager->GetGrid()->SetCellTextColour( my_grey_3 );
2920 m_pPropGridManager->GetGrid()->SetLineColour( my_grey_1 ); //wxColour(160,160,160)
2921 m_pPropGridManager->Thaw();
2922 }
2923 else if ( id == ID_COLOURSCHEME3 )
2924 {
2925 // .NET
2926 wxColour my_grey_1(212,208,200);
2927 wxColour my_grey_2(236,233,216);
2928 m_pPropGridManager->Freeze();
2929 m_pPropGridManager->GetGrid()->SetMarginColour( my_grey_1 );
2930 m_pPropGridManager->GetGrid()->SetCaptionBackgroundColour( my_grey_1 );
2931 m_pPropGridManager->GetGrid()->SetLineColour( my_grey_1 );
2932 m_pPropGridManager->Thaw();
2933 }
2934 else if ( id == ID_COLOURSCHEME4 )
2935 {
2936 // cream
2937
2938 wxColour my_grey_1(212,208,200);
2939 wxColour my_grey_2(241,239,226);
2940 wxColour my_grey_3(113,111,100);
2941 m_pPropGridManager->Freeze();
2942 m_pPropGridManager->GetGrid()->SetMarginColour( *wxWHITE );
2943 m_pPropGridManager->GetGrid()->SetCaptionBackgroundColour( *wxWHITE );
2944 m_pPropGridManager->GetGrid()->SetCellBackgroundColour( my_grey_2 );
2945 m_pPropGridManager->GetGrid()->SetCellBackgroundColour( my_grey_2 );
2946 m_pPropGridManager->GetGrid()->SetCellTextColour( my_grey_3 );
2947 m_pPropGridManager->GetGrid()->SetLineColour( my_grey_1 );
2948 m_pPropGridManager->Thaw();
2949 }
2950}
2951
2952// -----------------------------------------------------------------------
2953
2954void FormMain::OnCatColours( wxCommandEvent& event )
2955{
2956 wxPropertyGrid* pg = m_pPropGridManager->GetGrid();
2957 m_pPropGridManager->Freeze();
2958
2959 if ( event.IsChecked() )
2960 {
2961 // Set custom colours.
2962 pg->SetPropertyTextColour( wxT("Appearance"), wxColour(255,0,0), false );
2963 pg->SetPropertyBackgroundColour( wxT("Appearance"), wxColour(255,255,183) );
2964 pg->SetPropertyTextColour( wxT("Appearance"), wxColour(255,0,183) );
2965 pg->SetPropertyTextColour( wxT("PositionCategory"), wxColour(0,255,0), false );
2966 pg->SetPropertyBackgroundColour( wxT("PositionCategory"), wxColour(255,226,190) );
2967 pg->SetPropertyTextColour( wxT("PositionCategory"), wxColour(255,0,190) );
2968 pg->SetPropertyTextColour( wxT("Environment"), wxColour(0,0,255), false );
2969 pg->SetPropertyBackgroundColour( wxT("Environment"), wxColour(208,240,175) );
2970 pg->SetPropertyTextColour( wxT("Environment"), wxColour(255,255,255) );
2971 pg->SetPropertyBackgroundColour( wxT("More Examples"), wxColour(172,237,255) );
2972 pg->SetPropertyTextColour( wxT("More Examples"), wxColour(172,0,255) );
2973 }
2974 else
2975 {
2976 // Revert to original.
2977 pg->SetPropertyColoursToDefault( wxT("Appearance") );
2978 pg->SetPropertyColoursToDefault( wxT("PositionCategory") );
2979 pg->SetPropertyColoursToDefault( wxT("Environment") );
2980 pg->SetPropertyColoursToDefault( wxT("More Examples") );
2981 }
2982 m_pPropGridManager->Thaw();
2983 m_pPropGridManager->Refresh();
2984}
2985
2986// -----------------------------------------------------------------------
2987
2988#define ADD_FLAG(FLAG) \
2989 chs.Add(wxT(#FLAG)); \
2990 vls.Add(FLAG); \
2991 if ( (flags & FLAG) == FLAG ) sel.Add(ind); \
2992 ind++;
2993
2994void FormMain::OnSelectStyle( wxCommandEvent& WXUNUSED(event) )
2995{
2996 int style;
2997 int extraStyle;
2998
2999 {
3000 wxArrayString chs;
3001 wxArrayInt vls;
3002 wxArrayInt sel;
3003 unsigned int ind = 0;
3004 int flags = m_pPropGridManager->GetWindowStyle();
3005 ADD_FLAG(wxPG_HIDE_CATEGORIES)
3006 ADD_FLAG(wxPG_AUTO_SORT)
3007 ADD_FLAG(wxPG_BOLD_MODIFIED)
3008 ADD_FLAG(wxPG_SPLITTER_AUTO_CENTER)
3009 ADD_FLAG(wxPG_TOOLTIPS)
3010 ADD_FLAG(wxPG_STATIC_SPLITTER)
3011 ADD_FLAG(wxPG_HIDE_MARGIN)
3012 ADD_FLAG(wxPG_LIMITED_EDITING)
3013 ADD_FLAG(wxPG_TOOLBAR)
3014 ADD_FLAG(wxPG_DESCRIPTION)
521f1d83 3015 ADD_FLAG(wxPG_NO_INTERNAL_BORDER)
1c4293cb
VZ
3016 wxMultiChoiceDialog dlg( this, wxT("Select window styles to use"),
3017 wxT("wxPropertyGrid Window Style"), chs );
3018 dlg.SetSelections(sel);
3019 if ( dlg.ShowModal() == wxID_CANCEL )
3020 return;
3021
3022 flags = 0;
3023 sel = dlg.GetSelections();
3024 for ( ind = 0; ind < sel.size(); ind++ )
3025 flags |= vls[sel[ind]];
3026
3027 style = flags;
3028 }
3029
3030 {
3031 wxArrayString chs;
3032 wxArrayInt vls;
3033 wxArrayInt sel;
3034 unsigned int ind = 0;
3035 int flags = m_pPropGridManager->GetExtraStyle();
3036 ADD_FLAG(wxPG_EX_INIT_NOCAT)
3037 ADD_FLAG(wxPG_EX_NO_FLAT_TOOLBAR)
3038 ADD_FLAG(wxPG_EX_MODE_BUTTONS)
3039 ADD_FLAG(wxPG_EX_HELP_AS_TOOLTIPS)
3040 ADD_FLAG(wxPG_EX_NATIVE_DOUBLE_BUFFERING)
3041 ADD_FLAG(wxPG_EX_AUTO_UNSPECIFIED_VALUES)
3042 ADD_FLAG(wxPG_EX_WRITEONLY_BUILTIN_ATTRIBUTES)
fc72fab6
JS
3043 ADD_FLAG(wxPG_EX_HIDE_PAGE_BUTTONS)
3044 ADD_FLAG(wxPG_EX_MULTIPLE_SELECTION)
08c1613f 3045 ADD_FLAG(wxPG_EX_ENABLE_TLP_TRACKING)
521f1d83
JS
3046 ADD_FLAG(wxPG_EX_NO_TOOLBAR_DIVIDER)
3047 ADD_FLAG(wxPG_EX_TOOLBAR_SEPARATOR)
1c4293cb
VZ
3048 wxMultiChoiceDialog dlg( this, wxT("Select extra window styles to use"),
3049 wxT("wxPropertyGrid Extra Style"), chs );
3050 dlg.SetSelections(sel);
3051 if ( dlg.ShowModal() == wxID_CANCEL )
3052 return;
3053
3054 flags = 0;
3055 sel = dlg.GetSelections();
3056 for ( ind = 0; ind < sel.size(); ind++ )
3057 flags |= vls[sel[ind]];
3058
3059 extraStyle = flags;
3060 }
3061
3062 CreateGrid( style, extraStyle );
3063
c324ed94 3064 FinalizeFramePosition();
1c4293cb
VZ
3065}
3066
3067// -----------------------------------------------------------------------
3068
3069void FormMain::OnSetColumns( wxCommandEvent& WXUNUSED(event) )
3070{
3071 long colCount = ::wxGetNumberFromUser(wxT("Enter number of columns (2-20)."),wxT("Columns:"),
3072 wxT("Change Columns"),m_pPropGridManager->GetColumnCount(),
3073 2,20);
3074
3075 if ( colCount >= 2 )
3076 {
3077 m_pPropGridManager->SetColumnCount(colCount);
3078 }
3079}
3080
3081// -----------------------------------------------------------------------
3082
3083void FormMain::OnSetPropertyValue( wxCommandEvent& WXUNUSED(event) )
3084{
3085 wxPropertyGrid* pg = m_pPropGridManager->GetGrid();
3086 wxPGProperty* selected = pg->GetSelection();
3087
3088 if ( selected )
3089 {
3090 wxString value = ::wxGetTextFromUser( wxT("Enter new value:") );
3091 pg->SetPropertyValue( selected, value );
3092 }
3093}
3094
3095// -----------------------------------------------------------------------
3096
3097void FormMain::OnInsertChoice( wxCommandEvent& WXUNUSED(event) )
3098{
3099 wxPropertyGrid* pg = m_pPropGridManager->GetGrid();
3100
3101 wxPGProperty* selected = pg->GetSelection();
939d9364 3102 const wxPGChoices& choices = selected->GetChoices();
1c4293cb
VZ
3103
3104 // Insert new choice to the center of list
3105
3106 if ( choices.IsOk() )
3107 {
3108 int pos = choices.GetCount() / 2;
939d9364 3109 selected->InsertChoice(wxT("New Choice"), pos);
1c4293cb
VZ
3110 }
3111 else
3112 {
3113 ::wxMessageBox(wxT("First select a property with some choices."));
3114 }
3115}
3116
3117// -----------------------------------------------------------------------
3118
3119void FormMain::OnDeleteChoice( wxCommandEvent& WXUNUSED(event) )
3120{
3121 wxPropertyGrid* pg = m_pPropGridManager->GetGrid();
3122
3123 wxPGProperty* selected = pg->GetSelection();
939d9364 3124 const wxPGChoices& choices = selected->GetChoices();
1c4293cb
VZ
3125
3126 // Deletes choice from the center of list
3127
3128 if ( choices.IsOk() )
3129 {
3130 int pos = choices.GetCount() / 2;
939d9364 3131 selected->DeleteChoice(pos);
1c4293cb
VZ
3132 }
3133 else
3134 {
3135 ::wxMessageBox(wxT("First select a property with some choices."));
3136 }
3137}
3138
3139// -----------------------------------------------------------------------
3140
3141#include <wx/colordlg.h>
3142
3143void FormMain::OnMisc ( wxCommandEvent& event )
3144{
3145 int id = event.GetId();
3146 if ( id == ID_STATICLAYOUT )
3147 {
3148 long wsf = m_pPropGridManager->GetWindowStyleFlag();
3149 if ( event.IsChecked() ) m_pPropGridManager->SetWindowStyleFlag( wsf|wxPG_STATIC_LAYOUT );
3150 else m_pPropGridManager->SetWindowStyleFlag( wsf&~(wxPG_STATIC_LAYOUT) );
3151 }
1c4293cb
VZ
3152 else if ( id == ID_COLLAPSEALL )
3153 {
3154 wxPGVIterator it;
3155 wxPropertyGrid* pg = m_pPropGridManager->GetGrid();
3156
3157 for ( it = pg->GetVIterator( wxPG_ITERATE_ALL ); !it.AtEnd(); it.Next() )
3158 it.GetProperty()->SetExpanded( false );
3159
3160 pg->RefreshGrid();
3161 }
3162 else if ( id == ID_GETVALUES )
3163 {
3164 m_storedValues = m_pPropGridManager->GetGrid()->GetPropertyValues(wxT("Test"),
3165 m_pPropGridManager->GetGrid()->GetRoot(),
3166 wxPG_KEEP_STRUCTURE|wxPG_INC_ATTRIBUTES);
3167 }
3168 else if ( id == ID_SETVALUES )
3169 {
3170 if ( m_storedValues.GetType() == wxT("list") )
3171 {
3172 m_pPropGridManager->GetGrid()->SetPropertyValues(m_storedValues);
3173 }
3174 else
3175 wxMessageBox(wxT("First use Get Property Values."));
3176 }
3177 else if ( id == ID_SETVALUES2 )
3178 {
3179 wxVariant list;
3180 list.NullList();
3181 list.Append( wxVariant((long)1234,wxT("VariantLong")) );
3182 list.Append( wxVariant((bool)TRUE,wxT("VariantBool")) );
3183 list.Append( wxVariant(wxT("Test Text"),wxT("VariantString")) );
3184 m_pPropGridManager->GetGrid()->SetPropertyValues(list);
3185 }
3186 else if ( id == ID_COLLAPSE )
3187 {
3188 // Collapses selected.
0f457f4d 3189 wxPGProperty* id = m_pPropGridManager->GetSelection();
1c4293cb
VZ
3190 if ( id )
3191 {
3192 m_pPropGridManager->Collapse(id);
3193 }
3194 }
3195 else if ( id == ID_RUNTESTFULL )
3196 {
3197 // Runs a regression test.
3198 RunTests(true);
3199 }
3200 else if ( id == ID_RUNTESTPARTIAL )
3201 {
3202 // Runs a regression test.
3203 RunTests(false);
3204 }
3205 else if ( id == ID_UNSPECIFY )
3206 {
0f457f4d 3207 wxPGProperty* prop = m_pPropGridManager->GetSelection();
1c4293cb
VZ
3208 if ( prop )
3209 {
3210 m_pPropGridManager->SetPropertyValueUnspecified(prop);
3472e2f4 3211 prop->RefreshEditor();
1c4293cb
VZ
3212 }
3213 }
1c4293cb
VZ
3214}
3215
3216// -----------------------------------------------------------------------
3217
3218void FormMain::OnPopulateClick( wxCommandEvent& event )
3219{
3220 int id = event.GetId();
3221 m_propGrid->Clear();
3222 m_propGrid->Freeze();
3223 if ( id == ID_POPULATE1 )
3224 {
3225 PopulateWithStandardItems();
3226 }
3227 else if ( id == ID_POPULATE2 )
3228 {
3229 PopulateWithLibraryConfig();
3230 }
3231 m_propGrid->Thaw();
3232}
3233
3234// -----------------------------------------------------------------------
3235
3236void DisplayMinimalFrame(wxWindow* parent); // in minimal.cpp
3237
3238void FormMain::OnRunMinimalClick( wxCommandEvent& WXUNUSED(event) )
3239{
3240 DisplayMinimalFrame(this);
3241}
3242
3243// -----------------------------------------------------------------------
3244
3245FormMain::~FormMain()
3246{
3247}
3248
3249// -----------------------------------------------------------------------
3250
3251IMPLEMENT_APP(cxApplication)
3252
3253bool cxApplication::OnInit()
3254{
3255 //wxLocale Locale;
3256 //Locale.Init(wxLANGUAGE_FINNISH);
3257
08c1613f
JS
3258 FormMain* frame = Form1 = new FormMain( wxT("wxPropertyGrid Sample"), wxPoint(0,0), wxSize(300,500) );
3259 frame->Show(true);
1c4293cb
VZ
3260
3261 //
3262 // Parse command-line
3263 wxApp& app = wxGetApp();
3264 if ( app.argc > 1 )
3265 {
3266 wxString s = app.argv[1];
3267 if ( s == wxT("--run-tests") )
3268 {
3269 //
3270 // Run tests
3271 bool testResult = frame->RunTests(true);
3272
3273 if ( testResult )
3274 return false;
3275 }
3276 }
3277
08c1613f 3278 return true;
1c4293cb
VZ
3279}
3280
3281// -----------------------------------------------------------------------
3282
3283void FormMain::OnIdle( wxIdleEvent& event )
3284{
3285 /*
3286 // This code is useful for debugging focus problems
3287 static wxWindow* last_focus = (wxWindow*) NULL;
3288
3289 wxWindow* cur_focus = ::wxWindow::FindFocus();
3290
3291 if ( cur_focus != last_focus )
3292 {
3293 const wxChar* class_name = wxT("<none>");
3294 if ( cur_focus )
3295 class_name = cur_focus->GetClassInfo()->GetClassName();
3296 last_focus = cur_focus;
3297 wxLogDebug( wxT("FOCUSED: %s %X"),
3298 class_name,
3299 (unsigned int)cur_focus);
3300 }
3301 */
3302
3303 event.Skip();
3304}
3305
3306// -----------------------------------------------------------------------