]> git.saurik.com Git - wxWidgets.git/blob - demos/dbbrowse/dbgrid.cpp
fixes for handling WM_SYSCOLORCHANGE - now seems to work
[wxWidgets.git] / 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 // ------------
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 //----------------------------------------------------------------------------------------