trunc()取整
round()四舍五入
round()四舍五入
解决方案 »
- timer怎么用的的
- 2个问题:1、delphi中有没有整体注释和反注释功能?2、Sender,Self,Owner和parent的用法?
- 关于delphi对象销毁及内存泄漏的问题,谢谢各位!
- cxSpreadSheet怎么实现象EXCEL那样能够区域粘贴单元格?
- d5开发人员指南并没有象网上说的那么好!很多都是概念模糊!!
- oracle+delphi 帮帮忙!在线等待,会者有分
- 放分,另外欢迎大家有时间去http://www.huachu.com.cn/bbs/index.asp坐坐
- 在学DELPHI数据类型中的一个困惑!
- 很简单的题目,快来提分!!!
- Delphi和BCB的安装问题
- 郁闷! 散分!
- 挑战高手!怎么在程序里面调用sql server的DTS?
round()四舍五入
var
I: Double;
begin
Result := Int(X);
I := Frac(X);
if I >= 0.5 then
Result := Result + 1;
end
round()四舍五入