[wxWidgets.git] / demos / dbbrowse / pgmctrl.cpp

//----------------------------------------------------------------------------------------
// Name:        pgmctrl.cpp
// Purpose:     Programm Control with a Tree
// Author:      Mark Johnson
// Modified by: 19990806.mj10777
// Created:     19991010
// RCS-ID:      $Id$
// Copyright:   (c) Mark Johnson, Berlin Germany
// Licence:     wxWindows license
//----------------------------------------------------------------------------------------
//-- all #ifdefs that the whole Project needs. -------------------------------------------
//----------------------------------------------------------------------------------------
#ifdef __GNUG__
#pragma implementation
#pragma interface
#endif
//----------------------------------------------------------------------------------------
// For compilers that support precompilation, includes "wx/wx.h".
#include "wx/wxprec.h"
//----------------------------------------------------------------------------------------
#ifdef __BORLANDC__
#pragma hdrstop
#endif
//----------------------------------------------------------------------------------------
#ifndef WX_PRECOMP
#include "wx/wx.h"
#endif
//----------------------------------------------------------------------------------------
#ifndef __WXMSW__
#include "bitmaps/d_closed.xpm"
#include "bitmaps/d_open.xpm"
#include "bitmaps/f_closed.xpm"
#include "bitmaps/f_open.xpm"
#include "bitmaps/logo.xpm"
#include "bitmaps/dsnclose.xpm"
#include "bitmaps/dsnopen.xpm"
#endif
//----------------------------------------------------------------------------------------
//-- all #includes that every .cpp needs             --- 19990807.mj10777 ----------------
//----------------------------------------------------------------------------------------
#include "std.h"    // sorgsam Pflegen !

//----------------------------------------------------------------------------------------
//-- Global functions --------------------------------------------------------------------
//----------------------------------------------------------------------------------------
static inline const wxChar *bool2String(bool b)
{
    return b ? _T("") : _T("not ");
}

//----------------------------------------------------------------------------------------
BEGIN_EVENT_TABLE(PgmCtrl, wxTreeCtrl)
    EVT_MOTION (PgmCtrl::OnMouseMove)
    EVT_LEFT_DCLICK(PgmCtrl::OnSelChanged)
    EVT_TREE_ITEM_RIGHT_CLICK(TREE_CTRL_PGM,PgmCtrl::OnRightSelect)
    EVT_MENU(PGMCTRL_ODBC_USER,PgmCtrl::OnUserPassword)
END_EVENT_TABLE()

//----------------------------------------------------------------------------------------
// PgmCtrl implementation
//----------------------------------------------------------------------------------------
IMPLEMENT_DYNAMIC_CLASS(PgmCtrl, wxTreeCtrl)

//----------------------------------------------------------------------------------------
PgmCtrl::PgmCtrl(wxWindow *parent) : wxTreeCtrl(parent)
{
}

//----------------------------------------------------------------------------------------
PgmCtrl::PgmCtrl(wxWindow *parent, const wxWindowID id,const wxPoint& pos, const wxSize& size, long style)
: wxTreeCtrl(parent, id, pos, size, style)
{
    const int image_size = 16;
    // Make an image list containing small icons
    p_imageListNormal = new wxImageList(image_size, image_size, true);
    // should correspond to TreeIc_xxx enum
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(aLogo)).ConvertToImage().Rescale(image_size, image_size)));
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DsnClosed)).ConvertToImage().Rescale(image_size, image_size)));
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DsnOpen)).ConvertToImage().Rescale(image_size, image_size)));
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DocClosed)).ConvertToImage().Rescale(image_size, image_size)));
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(DocOpen)).ConvertToImage().Rescale(image_size, image_size)));
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(FolderClosed)).ConvertToImage().Rescale(image_size, image_size)));
    p_imageListNormal->Add(wxBitmap(wxBitmap(wxICON(FolderOpen)).ConvertToImage().Rescale(image_size, image_size)));
    SetImageList(p_imageListNormal);
}

//----------------------------------------------------------------------------------------
PgmCtrl::~PgmCtrl()
{
    delete p_imageListNormal;
    delete popupMenu1;  
}

