1 //----------------------------------------------------------------------------------------
3 // Purpose: Programm Control with a Tree
4 // Author: Mark Johnson
5 // Modified by: 19990806.mj10777
8 // Copyright: (c) Mark Johnson, Berlin Germany, mj10777@gmx.net
9 // Licence: wxWindows license
10 //----------------------------------------------------------------------------------------
11 //-- all #ifdefs that the whole Project needs. -------------------------------------------
12 //----------------------------------------------------------------------------------------
14 #pragma implementation
17 //----------------------------------------------------------------------------------------
18 // For compilers that support precompilation, includes "wx/wx.h".
19 #include "wx/wxprec.h"
20 //----------------------------------------------------------------------------------------
24 //----------------------------------------------------------------------------------------
28 //----------------------------------------------------------------------------------------
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"
38 //----------------------------------------------------------------------------------------
39 //-- all #includes that every .cpp needs --- 19990807.mj10777 ----------------
40 //----------------------------------------------------------------------------------------
41 #include "std.h" // sorgsam Pflegen !
42 //----------------------------------------------------------------------------------------
43 //-- Global functions --------------------------------------------------------------------
44 //----------------------------------------------------------------------------------------
45 static inline const char *bool2String(bool b
)
47 return b
? "" : "not ";
49 //----------------------------------------------------------------------------------------
50 BEGIN_EVENT_TABLE(PgmCtrl
, wxTreeCtrl
)
51 EVT_MOTION (PgmCtrl::OnMouseMove
)
52 EVT_LEFT_DCLICK(PgmCtrl::OnSelChanged
)
53 EVT_TREE_ITEM_RIGHT_CLICK(TREE_CTRL_PGM
,PgmCtrl::OnRightSelect
)
54 EVT_MENU(PGMCTRL_ODBC_USER
,PgmCtrl::OnUserPassword
)
56 //----------------------------------------------------------------------------------------
57 // PgmCtrl implementation
58 //----------------------------------------------------------------------------------------
59 IMPLEMENT_DYNAMIC_CLASS(PgmCtrl
, wxTreeCtrl
)
60 //----------------------------------------------------------------------------------------
61 PgmCtrl::PgmCtrl(wxWindow
*parent
) : wxTreeCtrl(parent
)
64 //----------------------------------------------------------------------------------------
65 PgmCtrl::PgmCtrl(wxWindow
*parent
, const wxWindowID id
,const wxPoint
& pos
, const wxSize
& size
, long style
)
66 : wxTreeCtrl(parent
, id
, pos
, size
, style
)
68 // Make an image list containing small icons
69 p_imageListNormal
= new wxImageList(16, 16, TRUE
);
70 // should correspond to TreeIc_xxx enum
71 #if defined(__WXMSW__) && defined(__WIN16__)
72 // This is required in 16-bit Windows mode only because we can't load a specific (16x16)
73 // icon image, so it comes out stretched
74 p_imageListNormal
->Add(wxBitmap("bitmap1", wxBITMAP_TYPE_BMP_RESOURCE
));
75 p_imageListNormal
->Add(wxBitmap("bitmap2", wxBITMAP_TYPE_BMP_RESOURCE
));
77 p_imageListNormal
->Add(wxICON(aLogo
));
78 p_imageListNormal
->Add(wxICON(DsnClosed
));
79 p_imageListNormal
->Add(wxICON(DsnOpen
));
80 p_imageListNormal
->Add(wxICON(DocClosed
));
81 p_imageListNormal
->Add(wxICON(DocOpen
));
82 p_imageListNormal
->Add(wxICON(FolderClosed
));
83 p_imageListNormal
->Add(wxICON(FolderOpen
));
85 SetImageList(p_imageListNormal
);
87 //----------------------------------------------------------------------------------------
90 delete p_imageListNormal
;
92 //----------------------------------------------------------------------------------------
93 #undef TREE_EVENT_HANDLER
94 //----------------------------------------------------------------------------------------
95 int PgmCtrl::OnPopulate()
97 SetFont(* pDoc
->ft_Doc
);
98 wxTreeItemId Root
, Folder
, Docu
;
99 //---------------------------------------------------------------------------------------
101 double dTmp
= 1234567.89;
102 Temp0
.Printf(_("%s Functions"),p_ProgramCfg
->GetAppName().c_str());
103 Root
= AddRoot(Temp0
,TreeIc_Logo
,TreeIc_Logo
, new TreeData("Root"));
104 //---------------------------------------------------------------------------------------
105 Folder
= AppendItem(Root
, _("Program settings") ,TreeIc_FolderClosed
, TreeIc_FolderOpen
, new TreeData("Settings"));
106 p_ProgramCfg
->Read("/Local/langid",&Temp0
); p_ProgramCfg
->Read("/Local/language",&Temp2
);
107 Temp1
.Printf(_("locale (%s) ; Language (%s) ; Number(%2.2f)"),Temp0
.c_str(), Temp2
.c_str(), dTmp
); Temp0
.Empty(); Temp2
.Empty();
108 Docu
= AppendItem(Folder
, Temp1
,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Setting Language"));
109 p_ProgramCfg
->Read("/Paths/Work",&Temp0
); Temp1
.Printf(_("Work Path : %s"),Temp0
.c_str()); Temp0
.Empty();
110 Docu
= AppendItem(Folder
,Temp1
,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Path Work"));
111 Docu
= AppendItem(Folder
, _("Change the language to English") ,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Language English"));
112 Docu
= AppendItem(Folder
, _("Change the language to German") ,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Language German"));
113 Docu
= AppendItem(Folder
, _("Delete all wxConfigBase Entry's"),TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("wxConfigBase Delete"));
114 Folder
= AppendItem(Root
, "ODBC DSN",TreeIc_FolderClosed
,TreeIc_FolderOpen
,new TreeData("ODBC-DSN"));
115 for (i
=0;i
<pDoc
->i_DSN
;i
++)
117 Temp0
.Printf("ODBC-%s",(pDoc
->p_DSN
+i
)->Dsn
.c_str());
118 Docu
= AppendItem(Folder
,(pDoc
->p_DSN
+i
)->Dsn
,TreeIc_DsnClosed
,TreeIc_DsnOpen
, new TreeData(Temp0
));
120 //---------------------------------------------------------------------------------------
122 popupMenu1
= new wxMenu("");
123 popupMenu1
->Append(PGMCTRL_ODBC_USER
, _("Set Username and Password"));
124 // popupMenu1->AppendSeparator();
125 //---------------------------------------------------------------------------------------
128 //---------------------------------------------------------------------------------------
131 //----------------------------------------------------------------------------------------
132 void PgmCtrl::OnSelChanged(wxTreeEvent
& WXUNUSED(event
))
135 Temp0
.Empty(); Temp1
.Empty();
136 pDoc
->p_MainFrame
->SetStatusText(Temp0
,0);
137 // Get the Information that we need
138 wxTreeItemId itemId
= GetSelection();
139 TreeData
*item
= (TreeData
*)GetItemData(itemId
);
143 Temp1
.Printf("%s",item
->m_desc
.c_str());
144 //--------------------------------------------------------------------------------------
145 if (Temp1
== "Language English")
148 p_ProgramCfg
->Write("/Local/langid",Temp0
);
149 Temp0
= _("-I-> After a programm restart, the language will be changed to English.");
152 if (Temp1
== "Language German")
155 p_ProgramCfg
->Write("/Local/langid",Temp0
);
156 Temp0
= _("-I-> After a programm restart, the language will be changed to German.");
159 //--------------------------------------------------------------------------------------
160 if (Temp1
== "wxConfigBase Delete")
162 if (p_ProgramCfg
->DeleteAll()) // Default Diretory for wxFileSelector
163 Temp0
= _("-I-> wxConfigBase.p_ProgramCfg->DeleteAll() was succesfull.");
165 Temp0
= _("-E-> wxConfigBase.p_ProgramCfg->DeleteAll() was not succesfull !");
166 wxBell(); // Ding_a_Ling
169 //--------------------------------------------------------------------------------------
170 if (Temp1
.Contains("ODBC-"))
172 Temp1
= Temp1
.Mid(5,wxSTRING_MAXLEN
);
173 for (i
=0;i
<pDoc
->i_DSN
;i
++)
175 if (Temp1
== (pDoc
->p_DSN
+i
)->Dsn
)
177 pDoc
->OnChosenDSN(i
);
182 //--------------------------------------------------------------------------------------
185 //-------------------------------------------------------------------------------------
186 Temp0
.Printf(_("Item '%s': %sselected, %sexpanded, %sbold,"
187 "%u children (%u immediately under this item)."),
188 item
->m_desc
.c_str(),
189 bool2String(IsSelected(itemId
)),
190 bool2String(IsExpanded(itemId
)),
191 bool2String(IsBold(itemId
)),
192 GetChildrenCount(itemId
),
193 GetChildrenCount(itemId
));
194 LogBuf
.Printf("-I-> PgmCtrl::OnSelChanged - %s",Temp0
.c_str());
195 wxLogMessage( "%s", LogBuf
.c_str() );
196 //-------------------------------------------------------------------------------------
200 //----------------------------------------------------------------------------------------
201 void PgmCtrl::OnRightSelect(wxTreeEvent
& WXUNUSED(event
))
205 // Get the Information that we need
206 wxTreeItemId itemId
= GetSelection();
207 DBTreeData
*item
= (DBTreeData
*)GetItemData(itemId
);
212 Temp1
.Printf("%s",item
->m_desc
.c_str());
213 //--------------------------------------------------------------------------------------
214 if (Temp1
.Contains("ODBC-"))
216 Temp1
= Temp1
.Mid(5,wxSTRING_MAXLEN
);
217 for (i
=0;i
<pDoc
->i_DSN
;i
++)
219 if (Temp1
== (pDoc
->p_DSN
+i
)->Dsn
)
222 PopupMenu(popupMenu1
,TreePos
.x
,TreePos
.y
);
227 //--------------------------------------------------------------------------------------
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() );
243 //--------------------------------------------------------------------------------------
246 //----------------------------------------------------------------------------------------
247 void PgmCtrl::OnMouseMove(wxMouseEvent
&event
)
249 TreePos
= event
.GetPosition();
251 //----------------------------------------------------------------------------------------
252 void PgmCtrl::OnUserPassword()
254 // wxMessageBox(SaveDSN);
256 //-------------------------------------------
257 DlgUser
*p_Dlg
= new DlgUser(this, "Username and Password");
258 //-------------------------------------------
259 for (i
=0;i
<pDoc
->i_DSN
;i
++)
261 if (SaveDSN
== (pDoc
->p_DSN
+i
)->Dsn
)
263 p_Dlg
->s_DSN
= (pDoc
->p_DSN
+i
)->Dsn
;
264 p_Dlg
->s_User
= (pDoc
->p_DSN
+i
)->Usr
;
265 p_Dlg
->s_Password
= (pDoc
->p_DSN
+i
)->Pas
;
268 //--------------------
269 // 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);
270 // wxMessageBox(Temp0);
272 if (p_Dlg
->ShowModal() == wxID_OK
)
274 (pDoc
->p_DSN
+i
)->Usr
= p_Dlg
->s_User
;
275 (pDoc
->p_DSN
+i
)->Pas
= p_Dlg
->s_Password
;
276 (pDoc
->db_Br
+i
)->UserName
= (pDoc
->p_DSN
+i
)->Usr
;
277 (pDoc
->db_Br
+i
)->Password
= (pDoc
->p_DSN
+i
)->Pas
;
282 //--------------------
283 break; // We have what we want, leave
286 //-------------------------------------------
289 //----------------------------------------------------------------------------------------