demos/dbbrowse/dbgrid.cpp

   1 //----------------------------------------------------------------------------------------
   2 // Name:        DBGrid.cpp
   3 // Purpose:     wxGrid sample
   4 // Author:      Mark Johnson
   5 // Modified by: 19990929.mj10777 a reuseable DBGrid
   6 // Created:     19990929
   7 // Copyright:   (c)
   8 // Licence:     wxWindows license
   9 // RCS-ID:      $Id$
  10 //----------------------------------------------------------------------------------------
  11 //-- all #ifdefs that the whole Project needs. -------------------------------------------
  12 //----------------------------------------------------------------------------------------
  13 #ifdef __GNUG__
  14 #pragma implementation
  15 #pragma interface
  16 #endif
  17 //----------------------------------------------------------------------------------------
  18 // For compilers that support precompilation, includes "wx/wx.h".
  19 #include "wx/wxprec.h"
  20 //----------------------------------------------------------------------------------------
  21 #ifdef __BORLANDC__
  22 #pragma hdrstop
  23 #endif
  24 //----------------------------------------------------------------------------------------
  25 #ifndef WX_PRECOMP
  26 #include "wx/wx.h"
  27 #endif
  28 //----------------------------------------------------------------------------------------
  29 //-- all #includes that every .cpp needs             --- 19990807.mj10777 ----------------
  30 //----------------------------------------------------------------------------------------
  31 #include "std.h"    // sorgsam Pflegen !
  32 //----------------------------------------------------------------------------------------
  33 BEGIN_EVENT_TABLE(DBGrid, wxGrid)
  34  EVT_MOTION (DBGrid::OnMouseMove)
  35  // DBGrid
  36  EVT_GRID_LABEL_LEFT_CLICK( DBGrid::OnLabelLeftClick )
  37  EVT_GRID_LABEL_RIGHT_CLICK( DBGrid::OnLabelRightClick )
  38  EVT_GRID_LABEL_LEFT_DCLICK( DBGrid::OnLabelLeftDClick )
  39  EVT_GRID_LABEL_RIGHT_DCLICK( DBGrid::OnLabelRightDClick )
  40  EVT_GRID_CELL_LEFT_CLICK( DBGrid::OnCellLeftClick )
  41  EVT_GRID_CELL_RIGHT_CLICK( DBGrid::OnCellRightClick )
  42  EVT_GRID_CELL_LEFT_DCLICK( DBGrid::OnCellLeftDClick )
  43  EVT_GRID_CELL_RIGHT_DCLICK( DBGrid::OnCellRightDClick )
  44  EVT_GRID_ROW_SIZE( DBGrid::OnRowSize )
  45  // EVT_GRID_COL_SIZE( DBGrid::OnColSize )
  46  EVT_GRID_RANGE_SELECT( DBGrid::OnRangeSelected )
  47  EVT_GRID_CELL_CHANGE( DBGrid::OnCellChange )
  48  EVT_MENU(GRID_EDIT,DBGrid::OnModusEdit)
  49  EVT_MENU(GRID_BROWSE,DBGrid::OnModusBrowse)
  50 END_EVENT_TABLE()
  51 //----------------------------------------------------------------------------------------
  52 //           wxListCtrl(parent, id, pos, size, style)
  53 //           wxGrid(parent,-1,wxPoint( 0, 0 ), wxSize( 400, 300 ) );
  54 //----------------------------------------------------------------------------------------
  55 // DBGrid
  56 //----------------------------------------------------------------------------------------
  57 // DBGrid::DBGrid(wxWindow *parent, const wxWindowID id,const wxPoint& pos,const wxSize& size):
  58 //          wxGrid(parent, id, pos, size)
  59 DBGrid::DBGrid(wxWindow *parent, const wxWindowID id,const wxPoint& pos,const wxSize& size, long style):
  60   wxGrid(parent, id, pos, size, style)
  61 {
  62  b_EditModus = TRUE;
  63  //---------------------------------------------------------------------------------------
  64  popupMenu1 = new wxMenu("");
  65  popupMenu1->Append(GRID_EDIT, _("Edit Modus"));
  66  popupMenu2 = new wxMenu("");
  67  popupMenu2->Append(GRID_BROWSE, _("Browse Modus"));
  68 }
  69 //----------------------------------------------------------------------------------------
  70 DBGrid::~DBGrid()
  71 {
  72 }
  73 //----------------------------------------------------------------------------------------
  74 int  DBGrid::OnTableView(wxString Table)
  75 {
  76  wxStopWatch sw;
  77  //---------------------------------------------------------------------------------------
  78  int  i=0,x,y,z, ValidTable=0;
  79  wxString Temp0;
  80  wxBeginBusyCursor();
  81  SetFont(* pDoc->ft_Doc);
  82  //---------------------------------------------------------------------------------------
  83  ct_BrowserDB = (db_Br+i_Which)->ct_BrowserDB;                       // Get the DSN Pointer
  84  //---------------------------------------------------------------------------------------
  85  if (ct_BrowserDB)                                                   // Valid pointer (!= NULL) ?
  86  {      // Pointer is Valid, use the wxDatabase Information
  87   for (x=0;x<ct_BrowserDB->numTables;x++)                            // go through the Tables
  88   {
  89    if (!wxStrcmp((ct_BrowserDB->pTableInf+x)->tableName,Table))      // is this our Table ?
  90    {    // Yes, the Data of this Table shall be put into the Grid
  91     ValidTable = x;                                                  // Save the Tablenumber
  92     (db_Br+i_Which)->OnSelect(Table,FALSE);                          // Select * from "table"
  93      // Set the local Pointer to the Column Information we are going to use
  94     (db_Br+i_Which)->cl_BrowserDB = (ct_BrowserDB->pTableInf+x)->pColInf;
  95     if ((ct_BrowserDB->pTableInf+x)->pColInf)                        // Valid pointer (!= NULL) ?
  96     {   // Pointer is Valid, Column Informationen sind Vorhanden
  97      i = (db_Br+i_Which)->i_Records;                                 // How many Records are there
  98      (db_Br+i_Which)->i_Which = ValidTable;                          // Still used ???? mj10777
  99      if (i == 0)     // If the Table is empty, then show one empty row
 100       i++;
 101      // wxLogMessage(_("\n-I-> DBGrid::OnTableView() : Vor CreateGrid"));
 102      CreateGrid(i,(ct_BrowserDB->pTableInf+x)->numCols);             // Records , Columns
 103      for (y=0;y<(ct_BrowserDB->pTableInf+x)->numCols;y++)            // Loop through the Fields
 104      {  // The Field / Column name is used here as Row Titel
 105       SetColLabelValue(y,((ct_BrowserDB->pTableInf+x)->pColInf+y)->colName);
 106       SetColSize(y,95);
 107      }  // for (y=0;y<(ct_BrowserDB->pTableInf+x)->numCols;y++)
 108      SetColSize(((ct_BrowserDB->pTableInf+x)->numCols-1),120);       // Make the last Column Wider
 109      // The Grid has been created, now fill it
 110      for (z=0;z<(db_Br+i_Which)->i_Records;z++)                      // Loop through the Records
 111      {
 112       Temp0.Printf("%06d",z+1);  SetRowLabelValue(z,Temp0);          // Set Row Lable Value
 113       (db_Br+i_Which)->OnGetNext((ct_BrowserDB->pTableInf+ValidTable)->numCols,FALSE);
 114       for (y=0;y<(ct_BrowserDB->pTableInf+ValidTable)->numCols;y++) // Loop through the Fields
 115       { // BrowserDB::OnGetNext Formats the field Value into tablename
 116        SetCellValue(z, y,((db_Br+i_Which)->cl_BrowserDB+y)->tableName);
 117       }
 118       if (z % 50 == 0)
 119       {
 120        Temp0.Printf(_("-I-> DBGrid::OnTableView(%s) - Record %6d has been read."),Table.c_str(),z);
 121        pDoc->p_MainFrame->SetStatusText(Temp0, 0);
 122       }
 123      }  // for (z=0;z<(db_Br+i_Which)->i_Records;z++)
 124      Temp0.Printf(_("-I-> DBGrid::OnTableView(%s) - %6d Records have been read. - Time needed : %ld ms"),Table.c_str(),z,sw.Time());
 125      wxLogMessage(Temp0);
 126      pDoc->p_MainFrame->SetStatusText(Temp0, 0);
 127      // The Grid has been filled, now leave
 128      goto Weiter;
 129     }   // if ((ct_BrowserDB->pTableInf+x)->pColInf)
 130     else
 131      wxLogMessage(_("\n-E-> DBGrid::OnTableView() : Invalid Column Pointer : Failed"));
 132    }    // if ((ct_BrowserDB->pTableInf+x)->tableType == "TABLE")
 133   }     // for (x=0;x<ct_BrowserDB->numTables;x++)
 134  }      // if (ct_BrowserDB)
 135  else
 136   wxLogMessage(_("\n-E-> DBGrid::OnTableView() : Invalid DSN Pointer : Failed"));
 137  //---------------------------------------------------------------------------------------
 138  Weiter:
 139  SetEditInPlace(b_EditModus);   // Activate in-place Editing (FALSE)
 140  wxEndBusyCursor();
 141  //---------------------------------------------------------------------------------------
 142  wxLogMessage(_("-I-> DBGrid::OnTableView() - End"));
 143  return 0;
 144 }
 145 //----------------------------------------------------------------------------------------
 146 void DBGrid::OnModusEdit(wxMenu& menu, wxCommandEvent& event)
 147 {
 148  b_EditModus = TRUE;             // Needed by PopupMenu
 149  SetEditable(FALSE);             // Do not Edit with Text Edit Control
 150  SetEditInPlace(b_EditModus);    // Deactivate in-place Editing
 151  UpdateDimensions();             // Redraw the Grid
 152 }
 153 //----------------------------------------------------------------------------------------
 154 void DBGrid::OnModusBrowse(wxMenu& menu, wxCommandEvent& event)
 155 {
 156  b_EditModus = FALSE;            // Needed by PopupMenu
 157  SetEditInPlace(b_EditModus);    // Deactivate in-place Editing
 158  UpdateDimensions();             // Redraw the Grid
 159 }
 160 //----------------------------------------------------------------------------------------
 161 void DBGrid::OnMouseMove(wxMouseEvent &event)
 162 {
 163  MousePos = event.GetPosition();
 164 }
 165 //----------------------------------------------------------------------------------------
 166 void DBGrid::OnLabelLeftClick( wxGridEvent& ev )
 167 {
 168  logBuf = "DBGrid::OnLabelLeftClick : ";
 169  if ( ev.GetRow() != -1 )
 170  {
 171   logBuf << "row label " << ev.GetRow();
 172  }
 173  else if ( ev.GetCol() != -1 )
 174  {
 175   logBuf << "col label " << ev.GetCol();
 176  }
 177  else
 178  {
 179   logBuf << "corner label";
 180  }
 181  if ( ev.ShiftDown() )
 182   logBuf << " (shift down)";
 183  // wxLogMessage( "%s", logBuf.c_str() );
 184  logBuf += "\n";
 185  wxLogMessage(logBuf.c_str());
 186  ev.Skip();
 187 }
 188 //----------------------------------------------------------------------------------------
 189 void DBGrid::OnLabelRightClick( wxGridEvent& ev )
 190 {
 191  //-------------------
 192  if (b_EditModus)
 193   PopupMenu(popupMenu2,MousePos.x,MousePos.y);
 194  else
 195   PopupMenu(popupMenu1,MousePos.x,MousePos.y);
 196  //-------------------
 197  logBuf = "DBGrid::OnLabelRightClick : ";
 198  if ( ev.GetRow() != -1 )
 199  {
 200   logBuf << "row label " << ev.GetRow();
 201  }
 202  else if ( ev.GetCol() != -1 )
 203  {
 204   logBuf << "col label " << ev.GetCol();
 205  }
 206  else
 207  {
 208   logBuf << "corner label";
 209  }
 210  if ( ev.ShiftDown() )
 211   logBuf << " (shift down)";
 212  // wxLogMessage( "%s", logBuf.c_str() );
 213  logBuf += "\n";
 214  wxLogMessage(logBuf.c_str());
 215  ev.Skip();
 216 }
 217 //----------------------------------------------------------------------------------------
 218 void DBGrid::OnLabelLeftDClick( wxGridEvent& ev )
 219 {
 220  logBuf = "DBGrid::OnLabelLeftDClick : ";
 221  if ( ev.GetRow() != -1 )
 222  {
 223   logBuf << "row label " << ev.GetRow();
 224  }
 225  else if ( ev.GetCol() != -1 )
 226  {
 227   logBuf << "col label " << ev.GetCol();
 228  }
 229  else
 230  {
 231   logBuf << "corner label";
 232  }
 233  if ( ev.ShiftDown() )
 234   logBuf << " (shift down)";
 235  // wxLogMessage( "%s", logBuf.c_str() );
 236  logBuf += "\n";
 237  wxLogMessage(logBuf.c_str());
 238  ev.Skip();
 239 }
 240 //----------------------------------------------------------------------------------------
 241 void DBGrid::OnLabelRightDClick( wxGridEvent& ev )
 242 {
 243  logBuf = "DBGrid::OnLabelRightDClick : ";
 244  if ( ev.GetRow() != -1 )
 245  {
 246   logBuf << "row label " << ev.GetRow();
 247  }
 248  else if ( ev.GetCol() != -1 )
 249  {
 250   logBuf << "col label " << ev.GetCol();
 251  }
 252  else
 253  {
 254   logBuf << "corner label";
 255  }
 256  if ( ev.ShiftDown() )
 257   logBuf << " (shift down)";
 258  // wxLogMessage( "%s", logBuf.c_str() );
 259  logBuf += "\n";
 260  wxLogMessage(logBuf.c_str());
 261  ev.Skip();
 262 }
 263 //----------------------------------------------------------------------------------------
 264 void DBGrid::OnCellLeftClick( wxGridEvent& ev )
 265 {
 266  logBuf = "DBGrid::OnCellLeftClick : ";
 267  logBuf << "Cell at row " << ev.GetRow()
 268  << " col " << ev.GetCol();
 269  // wxLogMessage( "%s", logBuf.c_str() );
 270  // wxMessageBox(logBuf);
 271  logBuf += "\n";
 272  wxLogMessage(logBuf.c_str());
 273  // you must call event skip if you want default grid processing
 274  // (cell highlighting etc.)
 275  //
 276  ev.Skip();
 277 }
 278 //----------------------------------------------------------------------------------------
 279 void DBGrid::OnCellRightClick( wxGridEvent& ev )
 280 {
 281  logBuf = "DBGrid::OnCellRightClick : ";
 282  logBuf << "Cell at row " << ev.GetRow()
 283  << " col " << ev.GetCol();
 284  // wxLogMessage( "%s", logBuf.c_str() );
 285  // wxMessageBox(logBuf);
 286  logBuf += "\n";
 287  wxLogMessage(logBuf.c_str());
 288  // you must call event skip if you want default grid processing
 289  // (cell highlighting etc.)
 290  //
 291  ev.Skip();
 292 }
 293 //----------------------------------------------------------------------------------------
 294 void DBGrid::OnCellLeftDClick( wxGridEvent& ev )
 295 {
 296  logBuf = "DBGrid::OnCellLeftDClick : ";
 297  logBuf << "Cell at row " << ev.GetRow()
 298  << " col " << ev.GetCol();
 299  // wxLogMessage( "%s", logBuf.c_str() );
 300  // wxMessageBox(logBuf);
 301  logBuf += "\n";
 302  wxLogMessage(logBuf.c_str());
 303  // you must call event skip if you want default grid processing
 304  // (cell highlighting etc.)
 305  //
 306  ev.Skip();
 307 }
 308 //----------------------------------------------------------------------------------------
 309 void DBGrid::OnCellRightDClick( wxGridEvent& ev )
 310 {
 311  logBuf = "DBGrid::OnCellRightDClick : ";
 312  logBuf << "Cell at row " << ev.GetRow()
 313  << " col " << ev.GetCol();
 314  // wxLogMessage( "%s", logBuf.c_str() );
 315  // wxMessageBox(logBuf);
 316  logBuf += "\n";
 317  wxLogMessage(logBuf.c_str());
 318  // you must call event skip if you want default grid processing
 319  // (cell highlighting etc.)
 320  //
 321  ev.Skip();
 322 }
 323 //----------------------------------------------------------------------------------------
 324 void DBGrid::OnCellChange( wxGridEvent& ev )
 325 {
 326  logBuf = "DBGrid::OnCellChange : ";
 327  logBuf << "Cell at row " << ev.GetRow()
 328  << " col " << ev.GetCol();
 329  // wxLogMessage( "%s", logBuf.c_str() );
 330  // wxMessageBox(logBuf);
 331  logBuf += "\n";
 332  wxLogMessage(logBuf.c_str());
 333  // you must call event skip if you want default grid processing
 334  // (cell highlighting etc.)
 335  //
 336  ev.Skip();
 337 }
 338 //----------------------------------------------------------------------------------------
 339 void DBGrid::OnRowSize( wxGridSizeEvent& ev )
 340 {
 341  logBuf = "DBGrid::OnRowSize : ";
 342  logBuf << "Resized row " << ev.GetRowOrCol();
 343  // wxLogMessage( "%s", logBuf.c_str() );
 344  logBuf += "\n";
 345  wxLogMessage(logBuf.c_str());
 346  ev.Skip();
 347 }
 348 //----------------------------------------------------------------------------------------
 349 void DBGrid::OnColSize( wxGridSizeEvent& ev )
 350 {
 351  logBuf = "DBGrid::OnColSize : ";
 352  logBuf << "Resized col " << ev.GetRowOrCol();
 353  // wxLogMessage( "%s", logBuf.c_str() );
 354  logBuf += "\n";
 355  wxLogMessage(logBuf.c_str());
 356  ev.Skip();
 357 }
 358 //----------------------------------------------------------------------------------------
 359 void DBGrid::OnRangeSelected( wxGridRangeSelectEvent& ev )
 360 {
 361  logBuf = "DBGrid::OnRangeSelected : ";
 362  logBuf  << "Selected cells from row " << ev.GetTopRow()
 363   << " col " << ev.GetLeftCol()
 364   << " to row " << ev.GetBottomRow()
 365   << " col " << ev.GetRightCol();
 366  logBuf += "\n";
 367  // wxLogMessage( "%s", logBuf.c_str() );
 368  wxLogMessage(logBuf.c_str());
 369  ev.Skip();
 370 }
 371 //----------------------------------------------------------------------------------------