记账软件版1楼: 上次承蒙 ak_2005,hhmyz 兄指点，知道用 formatfloat(...)来截取所需的小数，但是还有一个问题就是，不能四舍五入，不知道怎么样才能做到所需位数以后的四舍五入和全部舍去，请大家帮忙，谢谢了！

2楼: 你做个判断了，trunc()取整数位 如进销存

3楼: Edit1.Text := FormatFloat(＇＇#.##＇＇, Trunc(123.556*100)/100);

4楼: 比如12.3654781 四舍五入成12.365478
你可以用(12.3654781*10000000 +5) 取整数 再除10000000
你看行么？
小弟愚见!

5楼: chanry 兄 你说取整数位是什么意思啊 我要的是小数四舍五入啊

xianguo 兄 我的理解是这样的 formatfloat(...)是一定入的 我用 2.0000 取三位试 得到的是 2.001 ....... 所以我想 *100 再 /100 没什么用啊

毛手毛脚 兄 你的想法我试了 ..... 答案是 12.3654786 ......好像是不合要求啊 咱们再考虑一下看看 .. 意下如何

6楼: round(variable*100)/100.0

记账软件版7楼: enterwin 兄 你的有创意 拥抱一下~~~~~~

还有别的办法可以吗 多学几招总是对的嘛~~~~

8楼: 晚了 该回家睡觉了 夜了还在奋斗的兄弟们 晚安 周一再见 [:D]

9楼: http://www.delphibbs.com/keylife/iblog_show.asp？xid=17106

10楼: 行呀

11楼: RoundTo

12楼: 哎，其实用不着大家去写什么函数，Delphi本身就有传统四舍五入这个函数，先引用math单元，然后用SimpleRoundTo这个函数就可以了。 如金碟财务软件官网

13楼: 谢谢大家了 这个问题说得这么详细 多谢多谢