Question

delphi如何将字符串转换为表达式？

请问各位高人，在delphi中怎样将字符串转化为表达式？
比如说str:='(1+2)*3/4';转化为value:=(1+2)*3/4;

Answer 1

可以调用ScriptControl，省的自己去转换
uses ComObj;

演示
Function calc(const expression : String):Integer;
Var
sc : OleVariant;
begin
//expresion := ‘100+5*3’;
sc := CreateOleObject('MSScriptControl.ScriptControl.1');
sc.Language :='JavaScript';
result := StrtoInt( sc.eval(expression) );
end;
Sample: 115 := calc(‘100+5*3’);

Answer 2

你是想得到它的值还是怎么转换？如果是得到值就简单处理value:=strtoint((1+2)*3/4);当然这是学要你的value值也是integer型如果你是其他型的你可以把它用相应的转换函数。你在Delphi的help里打strto下面就会出现很多。你可以找你需要的