samples/propgrid/propgrid.cpp

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