20#include "formscript.h"
21#include "scriptmanager.h"
24#include "objecttree.h"
26#include "main/manager.h"
27#include "main/scriptcontainer.h"
28#include "api/exception.h"
34FormScript::FormScript( Form *form, ScriptManager *manager, const char *name)
35 : TQObject(manager, name), m_manager(manager), m_form(form)
37 m_script = manager->krossManager()->getScriptContainer(form-> widget()->name());
40FormScript::~FormScript()
48 return m_script->getCode();
54 m_script->setCode( code);
60 TQString s = m_script->getCode();
73 catch(Kross::Api::Exception& e) {
74 kdDebug() << TQString( "EXCEPTION type='%1' description='%2'").arg( e.type()).arg( e.description()) << endl;
88 for(; it.current(); ++ it)
89 m_script->addTQObject( it.current()->widget());
90 m_script->addTQObject(m_form-> widget());
95 if( (*it)->type() == Event::Slot) {
96 connect((*it)->sender(), (*it)->signal(), (*it)->receiver(), (*it)->slot());
98 else if( (*it)->type() == Event::UserFunction) {
99 m_script->connect((*it)->sender(), (*it)->signal(), (*it)->slot());
101 else if( (*it)->type() == Event::Action) {
108#include "formscript.moc"
|