请教delphi如何调用外部的公式？

Question

比如，在ini配置文件三角形的面积公式
[sj]
mj=1/2*a*b 
我如何调用这个公式在程序中，即我输入a，b的值，给出面积；谢谢；
说明：我只是举例，公式不一定是三角形的面积，所以不能写在程序中； 

Answer 1

参数exp为表达式字符串，你把a，b替代成数字即可uses
  ComObj;
Function DoCaculate(exp: string): string;
var
  script: Variant;
begin
  script := CreateOleObject('ScriptControl');
  script.Language := 'JavaScript';
  Result := script.Eval(Exp);
end;

Answer 2

简单的 StringReplace  替换字母
复杂的自己解析，或者正则表达式