You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
124 lines
4.3 KiB
124 lines
4.3 KiB
/* 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();
|
|
}
|