demos/dbbrowse/pgmctrl.cpp

   1 //----------------------------------------------------------------------------------------
   2 // Name:        pgmctrl.cpp
   3 // Purpose:     Programm Control with a Tree
   4 // Author:      Mark Johnson
   5 // Modified by: 19990806.mj10777
   6 // Created:     19991010
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Mark Johnson, Berlin Germany
   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 #ifndef __WXMSW__
  30 #include "bitmaps/d_closed.xpm"
  31 #include "bitmaps/d_open.xpm"
  32 #include "bitmaps/f_closed.xpm"
  33 #include "bitmaps/f_open.xpm"
  34 #include "bitmaps/logo.xpm"
  35 #include "bitmaps/dsnclose.xpm"
  36 #include "bitmaps/dsnopen.xpm"
  37 #endif
  38 //----------------------------------------------------------------------------------------
  39 //-- all #includes that every .cpp needs             --- 19990807.mj10777 ----------------
  40 //----------------------------------------------------------------------------------------
  41 #include "std.h"    // sorgsam Pflegen !
  42
  43 //----------------------------------------------------------------------------------------
  44 //-- Global functions --------------------------------------------------------------------
  45 //----------------------------------------------------------------------------------------
  46 static inline const wxChar *bool2String(bool b)
  47 {
  48     return b ? _T("") : _T("not ");
  49 }
  50
  51 //----------------------------------------------------------------------------------------
  52 BEGIN_EVENT_TABLE(PgmCtrl, wxTreeCtrl)
  53     EVT_MOTION (PgmCtrl::OnMouseMove)
  54     EVT_LEFT_DCLICK(PgmCtrl::OnSelChanged)
  55     EVT_TREE_ITEM_RIGHT_CLICK(TREE_CTRL_PGM,PgmCtrl::OnRightSelect)
  56     EVT_MENU(PGMCTRL_ODBC_USER,PgmCtrl::OnUserPassword)
  57 END_EVENT_TABLE()
  58
  59 //----------------------------------------------------------------------------------------
  60 // PgmCtrl implementation
  61 //----------------------------------------------------------------------------------------
  62 IMPLEMENT_DYNAMIC_CLASS(PgmCtrl, wxTreeCtrl)
  63
  64 //----------------------------------------------------------------------------------------
  65 PgmCtrl::PgmCtrl(wxWindow *parent) : wxTreeCtrl(parent)
  66 {
  67 }
  68
  69 //----------------------------------------------------------------------------------------
  70 PgmCtrl::PgmCtrl(wxWindow *parent, const wxWindowID id,const wxPoint& pos, const wxSize& size, long style)
  71 : wxTreeCtrl(parent, id, pos, size, style)
  72 {
  73     const int image_size = 16;
  74     // Make an image list containing small icons
  75     p_imageListNormal = new wxImageList(image_size, image_size, true);
  76     // should correspond to TreeIc_xxx enum
  77     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(aLogo)).ConvertToImage().Rescale(image_size, image_size)));
  78     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DsnClosed)).ConvertToImage().Rescale(image_size, image_size)));
  79     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DsnOpen)).ConvertToImage().Rescale(image_size, image_size)));
  80     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DocClosed)).ConvertToImage().Rescale(image_size, image_size)));
  81     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DocOpen)).ConvertToImage().Rescale(image_size, image_size)));
  82     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(FolderClosed)).ConvertToImage().Rescale(image_size, image_size)));
  83     p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(FolderOpen)).ConvertToImage().Rescale(image_size, image_size)));
  84     SetImageList(p_imageListNormal);
  85 }
  86
  87 //----------------------------------------------------------------------------------------
  88 PgmCtrl::~PgmCtrl()
  89 {
  90     delete p_imageListNormal;
  91     delete popupMenu1;
  92 }
  93
  94 //----------------------------------------------------------------------------------------
  95 #undef TREE_EVENT_HANDLER
  96
  97 //----------------------------------------------------------------------------------------
  98 int  PgmCtrl::OnPopulate()
  99 {
 100     SetFont(* pDoc->ft_Doc);
 101     wxTreeItemId Root, Folder, Docu;
 102     //---------------------------------------------------------------------------------------
 103     int i;
 104     double dTmp = 1234567.89;
 105     Temp0.Printf(_("%s Functions"),p_ProgramCfg->GetAppName().c_str());
 106     Root   = AddRoot(Temp0,TreeIc_Logo,TreeIc_Logo, new TreeData(_T("Root")));
 107     //---------------------------------------------------------------------------------------
 108     Folder = AppendItem(Root, _("Program settings")   ,TreeIc_FolderClosed, TreeIc_FolderOpen, new TreeData(_T("Settings")));
 109     p_ProgramCfg->Read(_T("/Local/langid"),&Temp0); p_ProgramCfg->Read(_T("/Local/language"),&Temp2);
 110     Temp1.Printf(_("locale (%s) ; Language (%s) ; Number(%2.2f)"),Temp0.c_str(), Temp2.c_str(), dTmp); Temp0.Empty();  Temp2.Empty();
 111     Docu   = AppendItem(Folder, Temp1,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Setting Language")));
 112     p_ProgramCfg->Read(_T("/Paths/Work"),&Temp0); Temp1.Printf(_("Work Path : %s"),Temp0.c_str()); Temp0.Empty();
 113     Docu   = AppendItem(Folder,Temp1,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Path Work")));
 114     Docu   = AppendItem(Folder, _("Change the language to English") ,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Language English")));
 115     Docu   = AppendItem(Folder, _("Change the language to German")  ,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Language German")));
 116     Docu   = AppendItem(Folder, _("Delete all wxConfigBase Entry's"),TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("wxConfigBase Delete")));
 117     Folder = AppendItem(Root, _T("ODBC DSN"),TreeIc_FolderClosed,TreeIc_FolderOpen,new TreeData(_T("ODBC-DSN")));
 118     for (i=0;i<pDoc->i_DSN;i++)
 119     {
 120         Temp0.Printf(_T("ODBC-%s"),(pDoc->p_DSN+i)->Dsn.c_str());
 121         Docu   = AppendItem(Folder,(pDoc->p_DSN+i)->Dsn ,TreeIc_DsnClosed,TreeIc_DsnOpen, new TreeData(Temp0));
 122     }
 123     //---------------------------------------------------------------------------------------
 124     popupMenu1 = NULL;
 125     popupMenu1 = new wxMenu(_T(""));
 126     popupMenu1->Append(PGMCTRL_ODBC_USER, _("Set Username and Password"));
 127     // popupMenu1->AppendSeparator();
 128     //---------------------------------------------------------------------------------------
 129     Expand(Root);
 130     Expand(Folder);
 131     //---------------------------------------------------------------------------------------
 132     return 0;
 133 }
 134
 135 //----------------------------------------------------------------------------------------
 136 void PgmCtrl::OnSelChanged(wxMouseEvent& WXUNUSED(event))
 137 {
 138     int i;
 139     Temp0.Empty();   Temp1.Empty();
 140 #if wxUSE_STATUSBAR
 141     pDoc->p_MainFrame->SetStatusText(Temp0,0);
 142 #endif // wxUSE_STATUSBAR
 143     // Get the Information that we need
 144     wxTreeItemId itemId = GetSelection();
 145     TreeData *item = (TreeData *)GetItemData(itemId);
 146     if (item != NULL )
 147     {
 148         int Treffer = 0;
 149         Temp1.Printf(_T("%s"),item->m_desc.c_str());
 150         //--------------------------------------------------------------------------------------
 151         if (Temp1 == _T("Language English"))
 152         {
 153             Temp0 = _T("std");
 154             p_ProgramCfg->Write(_T("/Local/langid"),Temp0);
 155             Temp0 = _("-I-> After a programm restart, the language will be changed to English.");
 156             wxMessageBox(Temp0);
 157         }
 158         if (Temp1 == _T("Language German"))
 159         {
 160             Temp0 = _T("de");
 161             p_ProgramCfg->Write(_T("/Local/langid"),Temp0);
 162             Temp0 = _("-I-> After a programm restart, the language will be changed to German.");
 163             wxMessageBox(Temp0);
 164         }
 165         //--------------------------------------------------------------------------------------
 166         if (Temp1 == _T("wxConfigBase Delete"))
 167         {
 168             if (p_ProgramCfg->DeleteAll()) // Default Diretory for wxFileSelector
 169                 Temp0 = _("-I-> wxConfigBase.p_ProgramCfg->DeleteAll() was succesfull.");
 170             else
 171                 Temp0 = _("-E-> wxConfigBase.p_ProgramCfg->DeleteAll() was not succesfull !");
 172             wxBell();     // Ding_a_Ling
 173             Treffer++;
 174         }
 175         //--------------------------------------------------------------------------------------
 176         if (Temp1.Contains(_T("ODBC-")))
 177         {
 178             Temp1 = Temp1.Mid(5,wxSTRING_MAXLEN);
 179             for (i=0;i<pDoc->i_DSN;i++)
 180             {
 181                 if (Temp1 == (pDoc->p_DSN+i)->Dsn)
 182                 {
 183                     pDoc->OnChosenDSN(i);
 184                 }
 185             }
 186             Treffer++;
 187         }
 188         //--------------------------------------------------------------------------------------
 189         if (Treffer == 0)
 190         {
 191             //-------------------------------------------------------------------------------------
 192             Temp0.Printf(_("Item '%s': %sselected, %sexpanded, %sbold, %u children (%u immediately under this item)."),
 193                 item->m_desc.c_str(),
 194                 bool2String(IsSelected(itemId)),
 195                 bool2String(IsExpanded(itemId)),
 196                 bool2String(IsBold(itemId)),
 197                 GetChildrenCount(itemId),
 198                 GetChildrenCount(itemId));
 199             LogBuf.Printf(_T("-I-> PgmCtrl::OnSelChanged - %s"),Temp0.c_str());
 200             wxLogMessage( _T("%s"), LogBuf.c_str() );
 201             //-------------------------------------------------------------------------------------
 202         }
 203     }
 204 }
 205
 206 //----------------------------------------------------------------------------------------
 207 void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))
 208 {
 209     int i;
 210     Temp0.Empty();
 211     // Get the Information that we need
 212     wxTreeItemId itemId = GetSelection();
 213     DBTreeData *item = (DBTreeData *)GetItemData(itemId);
 214     SaveDSN.Empty();
 215     if ( item != NULL )
 216     {
 217         int Treffer = 0;
 218         Temp1.Printf(_T("%s"),item->m_desc.c_str());
 219         //--------------------------------------------------------------------------------------
 220         if (Temp1.Contains(_T("ODBC-")))
 221         {
 222             Temp1 = Temp1.Mid(5,wxSTRING_MAXLEN);
 223             for (i=0;i<pDoc->i_DSN;i++)
 224             {
 225                 if (Temp1 == (pDoc->p_DSN+i)->Dsn)
 226                 {
 227                     SaveDSN = Temp1;
 228                     PopupMenu(popupMenu1,TreePos.x,TreePos.y);
 229                 }
 230             }
 231             Treffer++;
 232         }
 233         //--------------------------------------------------------------------------------------
 234         if (Treffer == 0)
 235         {
 236         /*
 237         Temp0.Printf(_("Item '%s': %sselected, %sexpanded, %sbold,"
 238         "%u children (%u immediately under this item)."),
 239         item->m_desc.c_str(),
 240         bool2String(IsSelected(itemId)),
 241         bool2String(IsExpanded(itemId)),
 242         bool2String(IsBold(itemId)),
 243         GetChildrenCount(itemId),
 244         GetChildrenCount(itemId));
 245         LogBuf.Printf("-I-> DBTree::OnSelChanged - %s",Temp0.c_str());
 246         wxLogMessage( "%s", LogBuf.c_str() );
 247             */
 248         }
 249         //--------------------------------------------------------------------------------------
 250     }
 251 } // void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))
 252
 253 //----------------------------------------------------------------------------------------
 254 void PgmCtrl::OnMouseMove(wxMouseEvent &event)
 255 {
 256     TreePos = event.GetPosition();
 257 }
 258
 259 //----------------------------------------------------------------------------------------
 260 void PgmCtrl::OnUserPassword(wxCommandEvent& WXUNUSED(event))
 261 {
 262     // wxMessageBox(SaveDSN);
 263     int i;
 264     //--------------------------------------------
 265     DlgUser *p_Dlg = new DlgUser(this,pDoc,_T(""));
 266     //-------------------------------------------
 267     for (i=0;i<pDoc->i_DSN;i++)
 268     {
 269         wxYield();
 270         if (SaveDSN == (pDoc->p_DSN+i)->Dsn)
 271         {
 272             p_Dlg->pDoc       = pDoc;
 273             p_Dlg->s_DSN      = (pDoc->p_DSN+i)->Dsn;
 274             p_Dlg->s_User     = (pDoc->p_DSN+i)->Usr;
 275             p_Dlg->s_Password = (pDoc->p_DSN+i)->Pas;
 276             p_Dlg->OnInit();
 277             p_Dlg->Fit();
 278             //--------------------
 279             // Temp0.Printf("i(%d) ; s_DSN(%s) ; s_User(%s) ; s_Password(%s)",i,p_Dlg.s_DSN,p_Dlg.s_User,p_Dlg.s_Password);
 280             // wxMessageBox(Temp0);
 281             bool OK = false;
 282             if (p_Dlg->ShowModal() == wxID_OK)
 283             {
 284                 (pDoc->p_DSN+i)->Usr = p_Dlg->s_User;
 285                 (pDoc->p_DSN+i)->Pas = p_Dlg->s_Password;
 286                 (pDoc->db_Br+i)->UserName  = (pDoc->p_DSN+i)->Usr;
 287                 (pDoc->db_Br+i)->Password  = (pDoc->p_DSN+i)->Pas;
 288                 OK = true;
 289             }
 290             delete p_Dlg;
 291             if (!OK)
 292                 return;
 293             //--------------------
 294             break; // We have what we want, leave
 295         }
 296     }
 297     //-------------------------------------------
 298     SaveDSN.Empty();
 299 }
 300 //----------------------------------------------------------------------------------------