1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
/* This file is part of the KDE project
Copyright (C) 2001 Joseph Wenninger <jowenn@kde.org>
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public License
along with this library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301, USA.
*/
#include "KWQtSqlMailMergeOpen.h"
#include "KWQtSqlMailMergeOpen.moc"
#include <kcombobox.h>
#include <klineedit.h>
#include <kdebug.h>
#include <tqlayout.h>
#include <tdeconfig.h>
#include <kpushbutton.h>
#include <klineeditdlg.h>
#include <kiconloader.h>
#include <tqsqldatabase.h>
#include <tqguardedptr.h>
#include <klocale.h>
/******************************************************************
*
* Class: KWQtSqlMailMergeOpen
*
******************************************************************/
KWQtSqlMailMergeOpen::KWQtSqlMailMergeOpen( TQWidget *parent, KWQtSqlSerialDataSourceBase *db_ )
:KDialogBase( Plain, i18n( "Mail Merge - Setup Database Connection" ), Ok | Cancel, Ok, parent, "", true ), db( db_ ){
(new TQVBoxLayout(plainPage()))->setAutoAdd(true);
setMainWidget(widget=new KWQtSqlOpenWidget(plainPage()));
widget->drivers->insertStringList(TQSqlDatabase::drivers());
widget->hostname->setText(db->hostname);
widget->username->setText(db->username);
widget->port->setText(db->port);
widget->databasename->setText(db->databasename);
fillSavedProperties();
connect(this,TQT_SIGNAL(okClicked()),this,TQT_SLOT(handleOk()));
connect(widget->savedProperties,TQT_SIGNAL(activated(const TQString&)),
this, TQT_SLOT(savedPropertiesChanged(const TQString&)));
connect(widget->rememberButton,TQT_SIGNAL(clicked()),
this, TQT_SLOT(slotSave()));
}
KWQtSqlMailMergeOpen::~KWQtSqlMailMergeOpen(){;}
void KWQtSqlMailMergeOpen::savedPropertiesChanged(const TQString& name)
{
if (name!=i18n("<not saved>"))
{
TDEConfig conf("kwmailmergerc");
conf.setGroup("KWSLTQTDB:"+name);
widget->hostname->setText(conf.readEntry("hostname",""));
widget->username->setText(conf.readEntry("username",""));
widget->port->setText(conf.readEntry("port",""));
widget->databasename->setText(conf.readEntry("databasename",""));
}
else
{
widget->hostname->setText("");
widget->username->setText("");
widget->port->setText(i18n("default"));
widget->databasename->setText("");
}
}
void KWQtSqlMailMergeOpen::fillSavedProperties()
{
widget->savedProperties->clear();
widget->savedProperties->insertItem(i18n("<not saved>"));
//Read data from configuration file and add entries
TDEConfig conf("kwmailmergerc");
TQStringList list=conf.groupList();
for (TQStringList::Iterator it=list.begin();it!=list.end();++it)
{
if ((*it).startsWith("KWSLTQTDB:"))
widget->savedProperties->insertItem((*it).right((*it).length()-9));
}
}
void KWQtSqlMailMergeOpen::slotSave()
{
TQString value;
bool ok;
value=KLineEditDlg::getText(i18n("Store Settings"),i18n("Name:"),
TQString(), &ok,this);
if (!ok) kdDebug()<<"Cancel was pressed"<<endl;
if (value.isEmpty()) kdDebug()<<"Name value was empty"<<endl;
if ((ok) && (!value.isEmpty()))
{
TDEConfig conf("kwmailmergerc");
conf.setGroup("KWSLTQTDB:"+value);
conf.writeEntry("hostname",widget->hostname->text());
conf.writeEntry("username",widget->username->text());
conf.writeEntry("port",widget->port->text());
conf.writeEntry("databasename",widget->databasename->text());
conf.sync();
fillSavedProperties();
widget->savedProperties->setCurrentText(value);
}
}
void KWQtSqlMailMergeOpen::handleOk()
{
db->hostname=widget->hostname->text();
db->username=widget->username->text();
db->port=widget->port->text();
db->databasename=widget->databasename->text();
db->driver=widget->drivers->currentText();
}
|
