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
;
93 //----------------------------------------------------------------------------------------
94 #undef TREE_EVENT_HANDLER
95 //----------------------------------------------------------------------------------------
96 int PgmCtrl::OnPopulate()
98 SetFont(* pDoc
->ft_Doc
);
99 wxTreeItemId Root
, Folder
, Docu
;
100 //---------------------------------------------------------------------------------------
102 double dTmp
= 1234567.89;
103 Temp0
.Printf(_("%s Functions"),p_ProgramCfg
->GetAppName().c_str());
104 Root
= AddRoot(Temp0
,TreeIc_Logo
,TreeIc_Logo
, new TreeData("Root"));
105 //---------------------------------------------------------------------------------------
106 Folder
= AppendItem(Root
, _("Program settings") ,TreeIc_FolderClosed
, TreeIc_FolderOpen
, new TreeData("Settings"));
107 p_ProgramCfg
->Read("/Local/langid",&Temp0
); p_ProgramCfg
->Read("/Local/language",&Temp2
);
108 Temp1
.Printf(_("locale (%s) ; Language (%s) ; Number(%2.2f)"),Temp0
.c_str(), Temp2
.c_str(), dTmp
); Temp0
.Empty(); Temp2
.Empty();
109 Docu
= AppendItem(Folder
, Temp1
,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Setting Language"));
110 p_ProgramCfg
->Read("/Paths/Work",&Temp0
); Temp1
.Printf(_("Work Path : %s"),Temp0
.c_str()); Temp0
.Empty();
111 Docu
= AppendItem(Folder
,Temp1
,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Path Work"));
112 Docu
= AppendItem(Folder
, _("Change the language to English") ,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Language English"));
113 Docu
= AppendItem(Folder
, _("Change the language to German") ,TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("Language German"));
114 Docu
= AppendItem(Folder
, _("Delete all wxConfigBase Entry's"),TreeIc_DocClosed
,TreeIc_DocOpen
,new TreeData("wxConfigBase Delete"));
115 Folder
= AppendItem(Root
, "ODBC DSN",TreeIc_FolderClosed
,TreeIc_FolderOpen
,new TreeData("ODBC-DSN"));
116 for (i
=0;i
<pDoc
->i_DSN
;i
++)
118 Temp0
.Printf("ODBC-%s",(pDoc
->p_DSN
+i
)->Dsn
.c_str());
119 Docu
= AppendItem(Folder
,(pDoc
->p_DSN
+i
)->Dsn
,TreeIc_DsnClosed
,TreeIc_DsnOpen
, new TreeData(Temp0
));
121 //---------------------------------------------------------------------------------------
123 popupMenu1
= new wxMenu("");
124 popupMenu1
->Append(PGMCTRL_ODBC_USER
, _("Set Username and Password"));
125 // popupMenu1->AppendSeparator();
126 //---------------------------------------------------------------------------------------
129 //---------------------------------------------------------------------------------------
132 //----------------------------------------------------------------------------------------
133 void PgmCtrl::OnSelChanged(wxMouseEvent
& WXUNUSED(event
))
136 Temp0
.Empty(); Temp1
.Empty();
137 pDoc
->p_MainFrame
->SetStatusText(Temp0
,0);
138 // Get the Information that we need
139 wxTreeItemId itemId
= GetSelection();
140 TreeData
*item
= (TreeData
*)GetItemData(itemId
);
144 Temp1
.Printf("%s",item
->m_desc
.c_str());
145 //--------------------------------------------------------------------------------------
146 if (Temp1
== "Language English")
149 p_ProgramCfg
->Write("/Local/langid",Temp0
);
150 Temp0
= _("-I-> After a programm restart, the language will be changed to English.");
153 if (Temp1
== "Language German")
156 p_ProgramCfg
->Write("/Local/langid",Temp0
);
157 Temp0
= _("-I-> After a programm restart, the language will be changed to German.");
160 //--------------------------------------------------------------------------------------
161 if (Temp1
== "wxConfigBase Delete")
163 if (p_ProgramCfg
->DeleteAll()) // Default Diretory for wxFileSelector
164 Temp0
= _("-I-> wxConfigBase.p_ProgramCfg->DeleteAll() was succesfull.");
166 Temp0
= _("-E-> wxConfigBase.p_ProgramCfg->DeleteAll() was not succesfull !");
167 wxBell(); // Ding_a_Ling
170 //--------------------------------------------------------------------------------------
171 if (Temp1
.Contains("ODBC-"))
173 Temp1
= Temp1
.Mid(5,wxSTRING_MAXLEN
);
174 for (i
=0;i
<pDoc
->i_DSN
;i
++)
176 if (Temp1
== (pDoc
->p_DSN
+i
)->Dsn
)
178 pDoc
->OnChosenDSN(i
);
183 //--------------------------------------------------------------------------------------
186 //-------------------------------------------------------------------------------------
187 Temp0
.Printf(_("Item '%s': %sselected, %sexpanded, %sbold,"
188 "%u children (%u immediately under this item)."),
189 item
->m_desc
.c_str(),
190 bool2String(IsSelected(itemId
)),
191 bool2String(IsExpanded(itemId
)),
192 bool2String(IsBold(itemId
)),
193 GetChildrenCount(itemId
),
194 GetChildrenCount(itemId
));
195 LogBuf
.Printf("-I-> PgmCtrl::OnSelChanged - %s",Temp0
.c_str());
196 wxLogMessage( "%s", LogBuf
.c_str() );
197 //-------------------------------------------------------------------------------------
201 //----------------------------------------------------------------------------------------
202 void PgmCtrl::OnRightSelect(wxTreeEvent
& WXUNUSED(event
))
206 // Get the Information that we need
207 wxTreeItemId itemId
= GetSelection();
208 DBTreeData
*item
= (DBTreeData
*)GetItemData(itemId
);
213 Temp1
.Printf("%s",item
->m_desc
.c_str());
214 //--------------------------------------------------------------------------------------
215 if (Temp1
.Contains("ODBC-"))
217 Temp1
= Temp1
.Mid(5,wxSTRING_MAXLEN
);
218 for (i
=0;i
<pDoc
->i_DSN
;i
++)
220 if (Temp1
== (pDoc
->p_DSN
+i
)->Dsn
)
223 PopupMenu(popupMenu1
,TreePos
.x
,TreePos
.y
);
228 //--------------------------------------------------------------------------------------
232 Temp0.Printf(_("Item '%s': %sselected, %sexpanded, %sbold,"
233 "%u children (%u immediately under this item)."),
234 item->m_desc.c_str(),
235 bool2String(IsSelected(itemId)),
236 bool2String(IsExpanded(itemId)),
237 bool2String(IsBold(itemId)),
238 GetChildrenCount(itemId),
239 GetChildrenCount(itemId));
240 LogBuf.Printf("-I-> DBTree::OnSelChanged - %s",Temp0.c_str());
241 wxLogMessage( "%s", LogBuf.c_str() );
244 //--------------------------------------------------------------------------------------
246 } // void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))
247 //----------------------------------------------------------------------------------------
248 void PgmCtrl::OnMouseMove(wxMouseEvent
&event
)
250 TreePos
= event
.GetPosition();
252 //----------------------------------------------------------------------------------------
253 void PgmCtrl::OnUserPassword(wxCommandEvent
& WXUNUSED(event
))
255 // wxMessageBox(SaveDSN);
257 //--------------------------------------------
258 DlgUser
*p_Dlg
= new DlgUser(this,pDoc
,"");
259 //-------------------------------------------
260 for (i
=0;i
<pDoc
->i_DSN
;i
++)
262 if (SaveDSN
== (pDoc
->p_DSN
+i
)->Dsn
)
265 p_Dlg
->s_DSN
= (pDoc
->p_DSN
+i
)->Dsn
;
266 p_Dlg
->s_User
= (pDoc
->p_DSN
+i
)->Usr
;
267 p_Dlg
->s_Password
= (pDoc
->p_DSN
+i
)->Pas
;
270 //--------------------
271 // 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);
272 // wxMessageBox(Temp0);
274 if (p_Dlg
->ShowModal() == wxID_OK
)
276 (pDoc
->p_DSN
+i
)->Usr
= p_Dlg
->s_User
;
277 (pDoc
->p_DSN
+i
)->Pas
= p_Dlg
->s_Password
;
278 (pDoc
->db_Br
+i
)->UserName
= (pDoc
->p_DSN
+i
)->Usr
;
279 (pDoc
->db_Br
+i
)->Password
= (pDoc
->p_DSN
+i
)->Pas
;
284 //--------------------
285 break; // We have what we want, leave
288 //-------------------------------------------
291 //----------------------------------------------------------------------------------------