C cg1120 Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-10 #3 保留四位小数: roundto(3.1415926535798932,-4)
Z zaochao Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-10 #4 我写上去怎么说[Error] Unit1.pas(32): Undeclared identifier: 'RoundTo'？？
U ugvanxk Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-10 #5 formatfloat('0000.',real)//不知行不行
H HunterTeam Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-10 #6 round(浮点数*10000)/10000 //先将浮点数*10000后取整，再除以10000，即可保留4位小数。
Z zhtx Unregistered / Unconfirmed GUEST, unregistred user! 2002-09-10 #7 roundto是DELPHI6新增的函数 最全面的答案:http://www.delphibbs.com/delphibbs/dispq.asp?lid=1049035
