(高手请进)关于在程序运行期间把一个字符串转换成代码来执行

Question

比如:
procedure buttonclick(sender:Tobject);
var
   do:String;
Begin
   do:='showmessage('你好，你是高手')';
   // 怎样把'你好，你是高手'这个字符串显示出来end

Answer 1

if do='showmessage(''你好，你是高手'')' then
 showmessage('你好，你是高手');

Answer 2

呵呵呵!XX年前有一个叫TScript的控件,可以实现你的要求.
你的问题不是一个运行字符串的问题,而是一个在程序里如何自定义宏的问题.这可是高难度的哦!

Answer 3

我的思路是这样的:
首先,程序编译成目标代码后,就肯定不会再进行编译.
那么,你这个程序中的
do:='showmessage('你好，你是高手')';
就永远是个字符串.
所以,必须把
showmessage('你好，你是高手')
字符串事先编译成目标代码才有可以被调用.
楼上的几位说的宏如何使用,以及宏的编译方法我不太清楚,
很抱歉不能帮你,我只是发表一个自己的看法.

Answer 4

Component->Import ActiveX Control->Microsoft Script Control
//添加ActiveX控件MS Script ControlScriptControl.Language:='VBScript';//也可以是JScript等ScriptControl.ExecuteStatement('MsgBox("你好，你是高手")');//执行脚本

Answer 5

呵呵，不会，关注，严重关注！！！！Delphi自己没有这样的转换吗，非要用外来的东西了？？？？