delphi 返回整数的四种情况

本文整理自网络，侵删。

 //返回整数的四种情况
const
a = 1.8;
b = -1.8;
begin
{返回比值大的最小整数:}
ShowMessage(IntToStr(Ceil(1.8)) + ',' + IntToStr(Ceil(-1.8))); {返回：2,-1}

{返回比值小的最大整数:}
ShowMessage(IntToStr(Floor(1.8)) + ',' + IntToStr(Floor(-1.8))); {返回：1,-2}

{删除小数部分:}
ShowMessage(IntToStr(Trunc(1.8)) + ',' + IntToStr(Trunc(-1.8))); {返回：1,-1}

{四舍五入:}
ShowMessage(IntToStr(Round(1.8)) + ',' + IntToStr(Round(-1.8))); {返回：2,-2}
end;

{经我反复测试, 按性能排个序: Round、Trunc、Floor、Ceil; 应该多用 Round, 它的速度是 Trunc 的一倍以上}
 

相关阅读 >>

Delphi xe5 android 开发实现手机打电话和发短信

检测系统信息的单元 computerinfo.pas

Delphi goto 语句的使用

Delphi 多线程 开始、暂停、继续、停止

Delphi 获取鼠标坐标大全方法

Delphi 格式化输出函数(2): formatdatetime

Delphi 开关显示器操作

Delphi 调用外部 dll 中的函数(2. 晚绑定)

Delphi xe android的所有权限按照分类总结说明

Delphi读取utf8格式ini及取得动态�热�

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 返回整数的四种情况