home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / wxos2233.zip / wxOS2-2_3_3.zip / wxWindows-2.3.3 / demos / dbbrowse / dbgrid.cpp < prev    next >
C/C++ Source or Header  |  2001-02-01  |  17KB  |  427 lines
  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: dbgrid.cpp,v 1.15 2001/02/01 20:24:44 georgetasker Exp $
  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.     // ------------
  37.     EVT_GRID_CELL_CHANGE( DBGrid::OnCellChange )
  38.     EVT_GRID_CELL_LEFT_CLICK( DBGrid::OnCellLeftClick )
  39.     EVT_GRID_CELL_LEFT_DCLICK( DBGrid::OnCellLeftDClick )
  40.     EVT_GRID_CELL_RIGHT_CLICK( DBGrid::OnCellRightClick )
  41.     EVT_GRID_CELL_RIGHT_DCLICK( DBGrid::OnCellRightDClick )
  42.     // EVT_GRID_COL_SIZE( DBGrid::OnColSize )
  43.     // EVT_GRID_ROW_SIZE( DBGrid::OnRowSize )
  44.     EVT_GRID_EDITOR_SHOWN( DBGrid::OnEditorShown )
  45.     EVT_GRID_EDITOR_HIDDEN( DBGrid::OnEditorHidden )
  46.     EVT_GRID_LABEL_LEFT_CLICK( DBGrid::OnLabelLeftClick )
  47.     EVT_GRID_LABEL_LEFT_DCLICK( DBGrid::OnLabelLeftDClick )
  48.     EVT_GRID_LABEL_RIGHT_CLICK( DBGrid::OnLabelRightClick )
  49.     EVT_GRID_LABEL_RIGHT_DCLICK( DBGrid::OnLabelRightDClick )
  50.     EVT_GRID_RANGE_SELECT( DBGrid::OnRangeSelected )
  51.     EVT_GRID_ROW_SIZE( DBGrid::OnRowSize )
  52.     EVT_GRID_SELECT_CELL( DBGrid::OnSelectCell )
  53.     EVT_MENU(GRID_EDIT,DBGrid::OnModusEdit)
  54.     EVT_MENU(GRID_BROWSE,DBGrid::OnModusBrowse)
  55. END_EVENT_TABLE()
  56.  
  57. //----------------------------------------------------------------------------------------
  58. //           wxListCtrl(parent, id, pos, size, style)
  59. //           wxGrid(parent,-1,wxPoint( 0, 0 ), wxSize( 400, 300 ) );
  60. //----------------------------------------------------------------------------------------
  61. // DBGrid
  62. //----------------------------------------------------------------------------------------
  63. // DBGrid::DBGrid(wxWindow *parent, const wxWindowID id,const wxPoint& pos,const wxSize& size):
  64. //          wxGrid(parent, id, pos, size)
  65. DBGrid::DBGrid(wxWindow *parent, const wxWindowID id,const wxPoint& pos,const wxSize& size, long style):
  66. wxGrid(parent, id, pos, size, style)
  67. {
  68.     b_EditModus = FALSE;
  69.     //---------------------------------------------------------------------------------------
  70.     popupMenu1 = new wxMenu("");
  71.     popupMenu1->Append(GRID_EDIT, _("Edit Modus"));
  72.     popupMenu2 = new wxMenu("");
  73.     popupMenu2->Append(GRID_BROWSE, _("Browse Modus"));
  74. }
  75.  
  76. //----------------------------------------------------------------------------------------
  77. DBGrid::~DBGrid()
  78. {
  79.     delete popupMenu1;
  80.     delete popupMenu2;
  81. }
  82.  
  83. //----------------------------------------------------------------------------------------
  84. int  DBGrid::OnTableView(wxString Table)
  85. {
  86.     wxStopWatch sw;
  87.     //---------------------------------------------------------------------------------------
  88.     int  i=0,x,y,z, ValidTable=0;
  89.     wxString Temp0;
  90.     wxBeginBusyCursor();
  91.     SetDefaultCellFont(* pDoc->ft_Doc);
  92.     //---------------------------------------------------------------------------------------
  93.     ct_BrowserDB = (db_Br+i_Which)->ct_BrowserDB;                       // Get the DSN Pointer
  94.     //---------------------------------------------------------------------------------------
  95.     if (ct_BrowserDB)                                                   // Valid pointer (!= NULL) ?
  96.     {      // Pointer is Valid, use the wxDatabase Information
  97.         for (x=0;x<ct_BrowserDB->numTables;x++)                            // go through the Tables
  98.         {
  99.             if (!wxStrcmp((ct_BrowserDB->pTableInf+x)->tableName,Table))      // is this our Table ?
  100.             {    // Yes, the Data of this Table shall be put into the Grid
  101.                 ValidTable = x;                                                  // Save the Tablenumber
  102.                 (db_Br+i_Which)->OnSelect(Table,FALSE);                          // Select * from "table"
  103.                 // Set the local Pointer to the Column Information we are going to use
  104.                 (db_Br+i_Which)->cl_BrowserDB = (ct_BrowserDB->pTableInf+x)->pColInf;
  105.                 if ((ct_BrowserDB->pTableInf+x)->pColInf)                        // Valid pointer (!= NULL) ?
  106.                 {   // Pointer is Valid, Column Informationen sind Vorhanden
  107.                     i = (db_Br+i_Which)->i_Records;                                 // How many Records are there
  108.                     (db_Br+i_Which)->i_Which = ValidTable;                          // Still used ???? mj10777
  109.                     if (i == 0)     // If the Table is empty, then show one empty row
  110.                         i++;
  111.                     // wxLogMessage(_("\n-I-> DBGrid::OnTableView() : Vor CreateGrid"));
  112.                     CreateGrid(i,(ct_BrowserDB->pTableInf+x)->numCols);             // Records , Columns
  113.                     for (y=0;y<(ct_BrowserDB->pTableInf+x)->numCols;y++)            // Loop through the Fields
  114.                     {  // The Field / Column name is used here as Row Titel
  115.                         SetColLabelValue(y,((ct_BrowserDB->pTableInf+x)->pColInf+y)->colName);
  116.                         SetColSize(y,95);
  117.                     }  // for (y=0;y<(ct_BrowserDB->pTableInf+x)->numCols;y++)
  118.                     SetColSize(((ct_BrowserDB->pTableInf+x)->numCols-1),120);       // Make the last Column Wider
  119.                     // The Grid has been created, now fill it
  120.                     for (z=0;z<(db_Br+i_Which)->i_Records;z++)                      // Loop through the Records
  121.                     {
  122.                         Temp0.Printf("%06d",z+1);  SetRowLabelValue(z,Temp0);          // Set Row Lable Value
  123.                         (db_Br+i_Which)->OnGetNext((ct_BrowserDB->pTableInf+ValidTable)->numCols,FALSE);
  124.                         for (y=0;y<(ct_BrowserDB->pTableInf+ValidTable)->numCols;y++) // Loop through the Fields
  125.                         { // BrowserDB::OnGetNext Formats the field Value into tablename
  126.                             SetCellValue(z, y,((db_Br+i_Which)->cl_BrowserDB+y)->tableName);
  127.                         }
  128.                         if (z % 50 == 0)
  129.                         {
  130.                             Temp0.Printf(_("-I-> DBGrid::OnTableView(%s) - Record %6d (from %d) has been read."),Table.c_str(),z,(db_Br+i_Which)->i_Records);
  131.                             pDoc->p_MainFrame->SetStatusText(Temp0, 0);
  132.                         }
  133.                     }  // for (z=0;z<(db_Br+i_Which)->i_Records;z++)
  134.                     Temp0.Printf(_("-I-> DBGrid::OnTableView(%s) - %6d Records have been read. - Time needed : %ld ms"),Table.c_str(),z,sw.Time());
  135.                     wxLogMessage(Temp0);
  136.                     pDoc->p_MainFrame->SetStatusText(Temp0, 0);
  137.                     // The Grid has been filled, now leave
  138.                     goto Weiter;
  139.                 }   // if ((ct_BrowserDB->pTableInf+x)->pColInf)
  140.                 else
  141.                     wxLogMessage(_("\n-E-> DBGrid::OnTableView() : Invalid Column Pointer : Failed"));
  142.             }    // if ((ct_BrowserDB->pTableInf+x)->tableType == "TABLE")
  143.         }     // for (x=0;x<ct_BrowserDB->numTables;x++)
  144.     }      // if (ct_BrowserDB)
  145.     else
  146.         wxLogMessage(_("\n-E-> DBGrid::OnTableView() : Invalid DSN Pointer : Failed"));
  147.     //---------------------------------------------------------------------------------------
  148. Weiter:
  149.     EnableEditing(b_EditModus);     // Deactivate in-place Editing
  150.     wxEndBusyCursor();
  151.     //---------------------------------------------------------------------------------------
  152.     wxLogMessage(_("-I-> DBGrid::OnTableView() - End"));
  153.     return 0;
  154. }
  155.  
  156. //----------------------------------------------------------------------------------------
  157. void DBGrid::OnModusEdit(wxCommandEvent& event)
  158. {
  159.     b_EditModus = TRUE;             // Needed by PopupMenu
  160.     EnableEditing(b_EditModus);     // Activate in-place Editing
  161.     UpdateDimensions();             // Redraw the Grid
  162.     // wxLogMessage(_("-I-> DBGrid::OnModusEdit() - End"));
  163. }
  164.  
  165. //----------------------------------------------------------------------------------------
  166. void DBGrid::OnModusBrowse(wxCommandEvent& event)
  167. {
  168.     b_EditModus = FALSE;            // Needed by PopupMenu
  169.     EnableEditing(b_EditModus);     // Deactivate in-place Editing
  170.     UpdateDimensions();             // Redraw the Grid
  171.     // wxLogMessage(_("-I-> DBGrid::OnModusBrowse() - End"));
  172. }
  173.  
  174. //----------------------------------------------------------------------------------------
  175. void DBGrid::OnEditorShown( wxGridEvent& ev )
  176. {
  177.     // wxLogMessage(_("-I-> DBGrid::OnEditorShown() - End"));
  178.     ev.Skip();
  179. }
  180.  
  181. //----------------------------------------------------------------------------------------
  182. void DBGrid::OnEditorHidden( wxGridEvent& ev )
  183. {
  184.     // wxLogMessage(_("-I-> DBGrid::OnEditorHidden() - End"));
  185.     ev.Skip();
  186. }
  187.  
  188. //----------------------------------------------------------------------------------------
  189. void DBGrid::OnSelectCell( wxGridEvent& ev )
  190. {
  191.     logBuf = "";
  192.     logBuf << "Selected cell at row " << ev.GetRow()
  193.         << " col " << ev.GetCol();
  194.     wxLogMessage( "%s", logBuf.c_str() );
  195.     // you must call Skip() if you want the default processing
  196.     // to occur in wxGrid
  197.     ev.Skip();
  198. }
  199.  
  200. //----------------------------------------------------------------------------------------
  201. void DBGrid::OnMouseMove(wxMouseEvent &event)
  202. {
  203.     MousePos = event.GetPosition();
  204. }
  205.  
  206. //----------------------------------------------------------------------------------------
  207. void DBGrid::OnLabelLeftClick( wxGridEvent& ev )
  208. {
  209.     logBuf = "DBGrid::OnLabelLeftClick : ";
  210.     if ( ev.GetRow() != -1 )
  211.     {
  212.         logBuf << "row label " << ev.GetRow();
  213.     }
  214.     else if ( ev.GetCol() != -1 )
  215.     {
  216.         logBuf << "col label " << ev.GetCol();
  217.     }
  218.     else
  219.     {
  220.         logBuf << "corner label";
  221.     }
  222.     if ( ev.ShiftDown() )
  223.         logBuf << " (shift down)";
  224.  
  225.     // wxLogMessage( "%s", logBuf.c_str() );
  226.     logBuf += "\n";
  227.     wxLogMessage(logBuf.c_str());
  228.     ev.Skip();
  229. }
  230.  
  231. //----------------------------------------------------------------------------------------
  232. void DBGrid::OnLabelRightClick( wxGridEvent& ev )
  233. {
  234.     //-------------------------------------------------------
  235.     if (b_EditModus)
  236.         PopupMenu(popupMenu2,MousePos.x,MousePos.y);
  237.     else
  238.         PopupMenu(popupMenu1,MousePos.x,MousePos.y);
  239.     //-------------------
  240.     logBuf = "DBGrid::OnLabelRightClick : ";
  241.     if ( ev.GetRow() != -1 )
  242.     {
  243.         logBuf << "row label " << ev.GetRow();
  244.     }
  245.     else if ( ev.GetCol() != -1 )
  246.     {
  247.         logBuf << "col label " << ev.GetCol();
  248.     }
  249.     else
  250.     {
  251.         logBuf << "corner label";
  252.     }
  253.     if ( ev.ShiftDown() )
  254.         logBuf << " (shift down)";
  255.  
  256.     // wxLogMessage( "%s", logBuf.c_str() );
  257.     logBuf += "\n";
  258.     wxLogMessage(logBuf.c_str());
  259.     ev.Skip();
  260. }
  261.  
  262. //----------------------------------------------------------------------------------------
  263. void DBGrid::OnLabelLeftDClick( wxGridEvent& ev )
  264. {
  265.     logBuf = "DBGrid::OnLabelLeftDClick : ";
  266.     if ( ev.GetRow() != -1 )
  267.     {
  268.         logBuf << "row label " << ev.GetRow();
  269.     }
  270.     else if ( ev.GetCol() != -1 )
  271.     {
  272.         logBuf << "col label " << ev.GetCol();
  273.     }
  274.     else
  275.     {
  276.         logBuf << "corner label";
  277.     }
  278.     if ( ev.ShiftDown() )
  279.         logBuf << " (shift down)";
  280.  
  281.     // wxLogMessage( "%s", logBuf.c_str() );
  282.     logBuf += "\n";
  283.     wxLogMessage(logBuf.c_str());
  284.     ev.Skip();
  285. }
  286.  
  287. //----------------------------------------------------------------------------------------
  288. void DBGrid::OnLabelRightDClick( wxGridEvent& ev )
  289. {
  290.     logBuf = "DBGrid::OnLabelRightDClick : ";
  291.     if ( ev.GetRow() != -1 )
  292.     {
  293.         logBuf << "row label " << ev.GetRow();
  294.     }
  295.     else if ( ev.GetCol() != -1 )
  296.     {
  297.         logBuf << "col label " << ev.GetCol();
  298.     }
  299.     else
  300.     {
  301.         logBuf << "corner label";
  302.     }
  303.     if ( ev.ShiftDown() )
  304.         logBuf << " (shift down)";
  305.     // wxLogMessage( "%s", logBuf.c_str() );
  306.     logBuf += "\n";
  307.     wxLogMessage(logBuf.c_str());
  308.     ev.Skip();
  309. }
  310.  
  311. //----------------------------------------------------------------------------------------
  312. void DBGrid::OnCellLeftClick( wxGridEvent& ev )
  313. {
  314.     logBuf = "DBGrid::OnCellLeftClick : ";
  315.     logBuf << "Cell at row " << ev.GetRow()
  316.         << " col " << ev.GetCol();
  317.     // wxLogMessage( "%s", logBuf.c_str() );
  318.     // wxMessageBox(logBuf);
  319.     logBuf += "\n";
  320.     wxLogMessage(logBuf.c_str());
  321.     // you must call event skip if you want default grid processing
  322.     // (cell highlighting etc.)
  323.     //
  324.     ev.Skip();
  325. }
  326.  
  327. //----------------------------------------------------------------------------------------
  328. void DBGrid::OnCellRightClick( wxGridEvent& ev )
  329. {
  330.     logBuf = "DBGrid::OnCellRightClick : ";
  331.     logBuf << "Cell at row " << ev.GetRow()
  332.         << " col " << ev.GetCol();
  333.     // wxLogMessage( "%s", logBuf.c_str() );
  334.     // wxMessageBox(logBuf);
  335.     logBuf += "\n";
  336.     wxLogMessage(logBuf.c_str());
  337.     // you must call event skip if you want default grid processing
  338.     // (cell highlighting etc.)
  339.     //
  340.     ev.Skip();
  341. }
  342.  
  343. //----------------------------------------------------------------------------------------
  344. void DBGrid::OnCellLeftDClick( wxGridEvent& ev )
  345. {
  346.     logBuf = "DBGrid::OnCellLeftDClick : ";
  347.     logBuf << "Cell at row " << ev.GetRow()
  348.         << " col " << ev.GetCol();
  349.     // wxLogMessage( "%s", logBuf.c_str() );
  350.     // wxMessageBox(logBuf);
  351.     logBuf += "\n";
  352.     wxLogMessage(logBuf.c_str());
  353.     // you must call event skip if you want default grid processing
  354.     // (cell highlighting etc.)
  355.     //
  356.     ev.Skip();
  357. }
  358.  
  359. //----------------------------------------------------------------------------------------
  360. void DBGrid::OnCellRightDClick( wxGridEvent& ev )
  361. {
  362.     logBuf = "DBGrid::OnCellRightDClick : ";
  363.     logBuf << "Cell at row " << ev.GetRow()
  364.         << " col " << ev.GetCol();
  365.     // wxLogMessage( "%s", logBuf.c_str() );
  366.     // wxMessageBox(logBuf);
  367.     logBuf += "\n";
  368.     wxLogMessage(logBuf.c_str());
  369.     // you must call event skip if you want default grid processing
  370.     // (cell highlighting etc.)
  371.     //
  372.     ev.Skip();
  373. }
  374.  
  375. //----------------------------------------------------------------------------------------
  376. void DBGrid::OnCellChange( wxGridEvent& ev )
  377. {
  378.     logBuf = "DBGrid::OnCellChange : ";
  379.     logBuf << "Cell at row " << ev.GetRow()
  380.         << " col " << ev.GetCol();
  381.     // wxLogMessage( "%s", logBuf.c_str() );
  382.     // wxMessageBox(logBuf);
  383.     logBuf += "\n";
  384.     wxLogMessage(logBuf.c_str());
  385.     // you must call event skip if you want default grid processing
  386.     // (cell highlighting etc.)
  387.     //
  388.     ev.Skip();
  389. }
  390.  
  391. //----------------------------------------------------------------------------------------
  392. void DBGrid::OnRowSize( wxGridSizeEvent& ev )
  393. {
  394.     logBuf = "DBGrid::OnRowSize : ";
  395.     logBuf << "Resized row " << ev.GetRowOrCol();
  396.     // wxLogMessage( "%s", logBuf.c_str() );
  397.     logBuf += "\n";
  398.     wxLogMessage(logBuf.c_str());
  399.     ev.Skip();
  400. }
  401.  
  402. //----------------------------------------------------------------------------------------
  403. void DBGrid::OnColSize( wxGridSizeEvent& ev )
  404. {
  405.     logBuf = "DBGrid::OnColSize : ";
  406.     logBuf << "Resized col " << ev.GetRowOrCol();
  407.     // wxLogMessage( "%s", logBuf.c_str() );
  408.     logBuf += "\n";
  409.     wxLogMessage(logBuf.c_str());
  410.     ev.Skip();
  411. }
  412.  
  413. //----------------------------------------------------------------------------------------
  414. void DBGrid::OnRangeSelected( wxGridRangeSelectEvent& ev )
  415. {
  416.     logBuf = "DBGrid::OnRangeSelected : ";
  417.     logBuf  << "Selected cells from row " << ev.GetTopRow()
  418.         << " col " << ev.GetLeftCol()
  419.         << " to row " << ev.GetBottomRow()
  420.         << " col " << ev.GetRightCol();
  421.     logBuf += "\n";
  422.     // wxLogMessage( "%s", logBuf.c_str() );
  423.     wxLogMessage(logBuf.c_str());
  424.     ev.Skip();
  425. }
  426. //----------------------------------------------------------------------------------------
  427.