]> git.saurik.com Git - wxWidgets.git/blame - demos/dbbrowse/dbbrowse.cpp
dbbrowse.cpp doc.cpp de/dbbrowse.mo de/dbbrowse.po
[wxWidgets.git] / demos / dbbrowse / dbbrowse.cpp
CommitLineData
c92b0f9a 1//----------------------------------------------------------------------------------------
b5ffecfc
GT
2// Name: dbbrowse.cpp
3// Purpose: Through ODBC - Databases Browsen
4// Author: Mark Johnson, mj10777@gmx.net
5// Modified by:
6// BJO : Bart A.M. JOURQUIN
7// Created: 19991127
8// Copyright: (c) Mark Johnson
9// Licence: wxWindows license
c09d434d 10// RCS-ID: $Id$
c92b0f9a
MJ
11//----------------------------------------------------------------------------------------
12//-- all #ifdefs that the whole Project needs. -------------------------------------------
13//----------------------------------------------------------------------------------------
b5ffecfc
GT
14#ifdef __GNUG__
15 #pragma implementation
16 #pragma interface
17#endif
c92b0f9a 18//----------------------------------------------------------------------------------------
b5ffecfc
GT
19// For compilers that support precompilation, includes "wx/wx.h".
20#include "wx/wxprec.h"
c92b0f9a 21//----------------------------------------------------------------------------------------
b5ffecfc
GT
22#ifdef __BORLANDC__
23 #pragma hdrstop
24#endif
c92b0f9a 25//----------------------------------------------------------------------------------------
b5ffecfc
GT
26#ifndef WX_PRECOMP
27 #include "wx/wx.h"
28#endif
c92b0f9a 29//----------------------------------------------------------------------------------------
b5ffecfc 30#ifndef __WXMSW__
b5ffecfc 31 #include "bitmaps/logo.xpm"
a1c5f7a3 32#endif
c92b0f9a
MJ
33//----------------------------------------------------------------------------------------
34//-- all #includes that every .cpp needs --- 19990807.mj10777 ----------------
35//----------------------------------------------------------------------------------------
b5ffecfc 36#include "std.h" // sorgsam Pflegen !
a1c5f7a3 37// #include <iostream>
c92b0f9a
MJ
38//----------------------------------------------------------------------------------------
39//-- Some Global Vars for this file ------------------------------------------------------
40//----------------------------------------------------------------------------------------
b5ffecfc 41BEGIN_EVENT_TABLE(MainFrame, wxFrame)
a1c5f7a3
MJ
42 EVT_MENU(QUIT, MainFrame::OnQuit) // Program End
43 EVT_MENU(ABOUT, MainFrame::OnAbout) // Program Discription
44 EVT_MENU(HELP, MainFrame::OnHelp) // Program Help
b5ffecfc 45END_EVENT_TABLE()
c92b0f9a 46//----------------------------------------------------------------------------------------
a1c5f7a3 47IMPLEMENT_APP(MainApp) // This declares wxApp::MainApp as "the" Application
c92b0f9a
MJ
48//----------------------------------------------------------------------------------------
49// 'Main program' equivalent, creating windows and returning main app frame
50//----------------------------------------------------------------------------------------
a1c5f7a3 51bool MainApp::OnInit(void) // Does everything needed for a program start
b5ffecfc 52{
a1c5f7a3 53 wxString Temp0; // Use as needed
b5ffecfc 54 //---------------------------------------------------------------------------------------
a1c5f7a3
MJ
55 // set the language to use // Help.?? (.std = english, .de = german etc.)
56 const char *language = NULL; // czech, german, french, polish
57 const char *langid = NULL; // std = english , cz, de = german, fr = french, pl = polish
58 wxString s_LangHelp; // Directory/Filename.hhp of the Help-Project file
59 wxString s_LangId, s_Language;
60 s_Language.Empty(); s_LangId.Empty(); s_LangHelp.Empty();
b5ffecfc 61 //---------------------------------------------------------------------------------------
c92b0f9a
MJ
62 //-- Graphic File suport - use only when needed, otherwise big .exe's
63 //---------------------------------------------------------------------------------------
b5ffecfc 64#if wxUSE_LIBPNG
c92b0f9a 65 wxImage::AddHandler( new wxPNGHandler ); // needed for help System
b5ffecfc
GT
66#endif
67/*
68#if wxUSE_LIBJPEG
69 wxImage::AddHandler(new wxJPEGHandler ); // use only when needed, otherwise big .exe's
70#endif
71 wxImage::AddHandler( new wxGIFHandler ); // use only when needed, otherwise big .exe's
72 wxImage::AddHandler( new wxPCXHandler ); // use only when needed, otherwise big .exe's
73 wxImage::AddHandler( new wxPNMHandler ); // use only when needed, otherwise big .exe's
74*/
75#ifdef __WXMSW__
c92b0f9a
MJ
76 // wxBitmap::AddHandler( new wxXPMFileHandler ); // Attempt to use XPS instead of ico
77 // wxBitmap::AddHandler( new wxXPMDataHandler ); // - Attempt failed
b5ffecfc
GT
78#endif
79 //---------------------------------------------------------------------------------------
b5ffecfc
GT
80 switch ( argc )
81 {
82 default:
83 // ignore the other args, fall through
84 case 3:
a1c5f7a3
MJ
85 language = argv[2]; // czech, english, french, german , polish
86 langid = argv[1]; // cz, std, fr, de , pl
b5ffecfc
GT
87 break;
88 case 2:
a1c5f7a3 89 langid = argv[1]; // cz, std, fr, de , pl
b5ffecfc
GT
90 break;
91 case 1:
92 break;
93 };
94 //---------------------------------------------------------------------------------------
a1c5f7a3
MJ
95 // Win-Registry : Workplace\HKEY_CURRENT_USERS\Software\%GetVendorName()\%GetAppName()
96 //---------------------------------------------------------------------------------------
97 SetVendorName("mj10777"); // Needed to get Configuration Information
98 SetAppName("DBBrowse"); // "" , also needed for s_LangHelp
99 //---------------------------------------------------------------------------------------
b5ffecfc
GT
100 // we're using wxConfig's "create-on-demand" feature: it will create the
101 // config object when it's used for the first time. It has a number of
102 // advantages compared with explicitly creating our wxConfig:
103 // 1) we don't pay for it if we don't use it
104 // 2) there is no danger to create it twice
105
106 // application and vendor name are used by wxConfig to construct the name
107 // of the config file/registry key and must be set before the first call
108 // to Get() if you want to override the default values (the application
109 // name is the name of the executable and the vendor name is the same)
110 //---------------------------------------------------------------------------------------
a1c5f7a3
MJ
111 p_ProgramCfg = wxConfigBase::Get(); // Get Program Configuration from Registry
112 // p_ProgramCfg->DeleteAll(); // This is how the Config can be erased
113 p_ProgramCfg->SetPath("/"); // Start at root
b5ffecfc
GT
114 //---------------------------------------------------------------------------------------
115 //-- Set the Language and remember it for the next time. --------------------------------
116 //---------------------------------------------------------------------------------------
a1c5f7a3 117 if (langid == NULL) // No Parameter was given
b5ffecfc 118 {
a1c5f7a3 119 Temp0.Empty();
b5ffecfc
GT
120 p_ProgramCfg->Read("/Local/langid",&Temp0); // >const char *langid< can't be used here
121 if (Temp0 == "")
a1c5f7a3 122 langid = "std"; // Standard language is "std" = english
b5ffecfc
GT
123 else
124 langid = Temp0;
125 }
a1c5f7a3 126 Temp0.Printf("%s",langid);
b5ffecfc 127 //---------------------------------------------------------------------------------------
c92b0f9a 128 // Support the following languages (std = english)
a1c5f7a3
MJ
129 if ((Temp0 == "a") || (Temp0 == "cz") || (Temp0 == "de") ||
130 (Temp0 == "fr") || (Temp0 == "pl"))
131 { // The three-letter language-string codes are only valid in Windows NT and Windows 95.
b5ffecfc 132 if (Temp0 == "cz")
b5ffecfc 133 language = "czech"; // csy or czech
b5ffecfc
GT
134 if ((Temp0 == "de") || (Temp0 == "a"))
135 {
136 language = "german"; // deu or german
a1c5f7a3
MJ
137 if (Temp0 == "a")
138 { langid = Temp0 = "de"; } // Austrian = german
139 } // german / austrian
b5ffecfc 140 if (Temp0 == "fr")
b5ffecfc 141 language = "french"; // fra or french
b5ffecfc 142 if (Temp0 == "pl")
b5ffecfc 143 language = "polish"; // plk or polish
a1c5f7a3
MJ
144 if (!m_locale.Init(language, langid, language)) // Don't do this for english (std)
145 { // You should recieve errors here for cz and pl since there is no cz/ and pl/ directory
146 wxLogMessage("-E-> %s : SetLocale error : langid(%s) ; language(%s)",GetAppName().c_str(),langid,language);
147 langid = "std";
148 language = "C"; // english, english-aus , -can , -nz , -uk , -usa
b5ffecfc 149 }
a1c5f7a3
MJ
150 else
151 { // Read in Foreign language's text for GetAppName() and Help
36ba4665
MJ
152 Temp0 = GetAppName();
153 Temp0 = Temp0.Lower();
154 m_locale.AddCatalog(Temp0.c_str());
260460ae 155 m_locale.AddCatalog("help");
a1c5f7a3
MJ
156 }
157 } // Support the following languages (std = english)
b5ffecfc
GT
158 else
159 {
a1c5f7a3
MJ
160 langid = "std";
161 language = "C"; // english, english-aus , -can , -nz , -uk , -usa
b5ffecfc 162 }
a1c5f7a3
MJ
163 s_Language.Printf("%s",language); // language is a pointer
164 s_LangId.Printf("%s",langid); // langid is a pointer
165 p_ProgramCfg->Write("/Local/language",s_Language);
166 p_ProgramCfg->Write("/Local/langid",s_LangId);
167 s_LangHelp.Printf("help.%s/%s.hhp",s_LangId.c_str(),GetAppName().c_str()); // "help.std/Garantie.hhp";
260460ae 168 s_LangHelp = s_LangHelp.Lower(); // A must for Linux
c92b0f9a 169 //---------------------------------------------------------------------------------------
a1c5f7a3
MJ
170 Temp0 = "NONE"; // I don't remember why I did this
171 p_ProgramCfg->Write("/NONE",Temp0); // I don't remember why I did this
172 p_ProgramCfg->Write("/Paths/NONE",Temp0); // I don't remember why I did this
173 p_ProgramCfg->Write("/MainFrame/NONE",Temp0); // I don't remember why I did this
c92b0f9a 174 //---------------------------------------------------------------------------------------
a1c5f7a3 175 p_ProgramCfg->Write("/Paths/Work",wxGetCwd()); // Get current Working Path
b5ffecfc 176 p_ProgramCfg->SetPath("/");
c92b0f9a
MJ
177 //---------------------------------------------------------------------------------------
178 // restore frame position and size, if empty start Values (1,1) and (750,600)
b5ffecfc 179 int x = p_ProgramCfg->Read("/MainFrame/x", 1), y = p_ProgramCfg->Read("/MainFrame/y", 1),
c92b0f9a 180 w = p_ProgramCfg->Read("/MainFrame/w", 750), h = p_ProgramCfg->Read("/MainFrame/h", 600);
b5ffecfc
GT
181 //---------------------------------------------------------------------------------------
182 // Create the main frame window
897d36c2
MJ
183 Temp0.Printf("%s - %s",GetAppName().c_str(),GetVendorName().c_str());
184 frame = new MainFrame((wxFrame *) NULL,(char *) Temp0.c_str(),wxPoint(x,y),wxSize(w,h));
b5ffecfc 185 //---------------------------------------------------------------------------------------
c92b0f9a
MJ
186 // Set the Backgroundcolour (only need if your are NOT using wxSYS_COLOUR_BACKGROUND)
187 frame->SetBackgroundColour(wxSystemSettings::GetSystemColour(wxSYS_COLOUR_BACKGROUND));
b5ffecfc 188 // frame->SetBackgroundColour(wxColour(255, 255, 255));
c92b0f9a
MJ
189 // frame->SetBackgroundColour(* wxWHITE);
190 //---------------------------------------------------------------------------------------
191 // Give it an icon
a1c5f7a3
MJ
192 //---------------------------------------------------------------------------------------
193 // 12.02.2000 - Guillermo Rodriguez Garcia :
194 //---------------------------------------------------------------------------------------
195 // This is different for Win9x and WinNT; one of them takes the first ico
196 // in the .rc file, while the other takes the icon with the lowest name,
197 // so to be sure that it always work, put your icon the first *and* give
198 // it a name such a 'appicon' or something.
199 //---------------------------------------------------------------------------------------
200 // mj10777 : any special rule in Linux ?
201 //---------------------------------------------------------------------------------------
202 frame->SetIcon(wxICON(aLogo)); // lowest name and first entry in RC File
b5ffecfc
GT
203 //---------------------------------------------------------------------------------------
204 // Make a menubar
205 wxMenu *file_menu = new wxMenu;
206 wxMenu *help_menu = new wxMenu;
207
208 help_menu->Append(HELP, _("&Help"));
209 help_menu->AppendSeparator();
210 help_menu->Append(ABOUT, _("&About"));
211 file_menu->Append(QUIT, _("E&xit"));
212
213 wxMenuBar *menu_bar = new wxMenuBar;
214 menu_bar->Append(file_menu, _("&File"));
215 menu_bar->Append(help_menu, _("&Help"));
216 frame->SetMenuBar(menu_bar);
217 frame->CreateStatusBar(1);
218 Temp0.Printf(_("%s has started !"),p_ProgramCfg->GetAppName().c_str());
219 frame->SetStatusText(Temp0, 0);
220 //---------------------------------------------------------------------------------------
221 int width, height;
222 frame->GetClientSize(&width, &height);
c92b0f9a
MJ
223 //---------------------------------------------------------------------------------------
224 frame->p_Splitter = new DocSplitterWindow(frame,-1);
b5ffecfc 225 // p_Splitter->SetCursor(wxCursor(wxCURSOR_PENCIL));
3fa0976a 226 frame->pDoc = new MainDoc();
b5ffecfc
GT
227 frame->pDoc->p_MainFrame = frame;
228 frame->pDoc->p_Splitter = frame->p_Splitter;
229 frame->pDoc->p_Splitter->pDoc = frame->pDoc; // ControlBase: saving the Sash
b5ffecfc
GT
230 //---------------------------------------------------------------------------------------
231 //-- Problem : GetClientSize(Width,Hight) are not the same as the values given in the ---
232 //-- construction of the Frame. ---
233 //-- Solved : GetClientSize is called here and the difference is noted. When the ---
234 //-- Window is closed the diff. is added to the result of GetClientSize. ---
235 //---------------------------------------------------------------------------------------
236 frame->GetClientSize(&frame->DiffW, &frame->DiffH); frame->DiffW-=w; frame->DiffH-=h;
237 //----------------------------------------------------------------------------
a1c5f7a3 238 //-- Help : Load the help.%langid/%GetAppName().hhp (help.std/dbbrowse.hhp) file ---
b5ffecfc 239 //----------------------------------------------------------------------------
c92b0f9a
MJ
240 frame->p_Help = new wxHtmlHelpController(); // construct the Help System
241 frame->p_Help->UseConfig(p_ProgramCfg); // Don't rember what this was for
a1c5f7a3
MJ
242 // You should recieve errors here for fr since there is no help.fr/ directory
243 if (!frame->p_Help->AddBook(s_LangHelp)) // Use the language set
244 { // You should recieve errors here for fr since there is no help.fr/ but a fr/ directory
245 wxLogMessage("-E-> %s : AddBook error : s_LangHelp(%s)",GetAppName().c_str(),s_LangHelp.c_str());
246 }
c92b0f9a 247 frame->pDoc->p_Help = frame->p_Help; // Save the information to the document
b5ffecfc 248 //---------------------------------------------------------------------------------------
a1c5f7a3
MJ
249 frame->Show(TRUE); // Show the frame
250 SetTopWindow(frame); // At this point the frame can be seen
c92b0f9a 251 //---------------------------------------------------------------------------------------
a1c5f7a3
MJ
252 // If you need a "Splash Screen" because of a long OnNewDocument, do it here
253 if (!frame->pDoc->OnNewDocument())
254 frame->Close(TRUE);
255 // Kill a "Splash Screen" because OnNewDocument, if you have one
256 //---------------------------------------------------------------------------------------
257 p_ProgramCfg->Flush(TRUE); // save the configuration
b5ffecfc 258 return TRUE;
c92b0f9a
MJ
259} // bool MainApp::OnInit(void)
260//----------------------------------------------------------------------------------------
b5ffecfc 261// My frame constructor
c92b0f9a
MJ
262//----------------------------------------------------------------------------------------
263MainFrame::MainFrame(wxFrame *frame, char *title, const wxPoint& pos, const wxSize& size):
264 wxFrame(frame, -1, title, pos, size)
b5ffecfc 265{
66d6c315
MJ
266 p_Splitter = NULL; pDoc = NULL; p_Help = NULL; // Keep the Pointers clean !
267 //--- Everything else is done in MainApp::OnInit() --------------------------------------
b5ffecfc 268}
c92b0f9a 269//----------------------------------------------------------------------------------------
b5ffecfc
GT
270MainFrame::~MainFrame(void)
271{
272 // save the control's values to the config
a1c5f7a3 273 if (p_ProgramCfg == NULL)
b5ffecfc 274 return;
a1c5f7a3 275 // save the frame position before it is destroyed
b5ffecfc
GT
276 int x, y, w, h;
277 GetPosition(&x, &y);
278 GetClientSize(&w, &h); w -= DiffW; h -= DiffH;
279 p_ProgramCfg->Write("/MainFrame/x", (long) x);
280 p_ProgramCfg->Write("/MainFrame/y", (long) y);
281 p_ProgramCfg->Write("/MainFrame/w", (long) w);
282 p_ProgramCfg->Write("/MainFrame/h", (long) h);
283 p_ProgramCfg->Write("/MainFrame/Sash", (long) pDoc->Sash);
284 // clean up: Set() returns the active config object as Get() does, but unlike
285 // Get() it doesn't try to create one if there is none (definitely not what
286 // we want here!)
287 // delete wxConfigBase::Set((wxConfigBase *) NULL);
c92b0f9a 288 p_ProgramCfg->Flush(TRUE); // saves Objekt
66d6c315
MJ
289 if (pDoc) // If we have a Valid Document
290 delete pDoc; // Cleanup (MainDoc::~MainDoc)
a1c5f7a3 291} // MainFrame::~MainFrame(void)
c92b0f9a 292//----------------------------------------------------------------------------------------
b5ffecfc
GT
293void MainFrame::OnQuit(wxCommandEvent& WXUNUSED(event))
294{
c92b0f9a
MJ
295 // Close the help frame; this will cause the config data to get written.
296 if (p_Help->GetFrame()) // returns NULL if no help frame active
297 p_Help->GetFrame()->Close(TRUE);
b5ffecfc
GT
298 Close(TRUE);
299}
c92b0f9a 300//----------------------------------------------------------------------------------------
b5ffecfc
GT
301void MainFrame::OnAbout(wxCommandEvent& WXUNUSED(event))
302{
89fcf04c
MJ
303 wxString Temp0, Temp1;
304 Temp0.Printf(_("%s\nMark Johnson\nBerlin, Germany\nmj10777@gmx.net\n (c) 2000"),p_ProgramCfg->GetAppName().c_str());
305 Temp1.Printf(_("About %s"),p_ProgramCfg->GetAppName().c_str());
306 wxMessageDialog dialog(this, Temp0,Temp1,wxOK|wxCANCEL);
b5ffecfc
GT
307 dialog.ShowModal();
308}
c92b0f9a 309//----------------------------------------------------------------------------------------
b5ffecfc
GT
310void MainFrame::OnHelp(wxCommandEvent& WXUNUSED(event))
311{
c92b0f9a 312 p_Help->Display("Main page");
b5ffecfc 313}
c92b0f9a 314//----------------------------------------------------------------------------------------