Код:
var
ScriptControl: IScriptControl;
begin
ScriptControl:=CreateComObject(CLASS_ScriptControl) as IScriptControl;
ScriptControl.Language:='javascript';
Memo1.Lines.Add(ScriptControl.Eval('(2*5+90+Math.abs(-900))/10'));
end;
__________________
Пишу программы за еду.
__________________
|