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.
145 lines
3.1 KiB
145 lines
3.1 KiB
#include "kmid_part.h"
|
|
|
|
#include <kinstance.h>
|
|
#include <kiconloader.h>
|
|
#include <klocale.h>
|
|
#include <kaboutdata.h>
|
|
#include <kaction.h>
|
|
#include <tqiconset.h>
|
|
|
|
#include <kparts/partmanager.h>
|
|
|
|
#include "kmidclient.h"
|
|
#include <tqtimer.h>
|
|
#include <tdelibs_export.h>
|
|
|
|
K_EXPORT_COMPONENT_FACTORY( libkmidpart, KMidFactory )
|
|
|
|
/**
|
|
* We need one static instance of the factory for our C 'main'
|
|
* function
|
|
*/
|
|
KInstance *KMidFactory::s_instance = 0L;
|
|
|
|
KMidFactory::KMidFactory()
|
|
{
|
|
s_instance=0L;
|
|
}
|
|
|
|
KMidFactory::~KMidFactory()
|
|
{
|
|
if (s_instance)
|
|
{
|
|
delete s_instance->aboutData();
|
|
delete s_instance;
|
|
}
|
|
|
|
s_instance = 0;
|
|
}
|
|
|
|
KParts::Part *KMidFactory::createPartObject(TQWidget *parentWidget, const char *widgetName,
|
|
TQObject *parent, const char *name, const char*,
|
|
const TQStringList& )
|
|
{
|
|
KParts::Part *obj = new KMidPart(parentWidget, widgetName, parent, name);
|
|
return obj;
|
|
}
|
|
|
|
KAboutData *KMidFactory::aboutData()
|
|
{
|
|
KAboutData *aboutdata = new KAboutData("kmid", "KMid", "2.0",
|
|
I18N_NOOP("MIDI/Karaoke file player"), KAboutData::License_GPL,
|
|
I18N_NOOP("(c) 1997,98,99,2000, Antonio Larrosa Jimenez"),"",
|
|
"http://perso.wanadoo.es/antlarr/kmid.html");
|
|
aboutdata->addAuthor("Antonio Larrosa Jimenez",
|
|
I18N_NOOP("Original Developer/Maintainer"),"larrosa@kde.org",
|
|
"http://perso.wanadoo.es/antlarr/index.html");
|
|
return aboutdata;
|
|
}
|
|
|
|
KInstance *KMidFactory::instance()
|
|
{
|
|
if ( !s_instance )
|
|
s_instance = new KInstance( aboutData() );
|
|
|
|
return s_instance;
|
|
}
|
|
|
|
KMidPart::KMidPart(TQWidget *parentWidget, const char *widgetName,
|
|
TQObject *parent, const char *name)
|
|
: KParts::ReadOnlyPart(parent, name)
|
|
{
|
|
setInstance(KMidFactory::instance());
|
|
|
|
widget = new kmidClient(parentWidget, actionCollection());
|
|
widget->show();
|
|
widget->setFocusPolicy(TQ_ClickFocus);
|
|
setWidget(widget);
|
|
|
|
// create and connect our actions
|
|
(void)new KAction(i18n("Play"), "player_play", 0, this,
|
|
TQT_SLOT(slotPlay()), actionCollection(),
|
|
"play");
|
|
|
|
(void)new KAction(i18n("Stop"), "player_stop", 0, this,
|
|
TQT_SLOT(slotStop()), actionCollection(),
|
|
"stop");
|
|
|
|
(void)new KAction(i18n("Backward"),
|
|
"2leftarrow", 0, this,
|
|
TQT_SLOT(slotBackward()), actionCollection(),
|
|
"backward");
|
|
|
|
(void)new KAction(i18n("Forward"),
|
|
"2rightarrow", 0, this,
|
|
TQT_SLOT(slotForward()), actionCollection(),
|
|
"forward");
|
|
|
|
m_extension = new KMidBrowserExtension(this);
|
|
|
|
setXMLFile("kmid_partui.rc");
|
|
|
|
|
|
}
|
|
|
|
KMidPart::~KMidPart()
|
|
{
|
|
}
|
|
|
|
bool KMidPart::openFile()
|
|
{
|
|
widget->openURL(m_file);
|
|
widget->stop();
|
|
widget->show();
|
|
TQTimer::singleShot(2000, this, TQT_SLOT(slotPlay()));
|
|
|
|
return true;
|
|
}
|
|
|
|
bool KMidPart::closeURL()
|
|
{
|
|
slotStop();
|
|
return true;
|
|
}
|
|
|
|
void KMidPart::slotPlay()
|
|
{
|
|
widget->stop();
|
|
widget->play();
|
|
}
|
|
|
|
|
|
void KMidPart::slotStop()
|
|
{
|
|
widget->stop();
|
|
}
|
|
KMidBrowserExtension::KMidBrowserExtension(KMidPart *parent)
|
|
: KParts::BrowserExtension(parent, "KMidBrowserExtension")
|
|
{
|
|
}
|
|
|
|
KMidBrowserExtension::~KMidBrowserExtension()
|
|
{
|
|
}
|
|
#include "kmid_part.moc"
|