我遇到一个我找不到解决方法的问题...我有一个脚本,该脚本在执行前需要一些参数数据。当我运行它时,我的代码如下所示:
Exec := FProgram.CreateNewExecution;
Exec.BeginProgram;
Exec.Info.ValueAsString['varName'] := 'varValue';
Exec.RunProgram(0);
Exec.EndProgram;
运行正常。但是,如果要调试脚本,请执行以下操作:
Exec := FProgram.CreateNewExecution;
Exec.BeginProgram;
Exec.Info.ValueAsString['varName'] := 'varValue';
Debugger.BeginDebug(Exec);
Debugger.EndDebug;
作为Debugger的TdwsDebugger类,我收到“运行时错误:脚本已在运行”。如果在调试之前不分配变量值,则一切正常。
有什么提示吗?
我设法使用TDelphiWebScript组件事件解决了它。使用OnExecutionStarted也不起作用。我修改了代码并添加了OnAfterExecutionStarted事件,然后在新事件上添加了变量,现在一切正常。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句