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