FloatToDecimal过程 - Borland Delphi 开发工作者手册

返回介绍

FloatToDecimal过程

发布于 2019-08-04 字数 1205 浏览 877 评论 0

SysUtils

procedure FloatToDecimal(var DecVal:TfloatRec;const Value;ValueType:TfloatValue;Precision,Decimals:Integer);

FloatToDecimal将一个浮点数值转换成为一个十进制来表示。

FloatToDecimal将浮点数转换为更高格式的十进制值。Value参数必须是一个Extended或Currency类型的变量,像被ValueType参数声明的。对于Extended类型的值,Precision参数声明了结果中需要的有意义的十进制的位数,允许值范围是1~18。对于Currency类型值,Precision参数被忽略,隐含的精度将是19位。

参数声明了结果中小数点左边所需的位数。Precision和Decimals一起控制了任何结果被省略。为了产生总是有一个给定的有效位数的结果,不论数值大小,特别是9999可以转为Decimals参数。转换的结果被储存在特别的TfloatRec记录中,以下声明:

Exponent

保持了数值得大小,即,到达右侧小数点的有效位数。如果数的绝对值是小于1的话ExPonent域是负的。如果数是一个非数值内容,Exponent被设置为-32768。如果数是正或负无穷,Exponent被设置为32767。

Negative

如果数是负的将为真,如果数是0或是正的将为假。

Digits

对Extended类型包含到18位,对Currency包含到19位。声明了有效位数,跟随一个空结束符。包含的小数点不放在Digits中。尾部的0被删除,如果结果数是0,NAN(不是数值),INF(无限),Digits只包含空结束符。

上一篇:FindNext函数

下一篇:FloatToStrF函数

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!