文本框计算公式有关问题，怎么实现在文本框中输入0.6＊0.8＊2　自动计算出0.96等等

文本框计算公式问题，如何实现在文本框中输入0.6＊0.8＊2　自动计算出0.96等等?
文本框计算公式问题，如何实现在文本框中输入0.6＊0.8＊2　自动计算出0.96 输入(4.3+0.3)*(3.25+0.3) 自动计算出16.33 等等?
计算就是基本的加减乘除及括号
如何实现？

[解决办法]

Delphi(Pascal) code

uses comobj;var  m_Script: Variant;begin  try    m_Script:= CreateOleObject('ScriptControl');    m_Script.Language := 'JavaScript';    showmessage( m_Script.Eval('0.6*0.8*2') );  except    showmessage( 'error' );  end;end;