//----------------------------------------------------------------------------------------
#undef TREE_EVENT_HANDLER

//----------------------------------------------------------------------------------------
int  PgmCtrl::OnPopulate()
{
    SetFont(* pDoc->ft_Doc);
    wxTreeItemId Root, Folder, Docu;
    //---------------------------------------------------------------------------------------
    int i;
    double dTmp = 1234567.89;
    Temp0.Printf(_("%s Functions"),p_ProgramCfg->GetAppName().c_str());
    Root   = AddRoot(Temp0,TreeIc_Logo,TreeIc_Logo, new TreeData(_T("Root")));
    //---------------------------------------------------------------------------------------
    Folder = AppendItem(Root, _("Program settings")   ,TreeIc_FolderClosed, TreeIc_FolderOpen, new TreeData(_T("Settings")));
    p_ProgramCfg->Read(_T("/Local/langid"),&Temp0); p_ProgramCfg->Read(_T("/Local/language"),&Temp2);
    Temp1.Printf(_("locale (%s) ; Language (%s) ; Number(%2.2f)"),Temp0.c_str(), Temp2.c_str(), dTmp); Temp0.Empty();  Temp2.Empty();
    Docu   = AppendItem(Folder, Temp1,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Setting Language")));
    p_ProgramCfg->Read(_T("/Paths/Work"),&Temp0); Temp1.Printf(_("Work Path : %s"),Temp0.c_str()); Temp0.Empty();
    Docu   = AppendItem(Folder,Temp1,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Path Work")));
    Docu   = AppendItem(Folder, _("Change the language to English") ,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Language English")));
    Docu   = AppendItem(Folder, _("Change the language to German")  ,TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("Language German")));
    Docu   = AppendItem(Folder, _("Delete all wxConfigBase Entry's"),TreeIc_DocClosed,TreeIc_DocOpen,new TreeData(_T("wxConfigBase Delete")));
    Folder = AppendItem(Root, _T("ODBC DSN"),TreeIc_FolderClosed,TreeIc_FolderOpen,new TreeData(_T("ODBC-DSN")));
    for (i=0;i<pDoc->i_DSN;i++)
    {
        Temp0.Printf(_T("ODBC-%s"),(pDoc->p_DSN+i)->Dsn.c_str());
        Docu   = AppendItem(Folder,(pDoc->p_DSN+i)->Dsn ,TreeIc_DsnClosed,TreeIc_DsnOpen, new TreeData(Temp0));
    }
    //---------------------------------------------------------------------------------------
    popupMenu1 = NULL;
    popupMenu1 = new wxMenu(_T(""));
    popupMenu1->Append(PGMCTRL_ODBC_USER, _("Set Username and Password"));
    // popupMenu1->AppendSeparator();
    //---------------------------------------------------------------------------------------
    Expand(Root);
    Expand(Folder);
    //---------------------------------------------------------------------------------------
    return 0;
}

//----------------------------------------------------------------------------------------
void PgmCtrl::OnSelChanged(wxMouseEvent& WXUNUSED(event))
{
    int i;
    Temp0.Empty();   Temp1.Empty();
#if wxUSE_STATUSBAR
    pDoc->p_MainFrame->SetStatusText(Temp0,0);
#endif // wxUSE_STATUSBAR
    // Get the Information that we need
    wxTreeItemId itemId = GetSelection();
    TreeData *item = (TreeData *)GetItemData(itemId);
    if (item != NULL )
    {
        int Treffer = 0;
        Temp1.Printf(_T("%s"),item->m_desc.c_str());
        //--------------------------------------------------------------------------------------
        if (Temp1 == _T("Language English"))
        {
            Temp0 = _T("std");
            p_ProgramCfg->Write(_T("/Local/langid"),Temp0);
            Temp0 = _("-I-> After a programm restart, the language will be changed to English.");
            wxMessageBox(Temp0);
        }
        if (Temp1 == _T("Language German"))
        {
            Temp0 = _T("de");
            p_ProgramCfg->Write(_T("/Local/langid"),Temp0);
            Temp0 = _("-I-> After a programm restart, the language will be changed to German.");
            wxMessageBox(Temp0);
        }
        //--------------------------------------------------------------------------------------
        if (Temp1 == _T("wxConfigBase Delete"))
        {
            if (p_ProgramCfg->DeleteAll()) // Default Diretory for wxFileSelector
                Temp0 = _("-I-> wxConfigBase.p_ProgramCfg->DeleteAll() was succesfull.");
            else
                Temp0 = _("-E-> wxConfigBase.p_ProgramCfg->DeleteAll() was not succesfull !");
            wxBell();     // Ding_a_Ling
            Treffer++;
        }
        //--------------------------------------------------------------------------------------
        if (Temp1.Contains(_T("ODBC-")))
        {
            Temp1 = Temp1.Mid(5,wxSTRING_MAXLEN);
            for (i=0;i<pDoc->i_DSN;i++)
            {
                if (Temp1 == (pDoc->p_DSN+i)->Dsn)
                {
                    pDoc->OnChosenDSN(i);
                }
            }
            Treffer++;
        }
        //--------------------------------------------------------------------------------------
        if (Treffer == 0)
        {
            //-------------------------------------------------------------------------------------
            Temp0.Printf(_("Item '%s': %sselected, %sexpanded, %sbold, %u children (%u immediately under this item)."),
                item->m_desc.c_str(),
                bool2String(IsSelected(itemId)),
                bool2String(IsExpanded(itemId)),
                bool2String(IsBold(itemId)),
                GetChildrenCount(itemId),
                GetChildrenCount(itemId));
            LogBuf.Printf(_T("-I-> PgmCtrl::OnSelChanged - %s"),Temp0.c_str());
            wxLogMessage( _T("%s"), LogBuf.c_str() );
            //-------------------------------------------------------------------------------------
        }
    }
}

//----------------------------------------------------------------------------------------
void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))
{
    int i;
    Temp0.Empty();
    // Get the Information that we need
    wxTreeItemId itemId = GetSelection();
    DBTreeData *item = (DBTreeData *)GetItemData(itemId);
    SaveDSN.Empty();
    if ( item != NULL )
    {
        int Treffer = 0;
        Temp1.Printf(_T("%s"),item->m_desc.c_str());
        //--------------------------------------------------------------------------------------
        if (Temp1.Contains(_T("ODBC-")))
        {
            Temp1 = Temp1.Mid(5,wxSTRING_MAXLEN);
            for (i=0;i<pDoc->i_DSN;i++)
            {
                if (Temp1 == (pDoc->p_DSN+i)->Dsn)
                {
                    SaveDSN = Temp1;
                    PopupMenu(popupMenu1,TreePos.x,TreePos.y);
                }
            }
            Treffer++;
        }
        //--------------------------------------------------------------------------------------
        if (Treffer == 0)
        {
        /*
        Temp0.Printf(_("Item '%s': %sselected, %sexpanded, %sbold,"
        "%u children (%u immediately under this item)."),
        item->m_desc.c_str(),
        bool2String(IsSelected(itemId)),
        bool2String(IsExpanded(itemId)),
        bool2String(IsBold(itemId)),
        GetChildrenCount(itemId),
        GetChildrenCount(itemId));
        LogBuf.Printf("-I-> DBTree::OnSelChanged - %s",Temp0.c_str());
        wxLogMessage( "%s", LogBuf.c_str() );
            */
        }
        //--------------------------------------------------------------------------------------
    }
} // void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))

