现在用delphi做一个自定义公式，想直接用excel的公式解析，如何实现？？

Question

好像需要用excel的组件excel的公式解析还是非常好用，而且会计都很熟练，不需要再培训。
其实可以调用excel，在单元格赋值然后获取结果，但是要打开excel，速度比较慢，不是很实用。
是否有其他方法，有做过的帮忙提示一下

Answer 1

uses
  ComObj;
function TForm1.DoCaculate(exp: string): string;
var
  script: Variant;
begin
  script := CreateOleObject('ScriptControl');
  script.Language := 'JavaScript';
  Result := script.Eval(Exp);
end;procedure TForm1.btn1Click(Sender: TObject);
var
  str:string;
begin
   str:=DoCaculate('((1+2)*3)/3');
   ShowMessage(str);
end;

Answer 2

 'JavaScript'?可以复杂的条件计算吗
像excel那么强大的。