28#include <kurlrequester.h>
30#include <kspread_map.h>
32#include "kwmailmerge_kspread.h"
33#include "kwmailmerge_kspread_config.h"
35using namespace KSpread;
37KWMailMergeKSpreadConfig::KWMailMergeKSpreadConfig( TQWidget *parent, KWMailMergeKSpread *
object )
38 : KDialogBase( Plain, i18n(
"Mail Merge - Editor" ),
39 Ok | Cancel, Ok, parent,
"", true ),
40 _document( 0 ), _initialPage( 1 )
46 _urlRequester->setURL( _object->url().url() );
47 _initialPage = _object->spreadSheetNumber();
49 connect( _urlRequester, TQ_SIGNAL( urlSelected(
const TQString& ) ),
50 TQ_SLOT( loadDocument() ) );
53 slotTextChanged( _urlRequester->lineEdit()->text() );
57KWMailMergeKSpreadConfig::~KWMailMergeKSpreadConfig()
61void KWMailMergeKSpreadConfig::slotOk()
63 _object->setURL( _urlRequester->url() );
64 _object->setSpreadSheetNumber( _pageNumber->currentText().toInt() );
66 KDialogBase::slotOk();
69void KWMailMergeKSpreadConfig::loadDocument()
74 _pageNumber->setEnabled(
false );
76 if ( !_urlRequester->url().isEmpty() ) {
77 _document =
new Doc();
78 connect( _document, TQ_SIGNAL( completed() ), TQ_SLOT( documentLoaded() ) );
80 _document->openURL( _urlRequester->url() );
84void KWMailMergeKSpreadConfig::documentLoaded()
88 TQPtrListIterator<Sheet> it( _document->map()->sheetList() );
90 for ( it.toFirst(); it.current(); ++it ) {
91 _pageNumber->insertItem( TQString::number( counter ) );
95 _pageNumber->setEnabled(
true );
96 _pageNumber->setCurrentText( TQString::number( _initialPage ) );
99void KWMailMergeKSpreadConfig::initGUI()
101 TQFrame *page = plainPage();
103 TQGridLayout *layout =
new TQGridLayout( page, 2, 2, marginHint(), spacingHint() );
105 TQLabel *label =
new TQLabel( i18n(
"URL:" ), page );
106 layout->addWidget( label, 0, 0 );
108 _urlRequester =
new KURLRequester( page );
109 layout->addWidget( _urlRequester, 0, 1 );
111 label =
new TQLabel( i18n(
"Page number:" ), page );
112 layout->addWidget( label, 1, 0 );
114 _pageNumber =
new KComboBox( page );
115 _pageNumber->setEnabled(
false );
116 layout->addWidget( _pageNumber, 1, 1 );
117 connect( _urlRequester->lineEdit() , TQ_SIGNAL( textChanged (
const TQString & ) ),
this, TQ_SLOT( slotTextChanged(
const TQString & ) ) );
120void KWMailMergeKSpreadConfig::slotTextChanged(
const TQString & _text )
122 enableButtonOK( !_text.isEmpty() );
125#include "kwmailmerge_kspread_config.moc"