//----------------------------------------------------------------------------------------
void PgmCtrl::OnMouseMove(wxMouseEvent &event)
{
    TreePos = event.GetPosition();
}

//----------------------------------------------------------------------------------------
void PgmCtrl::OnUserPassword(wxCommandEvent& WXUNUSED(event))
{
    // wxMessageBox(SaveDSN);
    int i;
    //--------------------------------------------
    DlgUser *p_Dlg = new DlgUser(this,pDoc,_T(""));
    //-------------------------------------------
    for (i=0;i<pDoc->i_DSN;i++)
    {
        wxYield();
        if (SaveDSN == (pDoc->p_DSN+i)->Dsn)
        {
            p_Dlg->pDoc       = pDoc;
            p_Dlg->s_DSN      = (pDoc->p_DSN+i)->Dsn;
            p_Dlg->s_User     = (pDoc->p_DSN+i)->Usr;
            p_Dlg->s_Password = (pDoc->p_DSN+i)->Pas;
            p_Dlg->OnInit();
            p_Dlg->Fit();
            //--------------------
            // 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);
            // wxMessageBox(Temp0);
            bool OK = false;
            if (p_Dlg->ShowModal() == wxID_OK)
            {
                (pDoc->p_DSN+i)->Usr = p_Dlg->s_User;
                (pDoc->p_DSN+i)->Pas = p_Dlg->s_Password;
                (pDoc->db_Br+i)->UserName  = (pDoc->p_DSN+i)->Usr;
                (pDoc->db_Br+i)->Password  = (pDoc->p_DSN+i)->Pas;
                OK = true;
            }
            delete p_Dlg;
            if (!OK)
                return;
            //--------------------
            break; // We have what we want, leave
        }
    }
    //-------------------------------------------
    SaveDSN.Empty();
}
//----------------------------------------------------------------------------------------
Commit	Line	Data
c92b0f9a	1	//----------------------------------------------------------------------------------------
645889ad	2	// Name: pgmctrl.cpp
b5ffecfc GT	3	// Purpose: Programm Control with a Tree
	4	// Author: Mark Johnson
	5	// Modified by: 19990806.mj10777
	6	// Created: 19991010
