超级简单的DELPHI问题，取小数位

一个EDIT1.text，显示的数字，可能是10000.559653这样的格式，我现在想转换成10000.55，取小数位后的2位数，并显示在EDIT1里。不要四舍五入
简单吧？有高手，回答一下吧。。。

方法1: Edit1.Text:= FloatToStrF(StrToFloat(Edit1.Text), fffixed, 15, 2);
方法2: Edit1.Text:= Copy(Edit1.Text, 1, Pos('.', Edit1.Text)+ 2);

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/vfy7yr32j.html

第1个回答 2010-07-06

Edit1.Text:=copy(Edit1.Text,1,pos('.',Edit1.Text)+2);

大家正在搜