调用javaScript脚本计算字符串表达式

uses comobj

function calculate(express: string): string;
var
 vscript: Variant;
begin
 vscript := createoleobject('scriptcontrol');
 vscript.language:='javascript';
 result := vscript.eval(express);
end;