c09d434d	7	// RCS-ID: $Id$
829c421b	8	// Copyright: (c) Mark Johnson, Berlin Germany
b5ffecfc	9	// Licence: wxWindows license
c92b0f9a MJ	10	//----------------------------------------------------------------------------------------
	11	//-- all #ifdefs that the whole Project needs. -------------------------------------------
	12	//----------------------------------------------------------------------------------------
b5ffecfc	13	#ifdef __GNUG__
b5ce269b BJ	14	#pragma implementation
b5ce269b BJ	15	#pragma interface
b5ffecfc	16	#endif
c92b0f9a	17	//----------------------------------------------------------------------------------------
b5ffecfc GT	18	// For compilers that support precompilation, includes "wx/wx.h".
b5ffecfc GT	19	#include "wx/wxprec.h"
c92b0f9a	20	//----------------------------------------------------------------------------------------
b5ffecfc	21	#ifdef __BORLANDC__
b5ce269b	22	#pragma hdrstop
b5ffecfc	23	#endif
c92b0f9a	24	//----------------------------------------------------------------------------------------
b5ffecfc	25	#ifndef WX_PRECOMP
b5ce269b	26	#include "wx/wx.h"
b5ffecfc	27	#endif
c92b0f9a	28	//----------------------------------------------------------------------------------------
b5ffecfc	29	#ifndef __WXMSW__
b5ce269b BJ	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"
b5ffecfc	37	#endif
c92b0f9a MJ	38	//----------------------------------------------------------------------------------------
	39	//-- all #includes that every .cpp needs --- 19990807.mj10777 ----------------
	40	//----------------------------------------------------------------------------------------
b5ffecfc	41	#include "std.h" // sorgsam Pflegen !
645889ad	42
c92b0f9a MJ	43	//----------------------------------------------------------------------------------------
	44	//-- Global functions --------------------------------------------------------------------
	45	//----------------------------------------------------------------------------------------
daf06bb8	46	static inline const wxChar *bool2String(bool b)
b5ffecfc	47	{
daf06bb8	48	return b ? _T("") : _T("not ");
b5ffecfc	49	}
645889ad	50
c92b0f9a	51	//----------------------------------------------------------------------------------------
b5ffecfc	52	BEGIN_EVENT_TABLE(PgmCtrl, wxTreeCtrl)
645889ad GT	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)
c92b0f9a	57	END_EVENT_TABLE()
645889ad	58
c92b0f9a MJ	59	//----------------------------------------------------------------------------------------
	60	// PgmCtrl implementation
	61	//----------------------------------------------------------------------------------------
	62	IMPLEMENT_DYNAMIC_CLASS(PgmCtrl, wxTreeCtrl)
