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.
91 lines
2.0 KiB
91 lines
2.0 KiB
|
|
#include <kparts/event.h>
|
|
|
|
#include "parts.h"
|
|
|
|
#include <tqcheckbox.h>
|
|
#include <tqfile.h>
|
|
#include <tqdir.h>
|
|
#include <tqtextstream.h>
|
|
#include <tqmultilineedit.h>
|
|
#include <tqlineedit.h>
|
|
#include <tqvbox.h>
|
|
|
|
#include <kiconloader.h>
|
|
#include <kapplication.h>
|
|
#include <kdebug.h>
|
|
#include <kmessagebox.h>
|
|
#include <kaction.h>
|
|
#include <klocale.h>
|
|
|
|
Part1::Part1( TQObject *parent, TQWidget * parentWidget )
|
|
: KParts::ReadOnlyPart( parent, "Part1" )
|
|
{
|
|
m_instance = new KInstance( "kpartstestpart" );
|
|
setInstance( m_instance );
|
|
m_edit = new TQMultiLineEdit( parentWidget );
|
|
setWidget( m_edit );
|
|
setXMLFile( "kpartstest_part1.rc" );
|
|
|
|
/*KAction * paBlah = */ new KAction( "Blah", "filemail", 0, actionCollection(), "p1_blah" );
|
|
}
|
|
|
|
Part1::~Part1()
|
|
{
|
|
delete m_instance;
|
|
}
|
|
|
|
bool Part1::openFile()
|
|
{
|
|
kdDebug() << "Part1: opening " << TQFile::encodeName(m_file) << endl;
|
|
// Hehe this is from a tutorial I did some time ago :)
|
|
TQFile f(m_file);
|
|
TQString s;
|
|
if ( f.open(IO_ReadOnly) ) {
|
|
TQTextStream t( &f );
|
|
while ( !t.eof() ) {
|
|
s += t.readLine() + "\n";
|
|
}
|
|
f.close();
|
|
} else
|
|
return false;
|
|
m_edit->setText(s);
|
|
|
|
emit setStatusBarText( m_url.prettyURL() );
|
|
|
|
return true;
|
|
}
|
|
|
|
Part2::Part2( TQObject *parent, TQWidget * parentWidget )
|
|
: KParts::Part( parent, "Part2" )
|
|
{
|
|
m_instance = new KInstance( "part2" );
|
|
setInstance( m_instance );
|
|
TQWidget * w = new TQWidget( parentWidget, "Part2Widget" );
|
|
setWidget( w );
|
|
|
|
TQCheckBox * cb = new TQCheckBox( "something", w );
|
|
|
|
TQLineEdit * l = new TQLineEdit( "something", widget() );
|
|
l->move(0,50);
|
|
// Since the main widget is a dummy one, we HAVE to set
|
|
// strong focus for it, otherwise we get the
|
|
// the famous activating-file-menu-switches-part bug.
|
|
w->setFocusPolicy( TQWidget::ClickFocus );
|
|
|
|
// setXMLFile( ... ); // no actions currently
|
|
}
|
|
|
|
Part2::~Part2()
|
|
{
|
|
delete m_instance;
|
|
}
|
|
|
|
void Part2::guiActivateEvent( KParts::GUIActivateEvent * event )
|
|
{
|
|
if (event->activated())
|
|
emit setWindowCaption("[part2 activated]");
|
|
}
|
|
|
|
#include "parts.moc"
|