如何四舍五入?

Question

用strtofloat(aEdit.text)后,转出来的浮点数小数很多,如果用于乘法,
小数就更多了,不知有没有办法控制小数位数,
我想用四舍五入的方法应该有用,但不知怎么办,请指教?

Answer 1

Format('%.2f',[1.2365]); 就是1.24

Answer 2

var a:int;
     b:float;
b:=strToFloat(aEdit.text);
if b>=0 then
a:=round(b+0.5)
else
a:=round(b-0.5);

Answer 3

1.先uses一下Math单元。
2.
 RoundTo(1234567, 3)       =1234000
 RoundTo(1.234, -2)        =1.23
 RoundTo(1.235, -2)        =1.24
明白了吧，