请问怎么样四舍五入,要求是小数点后两位,请写出代码,谢谢 ShowMessage(FormatFloat('#0.00', 123.456)); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 FormatFloat 函数 指定浮点数格式Round 函数 将实数值舍入为整型值 var i:real;begin i:=round(int(i*1000)+5)/10)/100;end; Edit1.text:=Format('%.2f',[123.456789]); //结果是123.46Edit1.Text:=FormatFloat('#.##',123.456789); //结果是123.46 手机被偷,郁闷 [ODBC]:请问怎样配置的啊? 如何用ascII驱动数据库 急求统计TreeView节点的函数,能解决者马上给分!!!!! 如何提取webbrowser当前页的标题,并截6个字赋给一个Tabsheet的caption?望大虾不吝赐教! 我想双击一个文件夹的快捷方式,但SHELLLISTVIEW不能执行。 query的requestlive属性? 急!急!!登录对话框如同虚设怎么办? 如何在delphi中加入组件? 这里有没有济南或青岛的朋友,想向你们咨询点事。凡参与者均有分。谢谢! 如何看别人的代码 急死人的问题,曾经从未碰过
i:real;
begin
i:=round(int(i*1000)+5)/10)/100;
end;
Edit1.Text:=FormatFloat('#.##',123.456789); //结果是123.46