645889ad	63
c92b0f9a MJ	64	//----------------------------------------------------------------------------------------
c92b0f9a MJ	65	PgmCtrl::PgmCtrl(wxWindow *parent) : wxTreeCtrl(parent)
b5ffecfc GT	66	{
b5ffecfc GT	67	}
645889ad	68
c92b0f9a	69	//----------------------------------------------------------------------------------------
b5ffecfc	70	PgmCtrl::PgmCtrl(wxWindow *parent, const wxWindowID id,const wxPoint& pos, const wxSize& size, long style)
645889ad	71	: wxTreeCtrl(parent, id, pos, size, style)
b5ffecfc	72	{
daf06bb8	73	const int image_size = 16;
645889ad	74	// Make an image list containing small icons
5151c7af	75	p_imageListNormal = new wxImageList(image_size, image_size, true);
645889ad	76	// should correspond to TreeIc_xxx enum
daf06bb8 JS	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)));
645889ad	84	SetImageList(p_imageListNormal);
b5ffecfc	85	}
645889ad	86
c92b0f9a	87	//----------------------------------------------------------------------------------------
b5ffecfc GT	88	PgmCtrl::~PgmCtrl()
b5ffecfc GT	89	{
645889ad GT	90	delete p_imageListNormal;
645889ad GT	91	delete popupMenu1;
b5ffecfc	92	}
645889ad	93
c92b0f9a	94	//----------------------------------------------------------------------------------------
b5ffecfc	95	#undef TREE_EVENT_HANDLER
645889ad	96
c92b0f9a	97	//----------------------------------------------------------------------------------------
b5ffecfc GT	98	int PgmCtrl::OnPopulate()
b5ffecfc GT	99	{
645889ad GT	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());
daf06bb8	106	Root = AddRoot(Temp0,TreeIc_Logo,TreeIc_Logo, new TreeData(_T("Root")));
645889ad	107	//---------------------------------------------------------------------------------------
daf06bb8 JS	108	Folder = AppendItem(Root, _("Program settings") ,TreeIc_FolderClosed, TreeIc_FolderOpen, new TreeData(_T("Settings")));
daf06bb8 JS	109	p_ProgramCfg->Read(_T("/Local/langid"),&Temp0); p_ProgramCfg->Read(_T("/Local/language"),&Temp2);
645889ad	110	Temp1.Printf(_("locale (%s) ; Language (%s) ; Number(%2.2f)"),Temp0.c_str(), Temp2.c_str(), dTmp); Temp0.Empty(); Temp2.Empty();
daf06bb8 JS	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")));
645889ad GT	118	for (i=0;i<pDoc->i_DSN;i++)
645889ad GT	119	{
daf06bb8	120	Temp0.Printf(_T("ODBC-%s"),(pDoc->p_DSN+i)->Dsn.c_str());
645889ad GT	121	Docu = AppendItem(Folder,(pDoc->p_DSN+i)->Dsn ,TreeIc_DsnClosed,TreeIc_DsnOpen, new TreeData(Temp0));
	122	}
	123	//---------------------------------------------------------------------------------------
	124	popupMenu1 = NULL;
daf06bb8	125	popupMenu1 = new wxMenu(_T(""));
645889ad GT	126	popupMenu1->Append(PGMCTRL_ODBC_USER, _("Set Username and Password"));
	127	// popupMenu1->AppendSeparator();
	128	//---------------------------------------------------------------------------------------
	129	Expand(Root);
	130	Expand(Folder);
	131	//---------------------------------------------------------------------------------------
	132	return 0;
