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