[wxWidgets.git] / demos / dbbrowse / doc.cpp

//---------------------------------------------------------------------------
// Name:        Doc.cpp
// Purpose:     Holds information for DBBrowser
// Author:      Mark Johnson, mj10777@gmx.net
// Modified by: 19990808.mj10777
// BJO        : Bart A.M. JOURQUIN
// Created:     19990808
// Copyright:   (c) Mark Johnson
// Licence:     wxWindows license
//---------------------------------------------------------------------------
//-- all #ifdefs that the whole Project needs. ------------------------------
//---------------------------------------------------------------------------
#ifdef __GNUG__
 #pragma implementation
 #pragma interface
#endif
//---------------------------------------------------------------------------
// For compilers that support precompilation, includes "wx/wx.h".
#include "wx/wxprec.h"
//---------------------------------------------------------------------------
#ifdef __BORLANDC__
 #pragma hdrstop
#endif
//---------------------------------------------------------------------------
#ifndef WX_PRECOMP
 #include "wx/wx.h"
#endif
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
//-- all #includes that every .cpp needs             ----19990807.mj10777 ---
//---------------------------------------------------------------------------
#include "std.h"       // sorgsam Pflegen !
//---------------------------------------------------------------------------
//-- Some Global Vars for all Files (extern in ?.h needed) -----------------
// Global structure for holding ODBC connection information
 struct DbStuff DbConnectInf;