b5ffecfc	133	}
645889ad	134
c92b0f9a	135	//----------------------------------------------------------------------------------------
669f7a11	136	void PgmCtrl::OnSelChanged(wxMouseEvent& WXUNUSED(event))
b5ffecfc	137	{
645889ad GT	138	int i;
645889ad GT	139	Temp0.Empty(); Temp1.Empty();
67a99992	140	#if wxUSE_STATUSBAR
645889ad	141	pDoc->p_MainFrame->SetStatusText(Temp0,0);
67a99992	142	#endif // wxUSE_STATUSBAR
645889ad GT	143	// Get the Information that we need
	144	wxTreeItemId itemId = GetSelection();
	145	TreeData item = (TreeData )GetItemData(itemId);
	146	if (item != NULL )
b5ffecfc	147	{
645889ad	148	int Treffer = 0;
daf06bb8	149	Temp1.Printf(_T("%s"),item->m_desc.c_str());
645889ad	150	//--------------------------------------------------------------------------------------
daf06bb8	151	if (Temp1 == _T("Language English"))
645889ad	152	{
daf06bb8 JS	153	Temp0 = _T("std");
daf06bb8 JS	154	p_ProgramCfg->Write(_T("/Local/langid"),Temp0);
645889ad GT	155	Temp0 = _("-I-> After a programm restart, the language will be changed to English.");
	156	wxMessageBox(Temp0);
	157	}
daf06bb8	158	if (Temp1 == _T("Language German"))
645889ad	159	{
daf06bb8 JS	160	Temp0 = _T("de");
daf06bb8 JS	161	p_ProgramCfg->Write(_T("/Local/langid"),Temp0);
645889ad GT	162	Temp0 = _("-I-> After a programm restart, the language will be changed to German.");
	163	wxMessageBox(Temp0);
	164	}
	165	//--------------------------------------------------------------------------------------
daf06bb8	166	if (Temp1 == _T("wxConfigBase Delete"))
645889ad GT	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	//--------------------------------------------------------------------------------------
daf06bb8	176	if (Temp1.Contains(_T("ODBC-")))
645889ad GT	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	//-------------------------------------------------------------------------------------
daf06bb8	192	Temp0.Printf(_("Item '%s': %sselected, %sexpanded, %sbold, %u children (%u immediately under this item)."),
645889ad GT	193	item->m_desc.c_str(),
	194	bool2String(IsSelected(itemId)),
	195	bool2String(IsExpanded(itemId)),
	196	bool2String(IsBold(itemId)),
	197	GetChildrenCount(itemId),
	198	GetChildrenCount(itemId));
daf06bb8 JS	199	LogBuf.Printf(_T("-I-> PgmCtrl::OnSelChanged - %s"),Temp0.c_str());
daf06bb8 JS	200	wxLogMessage( _T("%s"), LogBuf.c_str() );
645889ad GT	201	//-------------------------------------------------------------------------------------
645889ad GT	202	}
b5ce269b	203	}
b5ffecfc	204	}
645889ad	205
c92b0f9a	206	//----------------------------------------------------------------------------------------
b5ffecfc GT	207	void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))
b5ffecfc GT	208	{
645889ad GT	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 )
b5ffecfc	216	{
645889ad	217	int Treffer = 0;
daf06bb8	218	Temp1.Printf(_T("%s"),item->m_desc.c_str());
645889ad	219	//--------------------------------------------------------------------------------------
daf06bb8	220	if (Temp1.Contains(_T("ODBC-")))
645889ad GT	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	//--------------------------------------------------------------------------------------
c92b0f9a	250	}
ca7408bd	251	} // void PgmCtrl::OnRightSelect(wxTreeEvent& WXUNUSED(event))
645889ad	252
c92b0f9a	253	//----------------------------------------------------------------------------------------
b5ffecfc GT	254	void PgmCtrl::OnMouseMove(wxMouseEvent &event)
b5ffecfc GT	255	{
645889ad	256	TreePos = event.GetPosition();
b5ffecfc	257	}
645889ad	258
c92b0f9a	259	//----------------------------------------------------------------------------------------
669f7a11	260	void PgmCtrl::OnUserPassword(wxCommandEvent& WXUNUSED(event))
b5ffecfc	261	{
645889ad GT	262	// wxMessageBox(SaveDSN);
	263	int i;
	264	//--------------------------------------------
daf06bb8	265	DlgUser *p_Dlg = new DlgUser(this,pDoc,_T(""));
645889ad GT	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);
5151c7af	281	bool OK = false;
645889ad GT	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;
5151c7af	288	OK = true;
645889ad GT	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();
b5ffecfc	299	}
c92b0f9a	300	//----------------------------------------------------------------------------------------