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();
71 m_script->callFunction(functionName);
73 catch(Kross::Api::Exception& e) {
74 kdDebug() << TQString( "EXCEPTION type='%1' description='%2'").arg(e.type()).arg(e.description()) << endl;
83 if(!m_form || !m_form->objectTree())
88 for(; it.current(); ++it)
89 m_script->addTQObject(it.current()->widget());
90 m_script->addTQObject(m_form->widget());
93 TQValueListConstIterator<Event*> endIt = m_list.constEnd();
94 for(TQValueListConstIterator<Event*> it = m_list.constBegin(); it != endIt; ++it) {
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"
|