//---------------------------------------------------------------------------
wxConfigBase   *p_ProgramCfg;       // All Config and Path information
wxLogTextCtrl  *p_LogBook;          // All Log messages
wxString        LogBuf;             // String for all Logs
//---------------------------------------------------------------------------
mjDoc::mjDoc()
{
 db_Br          = NULL;
 p_DSN          = NULL;
 i_DSN          = 0;
 p_Splitter     = NULL;
 p_MainFrame    = NULL;
 p_PgmCtrl      = NULL;               // Is not active
 p_DBTree       = NULL;
 p_DBGrid       = NULL;
 p_LogWin       = NULL;
 p_TabArea      = NULL;
 p_PageArea     = NULL;
 i_TabNr        = 0;
 i_PageNr       = 0;
}
//---------------------------------------------------------------------------
mjDoc::~mjDoc()
{
 // ----------------------------------------------------------
 // -E-> The Tree Controls take to long to close : Why ??
 // ----------------------------------------------------------
 // wxMessageBox("-I-> end Doc");
 p_TabArea->Show(FALSE);    // Deactivate the Window
 p_PageArea->Show(FALSE);    // Deactivate the Window
 p_PgmCtrl = NULL;
 delete p_PgmCtrl;
 delete [] p_DSN;
 delete p_DBTree;
 p_TabArea  = NULL; delete p_TabArea;
 p_PageArea = NULL; delete p_PageArea;
 p_Splitter = NULL;
 delete p_Splitter;
 delete [] db_Br;
 //  wxMessageBox("~mjDoc");
}
//---------------------------------------------------------------------------
bool mjDoc::OnNewDocument()
{
 //-------------------------------------------------------------------
 if (!OnInitView())                 // LogBook is now activ
  return FALSE;
 p_PgmCtrl->OnPopulate();
 //-------------------------------------------------------------------
 return TRUE;
}
//---------------------------------------------------------------------------
bool mjDoc::OnInitView()
{
 Sash = p_ProgramCfg->Read("/MainFrame/Sash", 200);
 // wxMessageBox("OnInitView() - Begin ","-I->mjDoc::OnInitView");
 //--------------------------------------------------------------------------
 // create "workplace" window
 //--------------------------------------------------------------------------
 p_TabArea = new wxTabbedWindow(); // Init the Pointer
 p_TabArea->Create(p_Splitter, -1);
 //--------------------------------------------------------------------------
 p_PgmCtrl = new PgmCtrl(p_TabArea, TREE_CTRL_PGM,wxDefaultPosition, wxDefaultSize,
                                    wxTR_HAS_BUTTONS | wxSUNKEN_BORDER);
 p_PgmCtrl->i_TabArt = 0; // 0 = Tab ; 1 = Page
 p_PgmCtrl->i_ViewNr = p_TabArea->GetTabCount()-1;
 //--------------------------------------------------------------------------
 wxBitmap *p_FolderClose = new wxBitmap("PgmCtrl"); //, wxBITMAP_TYPE_BMP_RESOURCE); // BJO20000115
 //--------------------------------------------------------------------------
 p_TabArea->AddTab(p_PgmCtrl,"PgmCtrl",p_FolderClose);
 //--------------------------------------------------------------------------
 // now create "output" window
 //--------------------------------------------------------------------------
 p_PageArea = new wxPaggedWindow();  // Init the Pointer
 p_PageArea->Create(p_Splitter, -1);
 //--------------------------------------------------------------------------
 p_LogWin = new wxTextCtrl(p_PageArea,-1,wxEmptyString,
                          wxDefaultPosition, wxDefaultSize,wxTE_MULTILINE );
 wxFont* ft_Temp = new wxFont(10,wxSWISS,wxNORMAL,wxBOLD,FALSE,"Comic Sans MS");
 p_LogWin->SetFont(* ft_Temp);
 // Don't forget ! This is always : i_TabArt = 0 ; i_ViewNr = 1;
 //------------------------------------------------------------------
 p_LogBook = new wxLogTextCtrl(p_LogWin); // make p_LogWin the LogBook
 p_LogBook->SetActiveTarget(p_LogBook);
 p_LogBook->SetTimestamp( NULL );
 //------------------------------------------------------------------
 p_PageArea->AddTab(p_LogWin,_("LogBook"), "what is this?" );
 i_TabNr  = p_TabArea->GetTabCount()-1;  // Add one when a new AddTab is done;
 i_PageNr = p_PageArea->GetTabCount()-1; // Add one when a new AddTab is done;
 //--------------------------------------------------------------------------
 p_PgmCtrl->pDoc = this;
 p_TabArea->SetActiveTab(i_PageNr);
 //--------------------------------------------------------------------------
 p_Splitter->Initialize(p_TabArea);
 p_Splitter->SplitHorizontally(p_TabArea,p_PageArea,Sash);
 //--------------------------------------------------------------------------

 if (!OnInitODBC())
  return FALSE;
 //--------------------------------------------------------------------------
 Temp0.Printf("-I-> mjDoc::OnInitView() - End - %d DSN's found",i_DSN);
 p_MainFrame->SetStatusText(Temp0, 0);
 wxLogMessage(Temp0);
 return TRUE;
}
//----------------------------------------------------------------------------------------
bool mjDoc::OnInitODBC()
{
 char Dsn[SQL_MAX_DSN_LENGTH + 1];
 char DsDesc[255]; // BJO20002501 instead of 512
 Temp0 = "";
 i_DSN = 0;       // Counter
 int i = 0;
 //---------------------------------------------------------------------------
 // Initialize the ODBC Environment for Database Operations

 if (SQLAllocEnv(&DbConnectInf.Henv) != SQL_SUCCESS)
 {
  return FALSE;
 }
 //---------------------------------------------------------------------------
 
 const char sep = 3; // separator character used in string between DSN ans DsDesc
 wxStringList s_SortDSNList, s_SortDsDescList;
 // BJO-20000127
 // In order to have same sort result on both Dsn and DsDesc, create a 'keyed' string.
 // The key will be removed after sorting
 wxString KeyString;
 //---------------------------------------------------------------------------
 while(GetDataSource(DbConnectInf.Henv, Dsn, sizeof(Dsn), DsDesc, sizeof(DsDesc)))
 {
  i_DSN++;   // How many Dsn have we ?
  KeyString.Printf("%s%c%s",Dsn, sep, DsDesc);
  s_SortDSNList.Add(Dsn);
  s_SortDsDescList.Add(KeyString);
 }
 s_SortDSNList.Sort();     //BJO
 s_SortDsDescList.Sort();  //BJO

 char ** s_SortDSN = s_SortDSNList.ListToArray();        //BJO
 char ** s_SortDsDesc = s_SortDsDescList.ListToArray();  //BJO
 //---------------------------------------------------------------------------
 // Allocate n ODBC-DSN objects to hold the information
 p_DSN = new DSN[i_DSN];  //BJO
 for (i=0;i<i_DSN;i++)
 {
  KeyString = s_SortDsDesc[i];
  KeyString = KeyString.AfterFirst(sep);
  strcpy(s_SortDsDesc[i],KeyString.c_str());
  (p_DSN+i)->Dsn = s_SortDSN[i];
  (p_DSN+i)->Drv = s_SortDsDesc[i];
  (p_DSN+i)->Usr = "";
  (p_DSN+i)->Pas = "";
  Temp0.Printf("%02d) Dsn(%s) DsDesc(%s)",i,(p_DSN+i)->Dsn,(p_DSN+i)->Drv);
  wxLogMessage(Temp0);
 }
 i = 0;
 //---------------------------------------------------------------------------
 // Allocate n wxDatabase objects to hold the column information
 db_Br = new BrowserDB[i_DSN];
 for (i=0;i<i_DSN;i++)
 {
  (db_Br+i)->p_LogWindow = p_LogWin;
  (db_Br+i)->ODBCSource  = (p_DSN+i)->Dsn;
  (db_Br+i)->UserName    = (p_DSN+i)->Usr;
  (db_Br+i)->Password    = (p_DSN+i)->Pas;
  (db_Br+i)->pDoc        = this;
  (db_Br+i)->i_Which     = i;
 }

 if (SQLFreeEnv(&DbConnectInf.Henv) != SQL_SUCCESS) // BJO20000125
 {
   // Error freeing environment handle
 }

 delete [] s_SortDSN;
 delete [] s_SortDsDesc;

 //---------------------------------------------------------------------------
 if (!i_DSN)
 {
  wxMessageBox(_("No Dataset names found in ODBC!\n" \
                "            Program will exit!\n\n" \
                "                       Ciao"),"-E-> Fatal situation");
  return FALSE;
 }
 //---------------------------------------------------------------------------
 return TRUE;
}
//----------------------------------------------------------------------------------------
bool mjDoc::OnChosenDSN(int Which)
{
 // wxLogMessage("OnChosenDSN(%d) - Begin",Which);
 //---------------------------------------------------------------------------
 if (p_DBTree != NULL)
 {
  p_TabArea->Show(FALSE);    // Deactivate the Window
  p_TabArea->RemoveTab(p_DBTree->i_ViewNr);
  p_TabArea->Show(TRUE);     // Activate the Window
  OnChosenTbl(77,"");
 }
 //-------------------------
 p_TabArea->Show(FALSE);    // Deactivate the Window
 p_DBTree = new DBTree(p_TabArea, TREE_CTRL_DB,wxDefaultPosition, wxDefaultSize,
                                    wxTR_HAS_BUTTONS | wxSUNKEN_BORDER);
 p_TabArea->AddTab(p_DBTree,(p_DSN+Which)->Dsn," ? ");
 p_DBTree->i_ViewNr = p_TabArea->GetTabCount()-1;
 p_TabArea->Show(TRUE);    // Deactivate the Window
 p_DBTree->i_Which  = Which;
 p_DBTree->s_DSN    = (p_DSN+Which)->Dsn;
 p_DBTree->i_TabArt = 0;
 p_DBTree->pDoc     = this;
 p_DBTree->OnPopulate();
 p_TabArea->SetActiveTab(p_DBTree->i_ViewNr);
 //---------------------------------------------------------------------------
 // wxLogMessage("OnChosenDSN(%d) - End",Which);
 return TRUE;
}
//----------------------------------------------------------------------------------------
bool mjDoc::OnChosenTbl(int Tab,wxString Table)
{
 // wxLogMessage("OnChosenTbl(%d,%s)",Tab,Table.c_str());
 //-------------------------
 if (p_DBGrid != NULL)
 {
  if (p_DBGrid->i_TabArt == 0)
  {
   p_TabArea->Show(FALSE);    // Deactivate the Window
   p_TabArea->RemoveTab(p_DBGrid->i_ViewNr);
   p_TabArea->Show(TRUE);     // Activate the Window
  }
  if (p_DBGrid->i_TabArt == 1)
  {
   p_PageArea->Show(FALSE);   // Deactivate the Window
   p_PageArea->RemoveTab(p_DBGrid->i_ViewNr);
   p_PageArea->Show(TRUE);    // Activate the Window
  }
  p_DBGrid = NULL;
  delete p_DBGrid;
 }
 if (Tab == 77)               // Delete only
  return TRUE;
 //-------------------------
 if (Tab == 0)  // Tabview
 {
  p_TabArea->Show(FALSE);    // Deactivate the Window
  p_DBGrid = new DBGrid(p_TabArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
                                                               wxSUNKEN_BORDER);
  p_TabArea->AddTab(p_DBGrid, Table, "");
  p_DBGrid->i_ViewNr = p_TabArea->GetTabCount()-1;
  p_DBGrid->pDoc       = this;
  p_DBGrid->db_Br      = db_Br;
  p_DBGrid->OnTableView(Table);
  p_TabArea->SetActiveTab(p_DBGrid->i_ViewNr);
  p_TabArea->Show(TRUE);     // Activate the Window
 }
 if (Tab == 1)  // Pageview
 {
  p_PageArea->Show(FALSE);   // Deactivate the Window
  p_DBGrid = new DBGrid(p_PageArea,GRID_CTRL_DB,wxDefaultPosition, wxDefaultSize,
                                                                wxSUNKEN_BORDER);
  p_PageArea->AddTab(p_DBGrid, Table, "");
  p_DBGrid->i_ViewNr = p_PageArea->GetTabCount()-1;
  p_DBGrid->pDoc       = this;
  p_DBGrid->db_Br      = db_Br;
  p_DBGrid->i_Which    = p_DBTree->i_Which;
  p_PageArea->Show(TRUE);    // Activate the Window
  p_DBGrid->OnTableView(Table);
  p_PageArea->SetActiveTab(p_DBGrid->i_ViewNr);
 }
 p_DBGrid->i_TabArt = Tab;
 //---*----------------------
 return TRUE;;
}
//----------------------------------------------------------------------------------------
void mjDoc::OnLeer(wxString Aufrufer)
{
Commit	Line	Data
b5ffecfc GT	1	//---------------------------------------------------------------------------
	2	// Name: Doc.cpp
	3	// Purpose: Holds information for DBBrowser
	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	//---------------------------------------------------------------------------
	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	//---------------------------------------------------------------------------
	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	}
	58	//---------------------------------------------------------------------------
	59	mjDoc::~mjDoc()
	60	{
	61	// ----------------------------------------------------------
	62	// -E-> The Tree Controls take to long to close : Why ??
	63	// ----------------------------------------------------------
	64	// wxMessageBox("-I-> end Doc");
65	p_TabArea->Show(FALSE); // Deactivate the Window
66	p_PageArea->Show(FALSE); // Deactivate the Window
67	p_PgmCtrl = NULL;
68	delete p_PgmCtrl;
69	delete [] p_DSN;
70	delete p_DBTree;
71	p_TabArea = NULL; delete p_TabArea;
72	p_PageArea = NULL; delete p_PageArea;
73	p_Splitter = NULL;
74	delete p_Splitter;
75	delete [] db_Br;
76	// wxMessageBox("~mjDoc");
77	}
78	//---------------------------------------------------------------------------
79	bool mjDoc::OnNewDocument()
80	{
81	//-------------------------------------------------------------------
82	if (!OnInitView()) // LogBook is now activ
83	return FALSE;
84	p_PgmCtrl->OnPopulate();
85	//-------------------------------------------------------------------
86	return TRUE;
87	}
88	//---------------------------------------------------------------------------
89	bool mjDoc::OnInitView()
90	{
91	Sash = p_ProgramCfg->Read("/MainFrame/Sash", 200);
92	// wxMessageBox("OnInitView() - Begin ","-I->mjDoc::OnInitView");
93	//--------------------------------------------------------------------------
94	// create "workplace" window
95	//--------------------------------------------------------------------------
96	p_TabArea = new wxTabbedWindow(); // Init the Pointer
97	p_TabArea->Create(p_Splitter, -1);
98	//--------------------------------------------------------------------------
99	p_PgmCtrl = new PgmCtrl(p_TabArea, TREE_CTRL_PGM,wxDefaultPosition, wxDefaultSize,
100	wxTR_HAS_BUTTONS \| wxSUNKEN_BORDER);
101	p_PgmCtrl->i_TabArt = 0; // 0 = Tab ; 1 = Page
102	p_PgmCtrl->i_ViewNr = p_TabArea->GetTabCount()-1;
103	//--------------------------------------------------------------------------
104	wxBitmap *p_FolderClose = new wxBitmap("PgmCtrl"); //, wxBITMAP_TYPE_BMP_RESOURCE); // BJO20000115
105	//--------------------------------------------------------------------------
106	p_TabArea->AddTab(p_PgmCtrl,"PgmCtrl",p_FolderClose);
107	//--------------------------------------------------------------------------
108	// now create "output" window
109	//--------------------------------------------------------------------------
110	p_PageArea = new wxPaggedWindow(); // Init the Pointer
111	p_PageArea->Create(p_Splitter, -1);
112	//--------------------------------------------------------------------------
113	p_LogWin = new wxTextCtrl(p_PageArea,-1,wxEmptyString,
114	wxDefaultPosition, wxDefaultSize,wxTE_MULTILINE );
115	wxFont* ft_Temp = new wxFont(10,wxSWISS,wxNORMAL,wxBOLD,FALSE,"Comic Sans MS");
116	p_LogWin->SetFont(* ft_Temp);
117	// Don't forget ! This is always : i_TabArt = 0 ; i_ViewNr = 1;
118	//------------------------------------------------------------------
119	p_LogBook = new wxLogTextCtrl(p_LogWin); // make p_LogWin the LogBook
120	p_LogBook->SetActiveTarget(p_LogBook);
121	p_LogBook->SetTimestamp( NULL );
122	//------------------------------------------------------------------
123	p_PageArea->AddTab(p_LogWin,_("LogBook"), "what is this?" );
124	i_TabNr = p_TabArea->GetTabCount()-1; // Add one when a new AddTab is done;
125	i_PageNr = p_PageArea->GetTabCount()-1; // Add one when a new AddTab is done;
126	//--------------------------------------------------------------------------
127	p_PgmCtrl->pDoc = this;
128	p_TabArea->SetActiveTab(i_PageNr);
129	//--------------------------------------------------------------------------
130	p_Splitter->Initialize(p_TabArea);
131	p_Splitter->SplitHorizontally(p_TabArea,p_PageArea,Sash);
132	//--------------------------------------------------------------------------
133
134	if (!OnInitODBC())
135	return FALSE;
136	//--------------------------------------------------------------------------
137	Temp0.Printf("-I-> mjDoc::OnInitView() - End - %d DSN's found",i_DSN);
138	p_MainFrame->SetStatusText(Temp0, 0);
139	wxLogMessage(Temp0);
140	return TRUE;
141	}
142	//----------------------------------------------------------------------------------------
143	bool mjDoc::OnInitODBC()
144	{
145	char Dsn[SQL_MAX_DSN_LENGTH + 1];
146	char DsDesc[255]; // BJO20002501 instead of 512
147	Temp0 = "";
148	i_DSN = 0; // Counter
149	int i = 0;
150	//---------------------------------------------------------------------------
151	// Initialize the ODBC Environment for Database Operations
152
153	if (SQLAllocEnv(&DbConnectInf.Henv) != SQL_SUCCESS)
154	{
155	return FALSE;
156	}
157	//---------------------------------------------------------------------------
158
159	const char sep = 3; // separator character used in string between DSN ans DsDesc
160	wxStringList s_SortDSNList, s_SortDsDescList;
161	// BJO-20000127
162	// In order to have same sort result on both Dsn and DsDesc, create a 'keyed' string.
163	// The key will be removed after sorting
164	wxString KeyString;
165	//---------------------------------------------------------------------------
166	while(GetDataSource(DbConnectInf.Henv, Dsn, sizeof(Dsn), DsDesc, sizeof(DsDesc)))
167	{
168	i_DSN++; // How many Dsn have we ?
169	KeyString.Printf("%s%c%s",Dsn, sep, DsDesc);
170	s_SortDSNList.Add(Dsn);
171	s_SortDsDescList.Add(KeyString);
172	}
173	s_SortDSNList.Sort(); //BJO
174	s_SortDsDescList.Sort(); //BJO
175
176	char ** s_SortDSN = s_SortDSNList.ListToArray(); //BJO
177	char ** s_SortDsDesc = s_SortDsDescList.ListToArray(); //BJO
178	//---------------------------------------------------------------------------
179	// Allocate n ODBC-DSN objects to hold the information
180	p_DSN = new DSN[i_DSN]; //BJO
181	for (i=0;i<i_DSN;i++)
182	{
183	KeyString = s_SortDsDesc[i];
184	KeyString = KeyString.AfterFirst(sep);
185	strcpy(s_SortDsDesc[i],KeyString.c_str());
186	(p_DSN+i)->Dsn = s_SortDSN[i];
187	(p_DSN+i)->Drv = s_SortDsDesc[i];
188	(p_DSN+i)->Usr = "";
189	(p_DSN+i)->Pas = "";
190	Temp0.Printf("%02d) Dsn(%s) DsDesc(%s)",i,(p_DSN+i)->Dsn,(p_DSN+i)->Drv);
191	wxLogMessage(Temp0);
192	}
193	i = 0;
194	//---------------------------------------------------------------------------
195	// Allocate n wxDatabase objects to hold the column information
196	db_Br = new BrowserDB[i_DSN];
197	for (i=0;i<i_DSN;i++)
198	{
199	(db_Br+i)->p_LogWindow = p_LogWin;
200	(db_Br+i)->ODBCSource = (p_DSN+i)->Dsn;
201	(db_Br+i)->UserName = (p_DSN+i)->Usr;
202	(db_Br+i)->Password = (p_DSN+i)->Pas;
203	(db_Br+i)->pDoc = this;
204	(db_Br+i)->i_Which = i;
205	}
206
207	if (SQLFreeEnv(&DbConnectInf.Henv) != SQL_SUCCESS) // BJO20000125
208	{
209	// Error freeing environment handle
210	}
211
212	delete [] s_SortDSN;
213	delete [] s_SortDsDesc;
214
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