var temp1,temp2:integer;
    temp3:integer;
    s:string;
begin
 s:='temp1+temp2';
 temp3:=s //how to do????????怎样能产生这样的效果???
 result:=temp3;
end;

解决方案 »

  1.   

    var temp1,temp2:integer;
        temp3:integer;
        s:string;
    begin
     temp1:=1;
     temp2:=2;
     s:='temp1+temp2';
     temp3:=s //how to do????????怎样能产生这样的效果???使temp3结果为3
     result:=temp3;
    end;
      

  2.   

    可以的话我还这么费事干吗??
    我这只是举个例子,方便说明问题。在asp里有个函数可以直接转换,delphi中没有。
      

  3.   

    temp3:=temp1+temp2 这样做当然可以了。
    但是我想楼主说的不是这个意思,不知道楼主同步同意我的观点,如果我说不对的地方请指出。
    比如说
      s:String;s:='function sum(a1,a2:integer):integer;' //或者其他的合法的程序语句然后执行 s 字符串内容所些的这些语句。而且s字符串的内容不知固定的。我理解可能使这个意思,但是我不知道怎么实现。
      

  4.   

    对,就这意思。
    例如工资管理中界面上为:工资=基本工资+岗位津贴
    程序中为:temp3:=temp1+temp2不要跟我说用sql语句,我在这只是打个比方~~~~~~~
      

  5.   

    请说详细点,我很有兴趣.I'M WAITIING……
      

  6.   

    var temp1,temp2:integer;
        temp3:integer;
        s:string;
    begin
     temp1:=1;
     temp2:=2;
     s:=inttostr(temp1)+'''+'''+inttostr(temp2);
     temp3:=temp1+temp2
     result:=temp3;
    end;//这样可以吗?
      

  7.   

    var temp1,temp2:integer;
        temp3:integer;
        s:string;
    begin
     temp1:=1;
     temp2:=2;
     s:=inttostr(temp1)+''''+''''+inttostr(temp2);
     temp3:=temp1+temp2
     result:=temp3;
    end;