比如:
procedure buttonclick(sender:Tobject);
var
do:String;
Begin
do:='showmessage('你好,你是高手')';
// 怎样把'你好,你是高手'这个字符串显示出来end
procedure buttonclick(sender:Tobject);
var
do:String;
Begin
do:='showmessage('你好,你是高手')';
// 怎样把'你好,你是高手'这个字符串显示出来end
调试欢乐多
或用现成的Java虚拟机对象,不过……
????????
//添加ActiveX控件MS Script ControlScriptControl.Language:='VBScript';//也可以是JScript等ScriptControl.ExecuteStatement('MsgBox("你好,你是高手")');//执行脚本