如何执行字符串里的代码??(100分)

  • 主题发起人 主题发起人 wds1860
  • 开始时间 开始时间
W

wds1860

Unregistered / Unconfirmed
GUEST, unregistred user!
一个字符串里有标准的PASCAL 语句,

我怎么样才能在DELPHI里执行这条语句呢?

如:
S:=’FORM1.CLOSE’;

怎么样才能在程序中执行这个S 里的语句呢
 
好像没多大得意义
 
你意思就象vf中的&s是吧,我也起知道!
 
好象很难啊,可能是我没有想到,:)
不过有这个必要吗?
 
我最多能做到这样
File.txt
Form1.Close;

unit Unit1;

procedure TFrom1.Button1Click(Sender: TObject);
begin
{$I File.txt}
end;

不过这还是在编译前的事,编译后再修改File.txt就无效了。
 
找一个Script引擎,如DWS(DelphiWebScript Components)
可以到www.torry.net搜索Script!
 
Delphi好象不支持这种功能吧.
 
比如调用edit1.text可以用
Tedit(sender).text
 
use TPasScript 6.5
 
好象是解释语言才支持这种东西吧。Delphi是一个编译语言。
 
DELPHI应该不行
 
我觉得LOP说得对,我也是这样的想法
对于下面的方法我觉得意义不大,因为程序连接后FILE.TEXT更改对于程序是没有任何意义的
也就是说FILE.TXT和 *.PAS是一样的,只能在编译时有效
我最多能做到这样
File.txt
Form1.Close;

unit Unit1;

procedure TFrom1.Button1Click(Sender: TObject);
begin
{$I File.txt}
end;

不过这还是在编译前的事,编译后再修改File.txt就无效了。
 
可以试试用FindComponent('Edit1')找到控件,然后强制类型转换来实现。
如: TEdit(FindComponent('Edit1')).Text
 
好像現在還一行吧,不過我沒有試過.
 
使用Innerfuse Pascal Script 2 &amp
3就可以啊,把你的油箱告诉我,我发给你好了。
 
这个功能很有用,主要方便用于程序的修改,如能实现的话,就可以不用重新编译了。
我来听课,我想了很久、很久。。。。
 
DelphiWebScript II 2.0
http://www.dwscript.com
 
请问DelphiWebScript II 2.0中有实例吗?请指教,就是foxpro中的&s的功能。
 
有一套 VCL 控件 Scripter Studio 可以做到在运行期执行自定义的代码。我看过演示。它支持 Pascal 和 VB Script 的语法。
 
还有可以问郭玉良, 她实现了这个功能。
 
后退
顶部