]> git.saurik.com Git - wxWidgets.git/blob - demos/dbbrowse/doc.cpp
browsedb.cpp dbtree.cpp dlguser.cpp dlguser.h pgmctrl.cpp
[wxWidgets.git] / demos / dbbrowse / doc.cpp
1 //----------------------------------------------------------------------------------------
2 // Name: Doc.cpp
3 // Purpose: Holds information for DBBrowser - (a do-it-yourself document)
4 // Author: Mark Johnson, mj10777@gmx.net
5 // Modified by: 19990808.mj10777
6 // BJO : Bart A.M. JOURQUIN
7 // Created: 19990808
8 // Copyright: (c) Mark Johnson
9 // Licence: wxWindows license
10 // RCS-ID: $Id$
11 //----------------------------------------------------------------------------------------
12 //-- all #ifdefs that the whole Project needs. -------------------------------------------
13 //----------------------------------------------------------------------------------------
14 #ifdef __GNUG__
15 #pragma implementation
16 #pragma interface
17 #endif
18 //----------------------------------------------------------------------------------------
19 // For compilers that support precompilation, includes "wx/wx.h".
20 #include "wx/wxprec.h"
21 //----------------------------------------------------------------------------------------
22 #ifdef __BORLANDC__
23 #pragma hdrstop
24 #endif
25 //----------------------------------------------------------------------------------------
26 #ifndef WX_PRECOMP
27 #include "wx/wx.h"
28 #endif
29 //----------------------------------------------------------------------------------------
30 //-- all #includes that every .cpp needs ----19990807.mj10777 ----------------
31 //----------------------------------------------------------------------------------------
32 #include "std.h" // sorgsam Pflegen !
33 //----------------------------------------------------------------------------------------
34 //-- Some Global Vars for all Files (extern in ?.h needed) -------------------------------
35 // Global structure for holding ODBC connection information
36 struct DbStuff DbConnectInf;
37 //----------------------------------------------------------------------------------------
38 wxConfigBase *p_ProgramCfg; // All Config and Path information
39 wxLogTextCtrl *p_LogBook; // All Log messages
40 wxString LogBuf; // String for all Logs
41 //----------------------------------------------------------------------------------------
42 mjDoc::mjDoc()
43 {
44 db_Br = NULL;
45 p_DSN = NULL;
46 i_DSN = 0;
47 p_Splitter = NULL;
48 p_MainFrame = NULL;
49 p_PgmCtrl = NULL; // Is not active
50 p_DBTree = NULL;
51 p_DBGrid = NULL;
52 p_LogWin = NULL;
53 p_TabArea = NULL;
54 p_PageArea = NULL;
55 i_TabNr = 0;
56 i_PageNr = 0;
57 s_BColour = "WHEAT";
58 ft_Doc = new wxFont(wxSystemSettings::GetSystemFont(wxSYS_SYSTEM_FONT));
59 }
60 //----------------------------------------------------------------------------------------
61 mjDoc::~mjDoc()
62 {
63 // ----------------------------------------------------------
64 // -E-> The Tree Controls take to long to close : Why ??
65 // ----------------------------------------------------------
66 // wxMessageBox("-I-> end Doc");
67 p_TabArea->Show(FALSE); // Deactivate the Window
68 p_PageArea->Show(FALSE); // Deactivate the Window
69 p_PgmCtrl = NULL;
70 delete p_PgmCtrl;
71 delete [] p_DSN;
72 delete p_DBTree;
73 p_TabArea = NULL; delete p_TabArea;
74 p_PageArea = NULL; delete p_PageArea;
75 p_Splitter = NULL;
76 delete p_Splitter;
77 delete [] db_Br;
78 // wxMessageBox("~mjDoc");
79 }
80 //----------------------------------------------------------------------------------------
81 bool mjDoc::OnNewDocument()
82 {
83 //---------------------------------------------------------------------------------------
84 if (!OnInitView())
85 {
86 return FALSE;
87 }
88 p_PgmCtrl->OnPopulate();
89 //---------------------------------------------------------------------------------------
90 return TRUE;
91 }
92 //----------------------------------------------------------------------------------------
93 bool mjDoc::OnInitView()
94 {
95 Sash = p_ProgramCfg->Read("/MainFrame/Sash", 200);
96 // wxMessageBox("OnInitView() - Begin ","-I->mjDoc::OnInitView");
97 //---------------------------------------------------------------------------------------
98 // create "workplace" window
99 //---------------------------------------------------------------------------------------
100 p_TabArea = new wxTabbedWindow(); // Init the Pointer
101 p_TabArea->Create(p_Splitter, -1);
102 //---------------------------------------------------------------------------------------
103 p_PgmCtrl = new PgmCtrl(p_TabArea, TREE_CTRL_PGM,wxDefaultPosition, wxDefaultSize,
104 wxTR_HAS_BUTTONS | wxSUNKEN_BORDER);
105 p_PgmCtrl->i_TabArt = 0; // 0 = Tab ; 1 = Page
106 p_PgmCtrl->i_ViewNr = p_TabArea->GetTabCount()-1;
107 //---------------------------------------------------------------------------------------
108 wxBitmap *p_FolderClose = new wxBitmap("PgmCtrl"); //, wxBITMAP_TYPE_BMP_RESOURCE); // BJO20000115
109 //---------------------------------------------------------------------------------------
110 p_TabArea->AddTab(p_PgmCtrl,"PgmCtrl",p_FolderClose);
111 //---------------------------------------------------------------------------------------
112 // now create "output" window
113 //---------------------------------------------------------------------------------------
114 p_PageArea = new wxPaggedWindow(); // Init the Pointer
115 p_PageArea->Create(p_Splitter, -1);
116 //---------------------------------------------------------------------------------------
117 p_LogWin = new wxTextCtrl(p_PageArea,-1,wxEmptyString,
118 wxDefaultPosition, wxDefaultSize,wxTE_MULTILINE );
119 //wxFont* ft_Temp = new wxFont(10,wxSWISS,wxNORMAL,wxBOLD,FALSE,"Comic Sans MS");
120 wxFont* ft_Temp = new wxFont(wxSystemSettings::GetSystemFont(wxSYS_SYSTEM_FONT));
121 p_LogWin->SetFont(* ft_Temp);
122 // Don't forget ! This is always : i_TabArt = 0 ; i_ViewNr = 1;
123 //---------------------------------------------------------------------------------------
124 p_LogBook = new wxLogTextCtrl(p_LogWin); // make p_LogWin the LogBook
125 p_LogBook->SetActiveTarget(p_LogBook);
126 p_LogBook->SetTimestamp( NULL );
127 //---------------------------------------------------------------------------------------
128 p_PageArea->AddTab(p_LogWin,_("LogBook"), "what is this?" );
129 i_TabNr = p_TabArea->GetTabCount()-1; // Add one when a new AddTab is done;
130 i_PageNr = p_PageArea->GetTabCount()-1; // Add one when a new AddTab is done;
131 //---------------------------------------------------------------------------------------
132 p_PgmCtrl->pDoc = this;
133 p_TabArea->SetActiveTab(i_PageNr);
134 //---------------------------------------------------------------------------------------
135 p_Splitter->Initialize(p_TabArea);
136 p_Splitter->SplitHorizontally(p_TabArea,p_PageArea,Sash);
137 //---------------------------------------------------------------------------------------
138 if (!OnInitODBC())
139 return FALSE;
140 //---------------------------------------------------------------------------------------
141 Temp0.Printf("-I-> mjDoc::OnInitView() - End - %d DSN's found",i_DSN);
142 p_MainFrame->SetStatusText(Temp0, 0);
143 wxLogMessage(Temp0);
144 return TRUE;
145 }
146 //----------------------------------------------------------------------------------------
147 bool mjDoc::OnInitODBC()
148 {
149 char Dsn[SQL_MAX_DSN_LENGTH + 1];
150 char DsDesc[255]; // BJO20002501 instead of 512
151 Temp0 = "";
152 i_DSN = 0; // Counter
153 int i = 0;
154 //---------------------------------------------------------------------------------------
155 // Initialize the ODBC Environment for Database Operations
156
157 if (SQLAllocEnv(&DbConnectInf.Henv) != SQL_SUCCESS)
158 {
159 return FALSE;
160 }
161 //---------------------------------------------------------------------------------------
162 const char sep = 3; // separator character used in string between DSN ans DsDesc
163 wxStringList s_SortDSNList, s_SortDsDescList;
164 // BJO-20000127
165 // In order to have same sort result on both Dsn and DsDesc, create a 'keyed' string.
166 // The key will be removed after sorting
167 wxString KeyString;
168 //---------------------------------------------------------------------------------------
169 while(GetDataSource(DbConnectInf.Henv, Dsn, sizeof(Dsn), DsDesc, sizeof(DsDesc)))
170 {
171 i_DSN++; // How many Dsn have we ?
172 KeyString.Printf("%s%c%s",Dsn, sep, DsDesc);
173 s_SortDSNList.Add(Dsn);
174 s_SortDsDescList.Add(KeyString);
175 }
176 s_SortDSNList.Sort(); //BJO
177 s_SortDsDescList.Sort(); //BJO
178
179 char ** s_SortDSN = s_SortDSNList.ListToArray(); //BJO
180 char ** s_SortDsDesc = s_SortDsDescList.ListToArray(); //BJO
181 //---------------------------------------------------------------------------------------
182 // Allocate n ODBC-DSN objects to hold the information
183 p_DSN = new DSN[i_DSN]; //BJO
184 for (i=0;i<i_DSN;i++)
185 {
186 KeyString = s_SortDsDesc[i];
187 KeyString = KeyString.AfterFirst(sep);
188 strcpy(s_SortDsDesc[i],KeyString.c_str());
189 (p_DSN+i)->Dsn = s_SortDSN[i];
190 (p_DSN+i)->Drv = s_SortDsDesc[i];
191 (p_DSN+i)->Usr = "";
192 (p_DSN+i)->Pas = "";
193 Temp0.Printf("%02d) Dsn(%s) DsDesc(%s)",i,(p_DSN+i)->Dsn.c_str(),(p_DSN+i)->Drv.c_str());
194 wxLogMessage(Temp0);
195 }
196 i = 0;
197 //---------------------------------------------------------------------------------------
198 // Allocate n wxDatabase objects to hold the column information
199 db_Br = new BrowserDB[i_DSN];
200 for (i=0;i<i_DSN;i++)
201 {
202 (db_Br+i)->p_LogWindow = p_LogWin;
203 (db_Br+i)->ODBCSource = (p_DSN+i)->Dsn;
204 (db_Br+i)->UserName = (p_DSN+i)->Usr;
205 (db_Br+i)->Password = (p_DSN+i)->Pas;
206 (db_Br+i)->pDoc = this;
207 (db_Br+i)->i_Which = i;
208 }
209 if (SQLFreeEnv(&DbConnectInf.Henv) != SQL_SUCCESS) // BJO20000125
210 {
211 // Error freeing environment handle
212 }
213 delete [] s_SortDSN;
214 delete [] s_SortDsDesc;
215 //---------------------------------------------------------------------------------------
216 if (!i_DSN)
217 {
218 wxMessageBox(_("No Dataset names found in ODBC!\n" \
219 " Program will exit!\n\n" \
220 " Ciao"),"-E-> Fatal situation");
221 return FALSE;
222 }
223 //---------------------------------------------------------------------------------------
224 return TRUE;
225 }
226 //----------------------------------------------------------------------------------------
227 bool mjDoc::OnChosenDSN(int Which)
228 {
229 // wxLogMessage("OnChosenDSN(%d) - Begin",Which);
230 //---------------------------------------------------------------------------------------
231 if (p_DBTree != NULL)
232 {
233 p_TabArea->Show(FALSE); // Deactivate the Window
234 p_TabArea->RemoveTab(p_DBTree->i_ViewNr);
235 p_TabArea->Show(TRUE); // Activate the Window
236 OnChosenTbl(77,"");
237 }
238 //-------------------------
239 p_TabArea->Show(FALSE); // Deactivate the Window
240 p_DBTree = new DBTree(p_TabArea, TREE_CTRL_DB,wxDefaultPosition, wxDefaultSize,
241 wxTR_HAS_BUTTONS | wxSUNKEN_BORDER);
242 p_TabArea->AddTab(p_DBTree,(p_DSN+Which)->Dsn," ? ");
243 p_DBTree->i_ViewNr = p_TabArea->GetTabCount()-1;
244 p_TabArea->Show(TRUE); // Deactivate the Window
245 p_DBTree->i_Which = Which;
246 p_DBTree->s_DSN = (p_DSN+Which)->Dsn;
247 p_DBTree->i_TabArt = 0;
248 p_DBTree->pDoc = this;
249 p_DBTree->OnPopulate();
250 p_TabArea->SetActiveTab(p_DBTree->i_ViewNr);
251 //---------------------------------------------------------------------------------------
252 // wxLogMessage("OnChosenDSN(%d) - End",Which);
253 return TRUE;
254 }
255 //----------------------------------------------------------------------------------------
256 bool mjDoc::OnChosenTbl(int Tab,wxString Table)
257 {
258 // wxLogMessage("OnChosenTbl(%d,%s)",Tab,Table.c_str());
259 //-------------------------
260 if (p_DBGrid != NULL)
261 {
262 if (p_DBGrid->i_TabArt == 0)
263 {
264 p_TabArea->Show(FALSE); // Deactivate the Window
265 p_TabArea->RemoveTab(p_DBGrid->i_ViewNr);
266 p_TabArea->Show(TRUE); // Activate the Window
267 }
268 if (p_DBGrid->i_TabArt == 1)
269 {
270 p_PageArea->Show(FALSE); // Deactivate the Window
271 p_PageArea->RemoveTab(p_DBGrid->i_ViewNr);
272 p_PageArea->Show(TRUE); // Activate the Window
273 }
274 p_DBGrid = NULL;
275 delete p_DBGrid;
276 }
277 if (Tab == 77) // Delete only
278 return TRUE;
279 //-------------------------
280 if (Tab == 0) // Tabview
281 {
282 p_TabArea->Show(FALSE); // Deactivate the Window
283 p_DBGrid = new DBGrid(p_TabArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
284 wxSUNKEN_BORDER);
285 p_TabArea->AddTab(p_DBGrid, Table, "");
286 p_DBGrid->i_ViewNr = p_TabArea->GetTabCount()-1;
287 p_DBGrid->pDoc = this;
288 p_DBGrid->db_Br = db_Br;
289 p_DBGrid->OnTableView(Table);
290 p_TabArea->SetActiveTab(p_DBGrid->i_ViewNr);
291 p_TabArea->Show(TRUE); // Activate the Window
292 }
293 if (Tab == 1) // Pageview
294 {
295 p_PageArea->Show(FALSE); // Deactivate the Window
296 p_DBGrid = new DBGrid(p_PageArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
297 wxSUNKEN_BORDER);
298 p_PageArea->AddTab(p_DBGrid, Table, "");
299 p_DBGrid->i_ViewNr = p_PageArea->GetTabCount()-1;
300 p_DBGrid->pDoc = this;
301 p_DBGrid->db_Br = db_Br;
302 p_DBGrid->i_Which = p_DBTree->i_Which;
303 p_PageArea->Show(TRUE); // Activate the Window
304 p_DBGrid->OnTableView(Table);
305 p_PageArea->SetActiveTab(p_DBGrid->i_ViewNr);
306 }
307 p_DBGrid->i_TabArt = Tab;
308 //--------------------------
309 return TRUE;;
310 }
311 //----------------------------------------------------------------------------------------
312 void mjDoc::OnLeer(wxString Aufrufer)
313 {
314 // Temp0.Printf(_("\nmjDoc::OnLeer(%s) : auch diese funktion steht eines Tages zur Verfügung !"),Aufrufer.c_str());
315 Temp0.Printf(_("\nmjDoc::OnLeer(%s) : even this function will one day be available !"),Aufrufer.c_str());
316 wxLogMessage(Temp0); Temp0.Empty();
317 return;
318 }
319 //----------------------------------------------------------------------------------------
320 BEGIN_EVENT_TABLE(DocSplitterWindow, wxSplitterWindow)
321 END_EVENT_TABLE()
322 //----------------------------------------------------------------------------------------
323 DocSplitterWindow::DocSplitterWindow(wxWindow *parent, wxWindowID id) : wxSplitterWindow(parent, id)
324 { // Define a constructor for my p_Splitter
325 }
326 //----------------------------------------------------------------------------------------