samples/newgrid/griddemo.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        griddemo.cpp
   3 // Purpose:     Grid control wxWindows sample
   4 // Author:      Michael Bedward
   5 // Modified by:
   6 // RCS-ID:      $Id$
   7 // Copyright:   (c) Michael Bedward, Julian Smart
   8 // Licence:     wxWindows license
   9 /////////////////////////////////////////////////////////////////////////////
  10
  11 // ============================================================================
  12 // declarations
  13 // ============================================================================
  14
  15 // ----------------------------------------------------------------------------
  16 // headers
  17 // ----------------------------------------------------------------------------
  18
  19 #ifdef __GNUG__
  20     #pragma implementation
  21     #pragma interface
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx/wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28 #pragma hdrstop
  29 #endif
  30
  31 #ifndef WX_PRECOMP
  32 #include "wx/wx.h"
  33 #endif
  34
  35 #include "wx/colordlg.h"
  36
  37 #include "wx/grid.h"
  38
  39 #include "griddemo.h"
  40
  41 // ----------------------------------------------------------------------------
  42 // wxWin macros
  43 // ----------------------------------------------------------------------------
  44
  45 IMPLEMENT_APP( GridApp )
  46
  47 // ============================================================================
  48 // implementation
  49 // ============================================================================
  50
  51 // ----------------------------------------------------------------------------
  52 // GridApp
  53 // ----------------------------------------------------------------------------
  54
  55 bool GridApp::OnInit()
  56 {
  57     GridFrame *frame = new GridFrame;
  58     frame->Show( TRUE );
  59
  60     return TRUE;
  61 }
  62
  63 // ----------------------------------------------------------------------------
  64 // GridFrame
  65 // ----------------------------------------------------------------------------
  66
  67 BEGIN_EVENT_TABLE( GridFrame, wxFrame )
  68     EVT_MENU( ID_TOGGLEROWLABELS,  GridFrame::ToggleRowLabels )
  69     EVT_MENU( ID_TOGGLECOLLABELS,  GridFrame::ToggleColLabels )
  70     EVT_MENU( ID_TOGGLEEDIT, GridFrame::ToggleEditing )
  71     EVT_MENU( ID_SETLABELCOLOUR, GridFrame::SetLabelColour )
  72     EVT_MENU( ID_SETLABELTEXTCOLOUR, GridFrame::SetLabelTextColour )
  73     EVT_MENU( ID_ROWLABELHORIZALIGN, GridFrame::SetRowLabelHorizAlignment )
  74     EVT_MENU( ID_ROWLABELVERTALIGN, GridFrame::SetRowLabelVertAlignment )
  75     EVT_MENU( ID_COLLABELHORIZALIGN, GridFrame::SetColLabelHorizAlignment )
  76     EVT_MENU( ID_COLLABELVERTALIGN, GridFrame::SetColLabelVertAlignment )
  77     EVT_MENU( ID_GRIDLINECOLOUR, GridFrame::SetGridLineColour )
  78     EVT_MENU( ID_INSERTROW, GridFrame::InsertRow )
  79     EVT_MENU( ID_INSERTCOL, GridFrame::InsertCol )
  80     EVT_MENU( ID_DELETEROW, GridFrame::DeleteSelectedRows )
  81     EVT_MENU( ID_DELETECOL, GridFrame::DeleteSelectedCols )
  82     EVT_MENU( ID_CLEARGRID, GridFrame::ClearGrid )
  83
  84     EVT_MENU( ID_SET_CELL_FG_COLOUR, GridFrame::SetCellFgColour )
  85     EVT_MENU( ID_SET_CELL_BG_COLOUR, GridFrame::SetCellBgColour )
  86
  87     EVT_MENU( ID_ABOUT, GridFrame::About )
  88     EVT_MENU( wxID_EXIT, GridFrame::OnQuit )
  89     EVT_MENU( ID_VTABLE, GridFrame::OnVTable)
  90
  91     EVT_GRID_LABEL_LEFT_CLICK( GridFrame::OnLabelLeftClick )
  92     EVT_GRID_CELL_LEFT_CLICK( GridFrame::OnCellLeftClick )
  93     EVT_GRID_ROW_SIZE( GridFrame::OnRowSize )
  94     EVT_GRID_COL_SIZE( GridFrame::OnColSize )
  95     EVT_GRID_SELECT_CELL( GridFrame::OnSelectCell )
  96     EVT_GRID_RANGE_SELECT( GridFrame::OnRangeSelected )
  97     EVT_GRID_CELL_CHANGE( GridFrame::OnCellValueChanged )
  98
  99     EVT_GRID_EDITOR_SHOWN( GridFrame::OnEditorShown )
 100     EVT_GRID_EDITOR_HIDDEN( GridFrame::OnEditorHidden )
 101 END_EVENT_TABLE()
 102
 103
 104 GridFrame::GridFrame()
 105         : wxFrame( (wxFrame *)NULL, -1, "wxWindows grid class demo",
 106                    wxDefaultPosition,
 107                    wxDefaultSize )
 108 {
 109     int gridW = 600, gridH = 300;
 110     int logW = gridW, logH = 100;
 111
 112     wxMenu *fileMenu = new wxMenu;
 113     fileMenu->Append( ID_VTABLE, "&Virtual table test");
 114     fileMenu->AppendSeparator();
 115     fileMenu->Append( wxID_EXIT, "E&xit\tAlt-X" );
 116
 117     wxMenu *viewMenu = new wxMenu;
 118     viewMenu->Append( ID_TOGGLEROWLABELS,  "&Row labels", "", TRUE );
 119     viewMenu->Append( ID_TOGGLECOLLABELS,  "&Col labels", "", TRUE );
 120     viewMenu->Append( ID_TOGGLEEDIT,  "&Editable", "", TRUE );
 121
 122     wxMenu *rowLabelMenu = new wxMenu;
 123
 124     viewMenu->Append( ID_ROWLABELALIGN, "R&ow label alignment",
 125                       rowLabelMenu,
 126                       "Change alignment of row labels" );
 127
 128     rowLabelMenu->Append( ID_ROWLABELHORIZALIGN, "&Horizontal" );
 129     rowLabelMenu->Append( ID_ROWLABELVERTALIGN, "&Vertical" );
 130
 131     wxMenu *colLabelMenu = new wxMenu;
 132
 133     viewMenu->Append( ID_COLLABELALIGN, "Col l&abel alignment",
 134                       colLabelMenu,
 135                       "Change alignment of col labels" );
 136
 137     colLabelMenu->Append( ID_COLLABELHORIZALIGN, "&Horizontal" );
 138     colLabelMenu->Append( ID_COLLABELVERTALIGN, "&Vertical" );
 139
 140     wxMenu *colMenu = new wxMenu;
 141     colMenu->Append( ID_SETLABELCOLOUR, "Set &label colour" );
 142     colMenu->Append( ID_SETLABELTEXTCOLOUR, "Set label &text colour" );
 143     colMenu->Append( ID_GRIDLINECOLOUR, "&Grid line colour" );
 144     colMenu->Append( ID_SET_CELL_FG_COLOUR, "Set cell &foreground colour" );
 145     colMenu->Append( ID_SET_CELL_BG_COLOUR, "Set cell &background colour" );
 146
 147     wxMenu *editMenu = new wxMenu;
 148     editMenu->Append( ID_INSERTROW, "Insert &row" );
 149     editMenu->Append( ID_INSERTCOL, "Insert &column" );
 150     editMenu->Append( ID_DELETEROW, "Delete selected ro&ws" );
 151     editMenu->Append( ID_DELETECOL, "Delete selected co&ls" );
 152     editMenu->Append( ID_CLEARGRID, "Cl&ear grid cell contents" );
 153
 154     wxMenu *helpMenu = new wxMenu;
 155     helpMenu->Append( ID_ABOUT, "&About wxGrid demo" );
 156
 157     wxMenuBar *menuBar = new wxMenuBar;
 158     menuBar->Append( fileMenu, "&File" );
 159     menuBar->Append( viewMenu, "&View" );
 160     menuBar->Append( colMenu,  "&Colours" );
 161     menuBar->Append( editMenu, "&Edit" );
 162     menuBar->Append( helpMenu, "&Help" );
 163
 164     SetMenuBar( menuBar );
 165
 166     grid = new wxGrid( this,
 167                        -1,
 168                        wxPoint( 0, 0 ),
 169                        wxSize( 400, 300 ) );
 170
 171     logWin = new wxTextCtrl( this,
 172                              -1,
 173                              wxEmptyString,
 174                              wxPoint( 0, gridH + 20 ),
 175                              wxSize( logW, logH ),
 176                              wxTE_MULTILINE );
 177
 178     logger = new wxLogTextCtrl( logWin );
 179     logger->SetActiveTarget( logger );
 180     logger->SetTimestamp( NULL );
 181
 182     // this will create a grid and, by default, an associated grid
 183     // table for string data
 184     //
 185     grid->CreateGrid( 100, 100 );
 186
 187     grid->SetRowSize( 0, 60 );
 188     grid->SetCellValue( 0, 0, "Ctrl+Home\nwill go to\nthis cell" );
 189
 190     grid->SetCellValue( 0, 1, "Blah" );
 191     grid->SetCellValue( 0, 2, "Blah" );
 192     grid->SetCellValue( 0, 3, "Read only" );
 193     grid->SetReadOnly( 0, 3 );
 194
 195     grid->SetCellValue( 0, 5, "Press\nCtrl+arrow\nto skip over\ncells" );
 196
 197     grid->SetRowSize( 99, 60 );
 198     grid->SetCellValue( 99, 99, "Ctrl+End\nwill go to\nthis cell" );
 199
 200     grid->SetCellValue(2, 2, "red");
 201
 202     grid->SetCellTextColour(2, 2, *wxRED);
 203     grid->SetCellValue(3, 3, "green on grey");
 204     grid->SetCellTextColour(3, 3, *wxGREEN);
 205     grid->SetCellBackgroundColour(3, 3, *wxLIGHT_GREY);
 206
 207     grid->SetCellValue(4, 4, "a weird looking cell");
 208     grid->SetCellAlignment(4, 4, wxCENTRE, wxCENTRE);
 209     grid->SetCellRenderer(4, 4, new MyGridCellRenderer);
 210
 211     wxGridCellAttr *attr;
 212     attr = new wxGridCellAttr;
 213     attr->SetTextColour(*wxBLUE);
 214     grid->SetColAttr(5, attr);
 215     attr = new wxGridCellAttr;
 216     attr->SetBackgroundColour(*wxBLUE);
 217     grid->SetRowAttr(5, attr);
 218
 219     // VZ: cell borders don't look nice otherwise :-) (for now...)
 220     grid->SetDefaultCellBackgroundColour(wxColour(200, 200, 180));
 221
 222     wxBoxSizer *topSizer = new wxBoxSizer( wxVERTICAL );
 223     topSizer->Add( grid,
 224                    1,
 225                    wxEXPAND );
 226
 227     topSizer->Add( logWin,
 228                    0,
 229                    wxEXPAND );
 230
 231     SetAutoLayout( TRUE );
 232     SetSizer( topSizer );
 233
 234     topSizer->Fit( this );
 235     topSizer->SetSizeHints( this );
 236
 237     Centre();
 238     SetDefaults();
 239 }
 240
 241
 242 GridFrame::~GridFrame()
 243 {
 244 }
 245
 246
 247 void GridFrame::SetDefaults()
 248 {
 249     GetMenuBar()->Check( ID_TOGGLEROWLABELS, TRUE );
 250     GetMenuBar()->Check( ID_TOGGLECOLLABELS, TRUE );
 251     GetMenuBar()->Check( ID_TOGGLEEDIT, TRUE );
 252 }
 253
 254
 255 void GridFrame::ToggleRowLabels( wxCommandEvent& WXUNUSED(ev) )
 256 {
 257     if ( GetMenuBar()->IsChecked( ID_TOGGLEROWLABELS ) )
 258     {
 259         grid->SetRowLabelSize( grid->GetDefaultRowLabelSize() );
 260     }
 261     else
 262     {
 263         grid->SetRowLabelSize( 0 );
 264     }
 265 }
 266
 267
 268 void GridFrame::ToggleColLabels( wxCommandEvent& WXUNUSED(ev) )
 269 {
 270     if ( GetMenuBar()->IsChecked( ID_TOGGLECOLLABELS ) )
 271     {
 272         grid->SetColLabelSize( grid->GetDefaultColLabelSize() );
 273     }
 274     else
 275     {
 276         grid->SetColLabelSize( 0 );
 277     }
 278 }
 279
 280
 281 void GridFrame::ToggleEditing( wxCommandEvent& WXUNUSED(ev) )
 282 {
 283     grid->EnableEditing(
 284         GetMenuBar()->IsChecked( ID_TOGGLEEDIT ) );
 285 }
 286
 287
 288 void GridFrame::SetLabelColour( wxCommandEvent& WXUNUSED(ev) )
 289 {
 290     wxColourDialog dlg( NULL );
 291     if ( dlg.ShowModal() == wxID_OK )
 292     {
 293         wxColourData retData;
 294         retData = dlg.GetColourData();
 295         wxColour colour = retData.GetColour();
 296
 297         grid->SetLabelBackgroundColour( colour );
 298     }
 299 }
 300
 301
 302 void GridFrame::SetLabelTextColour( wxCommandEvent& WXUNUSED(ev) )
 303 {
 304     wxColourDialog dlg( NULL );
 305     if ( dlg.ShowModal() == wxID_OK )
 306     {
 307         wxColourData retData;
 308         retData = dlg.GetColourData();
 309         wxColour colour = retData.GetColour();
 310
 311         grid->SetLabelTextColour( colour );
 312     }
 313 }
 314
 315
 316 void GridFrame::SetRowLabelHorizAlignment( wxCommandEvent& WXUNUSED(ev) )
 317 {
 318     int horiz, vert;
 319     grid->GetRowLabelAlignment( &horiz, &vert );
 320
 321     switch ( horiz )
 322     {
 323         case wxLEFT:
 324             horiz = wxCENTRE;
 325             break;
 326
 327         case wxCENTRE:
 328             horiz = wxRIGHT;
 329             break;
 330
 331         case wxRIGHT:
 332             horiz = wxLEFT;
 333             break;
 334     }
 335
 336     grid->SetRowLabelAlignment( horiz, -1 );
 337 }
 338
 339 void GridFrame::SetRowLabelVertAlignment( wxCommandEvent& WXUNUSED(ev) )
 340 {
 341     int horiz, vert;
 342     grid->GetRowLabelAlignment( &horiz, &vert );
 343
 344     switch ( vert )
 345     {
 346         case wxTOP:
 347             vert = wxCENTRE;
 348             break;
 349
 350         case wxCENTRE:
 351             vert = wxBOTTOM;
 352             break;
 353
 354         case wxBOTTOM:
 355             vert = wxTOP;
 356             break;
 357     }
 358
 359     grid->SetRowLabelAlignment( -1, vert );
 360 }
 361
 362
 363 void GridFrame::SetColLabelHorizAlignment( wxCommandEvent& WXUNUSED(ev) )
 364 {
 365     int horiz, vert;
 366     grid->GetColLabelAlignment( &horiz, &vert );
 367
 368     switch ( horiz )
 369     {
 370         case wxLEFT:
 371             horiz = wxCENTRE;
 372             break;
 373
 374         case wxCENTRE:
 375             horiz = wxRIGHT;
 376             break;
 377
 378         case wxRIGHT:
 379             horiz = wxLEFT;
 380             break;
 381     }
 382
 383     grid->SetColLabelAlignment( horiz, -1 );
 384 }
 385
 386
 387 void GridFrame::SetColLabelVertAlignment( wxCommandEvent& WXUNUSED(ev) )
 388 {
 389     int horiz, vert;
 390     grid->GetColLabelAlignment( &horiz, &vert );
 391
 392     switch ( vert )
 393     {
 394         case wxTOP:
 395             vert = wxCENTRE;
 396             break;
 397
 398         case wxCENTRE:
 399             vert = wxBOTTOM;
 400             break;
 401
 402         case wxBOTTOM:
 403             vert = wxTOP;
 404             break;
 405     }
 406
 407     grid->SetColLabelAlignment( -1, vert );
 408 }
 409
 410
 411 void GridFrame::SetGridLineColour( wxCommandEvent& WXUNUSED(ev) )
 412 {
 413     wxColourDialog dlg( NULL );
 414     if ( dlg.ShowModal() == wxID_OK )
 415     {
 416         wxColourData retData;
 417         retData = dlg.GetColourData();
 418         wxColour colour = retData.GetColour();
 419
 420         grid->SetGridLineColour( colour );
 421     }
 422 }
 423
 424
 425 void GridFrame::InsertRow( wxCommandEvent& WXUNUSED(ev) )
 426 {
 427     grid->InsertRows( grid->GetGridCursorRow(), 1 );
 428 }
 429
 430
 431 void GridFrame::InsertCol( wxCommandEvent& WXUNUSED(ev) )
 432 {
 433     grid->InsertCols( grid->GetGridCursorCol(), 1 );
 434 }
 435
 436
 437 void GridFrame::DeleteSelectedRows( wxCommandEvent& WXUNUSED(ev) )
 438 {
 439     if ( grid->IsSelection() )
 440     {
 441         int topRow, bottomRow, leftCol, rightCol;
 442         grid->GetSelection( &topRow, &leftCol, &bottomRow, &rightCol );
 443         grid->DeleteRows( topRow, bottomRow - topRow + 1 );
 444     }
 445 }
 446
 447
 448 void GridFrame::DeleteSelectedCols( wxCommandEvent& WXUNUSED(ev) )
 449 {
 450     if ( grid->IsSelection() )
 451     {
 452         int topRow, bottomRow, leftCol, rightCol;
 453         grid->GetSelection( &topRow, &leftCol, &bottomRow, &rightCol );
 454         grid->DeleteCols( leftCol, rightCol - leftCol + 1 );
 455     }
 456 }
 457
 458
 459 void GridFrame::ClearGrid( wxCommandEvent& WXUNUSED(ev) )
 460 {
 461     grid->ClearGrid();
 462 }
 463
 464 void GridFrame::SetCellFgColour( wxCommandEvent& WXUNUSED(ev) )
 465 {
 466     wxColour col = wxGetColourFromUser(this);
 467     if ( col.Ok() )
 468     {
 469         grid->SetDefaultCellTextColour(col);
 470         grid->Refresh();
 471     }
 472 }
 473
 474 void GridFrame::SetCellBgColour( wxCommandEvent& WXUNUSED(ev) )
 475 {
 476     wxColour col = wxGetColourFromUser(this);
 477     if ( col.Ok() )
 478     {
 479         grid->SetDefaultCellBackgroundColour(col);
 480         grid->Refresh();
 481     }
 482 }
 483
 484 void GridFrame::OnLabelLeftClick( wxGridEvent& ev )
 485 {
 486     logBuf = "";
 487     if ( ev.GetRow() != -1 )
 488     {
 489         logBuf << "Left click on row label " << ev.GetRow();
 490     }
 491     else if ( ev.GetCol() != -1 )
 492     {
 493         logBuf << "Left click on col label " << ev.GetCol();
 494     }
 495     else
 496     {
 497         logBuf << "Left click on corner label";
 498     }
 499
 500     if ( ev.ShiftDown() ) logBuf << " (shift down)";
 501     wxLogMessage( "%s", logBuf.c_str() );
 502
 503     // you must call event skip if you want default grid processing
 504     //
 505     ev.Skip();
 506 }
 507
 508
 509 void GridFrame::OnCellLeftClick( wxGridEvent& ev )
 510 {
 511     logBuf = "";
 512     logBuf << "Left click at row " << ev.GetRow()
 513            << " col " << ev.GetCol();
 514     wxLogMessage( "%s", logBuf.c_str() );
 515
 516     // you must call event skip if you want default grid processing
 517     // (cell highlighting etc.)
 518     //
 519     ev.Skip();
 520 }
 521
 522
 523 void GridFrame::OnRowSize( wxGridSizeEvent& ev )
 524 {
 525     logBuf = "";
 526     logBuf << "Resized row " << ev.GetRowOrCol();
 527     wxLogMessage( "%s", logBuf.c_str() );
 528
 529     ev.Skip();
 530 }
 531
 532
 533 void GridFrame::OnColSize( wxGridSizeEvent& ev )
 534 {
 535     logBuf = "";
 536     logBuf << "Resized col " << ev.GetRowOrCol();
 537     wxLogMessage( "%s", logBuf.c_str() );
 538
 539     ev.Skip();
 540 }
 541
 542
 543 void GridFrame::OnSelectCell( wxGridEvent& ev )
 544 {
 545     logBuf = "";
 546     logBuf << "Selected cell at row " << ev.GetRow()
 547            << " col " << ev.GetCol();
 548     wxLogMessage( "%s", logBuf.c_str() );
 549
 550     // you must call Skip() if you want the default processing
 551     // to occur in wxGrid
 552     ev.Skip();
 553 }
 554
 555 void GridFrame::OnRangeSelected( wxGridRangeSelectEvent& ev )
 556 {
 557     logBuf = "";
 558     logBuf  << "Selected cells from row " << ev.GetTopRow()
 559             << " col " << ev.GetLeftCol()
 560             << " to row " << ev.GetBottomRow()
 561             << " col " << ev.GetRightCol();
 562
 563     wxLogMessage( "%s", logBuf.c_str() );
 564
 565     ev.Skip();
 566 }
 567
 568 void GridFrame::OnCellValueChanged( wxGridEvent& ev )
 569 {
 570     logBuf = "";
 571     logBuf  << "Value changed for cell at"
 572             << " row " << ev.GetRow()
 573             << " col " << ev.GetCol();
 574
 575     wxLogMessage( "%s", logBuf.c_str() );
 576
 577     ev.Skip();
 578 }
 579
 580 void GridFrame::OnEditorShown( wxGridEvent& ev )
 581 {
 582     wxLogMessage( "Cell editor shown." );
 583
 584     ev.Skip();
 585 }
 586
 587 void GridFrame::OnEditorHidden( wxGridEvent& ev )
 588 {
 589     wxLogMessage( "Cell editor hidden." );
 590
 591     ev.Skip();
 592 }
 593
 594 void GridFrame::About(  wxCommandEvent& WXUNUSED(ev) )
 595 {
 596     (void)wxMessageBox( "\n\nwxGrid demo \n\n"
 597                         "Michael Bedward \n"
 598                         "mbedward@ozemail.com.au \n\n",
 599                         "About",
 600                         wxOK );
 601 }
 602
 603
 604 void GridFrame::OnQuit( wxCommandEvent& WXUNUSED(ev) )
 605 {
 606     Close( TRUE );
 607 }
 608
 609 void GridFrame::OnVTable(wxCommandEvent& )
 610 {
 611     BigGridFrame* win = new BigGridFrame();
 612     win->Show(TRUE);
 613 }
 614
 615 // ----------------------------------------------------------------------------
 616 // MyGridCellRenderer
 617 // ----------------------------------------------------------------------------
 618
 619 // do something that the default renderer doesn't here just to show that it is
 620 // possible to alter the appearance of the cell beyond what the attributes
 621 // allow
 622 void MyGridCellRenderer::Draw(wxGrid& grid,
 623                               wxGridCellAttr& attr,
 624                               wxDC& dc,
 625                               const wxRect& rect,
 626                               int row, int col,
 627                               bool isSelected)
 628 {
 629     wxGridCellStringRenderer::Draw(grid, attr, dc, rect, row, col, isSelected);
 630
 631     dc.SetPen(*wxGREEN_PEN);
 632     dc.SetBrush(*wxTRANSPARENT_BRUSH);
 633     dc.DrawEllipse(rect);
 634 }
 635
 636
 637 // ----------------------------------------------------------------------------
 638 // BigGridFrame and BigGridTable:  Sample of a non-standard table
 639 // ----------------------------------------------------------------------------
 640
 641 BigGridFrame::BigGridFrame()
 642     : wxFrame(NULL, -1, "Plugin Virtual Table", wxDefaultPosition,
 643               wxSize(500, 450))
 644 {
 645     m_grid = new wxGrid(this, -1, wxDefaultPosition, wxDefaultSize);
 646     m_table = new BigGridTable;
 647     m_grid->SetTable(m_table, TRUE);
 648 }