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 fmx获取屏幕方向

Delphi中让图片大小随timage控件大小变化

Delphi 获取系统启动文件夹路径

Delphi中控制与捕捉输入法的实现单元

Delphi使用hough变换查找直线

Delphi 双击tmemo选择光标所在行

Delphi-idhttp-utf-8编码乱码解决

Delphi win7中的uac与开机自动启动

Delphi android 安卓中保持屏幕常亮

Delphi代码,直截注入别的进程,之后直截运行在别的进程中的代码!

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...