delphi中double或float转Integer实践

来源:互联网 发布:播放器软件下载 编辑:程序博客网 时间:2024/06/05 04:46

经实践证明:

var

   d :double;

1.用int(d)或integer(d)强制转换,均无法编译

2.先FloatToStr,再StrToInt时,当有小数的情况就会发生错误

 

可行的方法是:先去掉小数部分,再强制转换

integer(Trunc(d));

 

注:Trunc不会进位。

 

 

 

发表地:广州

原创粉丝点击