关于delphi中小数位数问题

Question

可以用Str函数，不过要先转换为实数，Str(12.3456:0:2,R);

Answer 1

strtofloat(Format('%8.2f', [R]));
但是Format是使R四舍五入(12.3456->12.35)，不知截取R小数点前两位要怎么实现
(12.3456->12.34)???

Answer 2

Format('%.2f', [12.3456]) ;
要知道，程序的目的是为了得到结果，我们所能得到的结果就体现在输出上，而能被输出的一般只有字符串。何况，不用字符串，用什么来存储一个有格式的实数？

Answer 3

在Delphi6中增加了一个函数可以实现，在Delphi5中没有：
RoundTo(12.3456,-2)=12.35