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;