delphi 对金额double类型向上取整，保留小数位

最新推荐文章于 2020-12-27 10:12:22 发布
原创 最新推荐文章于 2020-12-27 10:12:22 发布 · 2k 阅读 · 0 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#delphi

本文介绍了一种在Delphi中处理金额数据的方法，通过自定义函数NewRoundTo实现double类型数值的向上取整并保留指定小数位数，确保了金额计算的准确性。

delphi 对金额double类型向上取整，保留小数位

//新保留小数位，只要后面有多余的数据，则进位

function NewRoundTo(value: Double; ws: Integer): Double;
var iLen: Integer;
    E: Extended;
begin
  iLen:=StrToInt('1'+stringOfChar('0', ws));
  E:=StrToFloat(FloatToStr(value));
  Result:=Ceil(E * iLen) / iLen;
end;

如：3.085，4.612等取2位小数得到：3.09和4.62

test_round.rar_delphi中round_round_保留小数_函数
09-20
在Delphi中，还有其他函数可以帮助我们处理小数，比如`Trunc`函数用于去掉数字的小数部分，`Ceiling`函数用于向上取整，`Floor`函数用于向下取整。这些函数在处理数字时各有其用途，但都不直接支持保留指定位数的...
Delphi 自已写的四舍五入函数
05-14
自定义四舍五入函数的核心在于实现一种算法，该算法能根据指定的小数位数对数字进行四舍五入，并且遵循“向最接近的偶数舍入，或者在相等距离时向上舍入”的原则。下面是一个简单的 Delphi 自定义四舍五入函数的示例...
delphi的取整函数round、trunc、ceil和floor
笨笨的专栏
05-13 1157
 1.Round（四舍六入五留双）功能说明：对一个实数进行四舍五入。(按照银行家算法) 例：var i, j: Integer;begin i := Round(1.5); // i等于2 j := Round(2.5); // j等于2end;在Delphi中使用Round函数得到的答案有时与我们所预期的会不太一样：采用的是四舍六入五留双。即当舍或入位大于或小于五时按四
升级版四舍五入可以自定义保留小数位
08-08
不同于银行家算法，真正做到四舍五入，符合中国人的使用习惯，并且可自定义保留小数的位数。并且能够对参数值做错误判断。
Delphi取整函数
05-06 343
floor 和 ceil 是 math unit 里的函数，使用前要先 Uses Math。trunc 和 round 是 system unit 里的函数，缺省就可以用。floor 直接往小的取，比如 floor(-123.55)=-124，floor(123.55)=123trunc 直接切下整数，比如 trunc(-123.55)=-123, floor(123.55)=123ce...
delphi 保留小数点的个位数方法
qin_yaping的博客
09-03 8019
uses math RoundTo(0.2668,-2)=0.27
delphi format 保留5位小数保留_5分钟学会制作论文中的Table 1
weixin_39872222的博客
12-27 666
1、什么是Table 1?Table 1即流行病学或临床研究发表的文章中第一张表格，功能是向读者展示研究人群的基本特征。2、本文详细介绍用Stata绘制Table 1Stata较SPSS可重复性强，且语句更为直观。当研究过程中有数据变动时（增删变量、更改变量名、修改数据），我们只需改动少量或甚至无需改动语句，重新“run”一遍，即可重现Table 1。操作较SAS、R更为简便，上手快，且结果输出可...
bigdecimal 保留两位小数_element中使用show-summary进行汇总时小数点的问题解决方法...
weixin_39928102的博客
11-21 860
在使用show-summary 属性进行合计的时候经常会出现一个情况：没有保留2位小数，其实每一行本身也没有保留两位小数， 但是每行数据用template进行了特别的处理， 所以可以展示两位小数， 那合计行的小数位数怎样解决呢， 今天就来处理这个：自带的合计是只要在 el-table 加入 show-summary ， 然后每个el-table-column 加入 prop="oriAmount"...
double类型金额超10位数怎么办
最新发布
09-19
在Delphi中，若需对double类型金额进行向上取整并保留小数位，可使用如下函数 [^4]。 ```delphi function NewRoundTo(value: Double; ws: Integer): Double; var iLen: Integer; E: Extended; begin iLen := ...
delphi四舍五入例子
11-17
4. `Ceil`: 它返回大于或等于给定浮点数的最小整数，即向上取整。 然而，这些标准函数可能无法满足所有四舍五入的需求，比如有时我们需要指定保留小数位数或者进行特定方式的四舍五入（比如舍入到最接近的偶数）。...
【delphi_文章】delphi的取整函数round、trunc、ceil和floor.doc
03-15
【delphi_文章】delphi的取整函数round、trunc、ceil和floor.doc
Delphi四舍五入问题的解决示例
四舍五入通常涉及到对浮点数的处理，包括向上取整、向下取整以及保留固定小数点位数的四舍五入。下面将详细介绍Delphi中实现四舍五入的方法和相关知识点。 ### 四舍五入的基本概念 四舍五入是一种数学运算，它将一...
delphi format 保留5位小数保留_openpyxl修改单元格格式（隐藏小数、设定百分数位数）...
weixin_34036075的博客
12-21 785
修改单元格格式(隐藏小数、设定百分数位数)from openpyxl.styles import colorsfrom openpyxl.styles import Font, Color,PatternFillfrom openpyxl.styles import colors from openpyxl import load_workbookfrom openpyxl.styles impo...
Delphi学习手记——取整函数的用法
永不放弃
10-07 4131
Delphi取整函数的用法 Delphi 取整函数有四个：floor、ceil、trunc、round floor 和 ceil  : use math trunc 和 round : use system  用法说明： floor 直接往小的取，比如 floor(-123.55)=-124，floor(123.55)=123 trunc 直接切
关于数据库中浮点运算、保留小数和时间计算
aa663388的博客
08-21 536
关于小数： 1、SQL数据表中使用numeric字段时（一定要注明小数位数），程序中使用：ADOQuery1.FieldByName('price').Value := RoundEx((ADOQuery1.FieldByName('price').AsFloat + strtofloat(Edit1.text)) * 1000) / 1000;或者ADOQuery1.F...
Delphi 四舍五入
nnnnyyyy的专栏
06-13 5789
Delphi 的四舍五入跟我们平常所认识的四舍五入不一样。它用的是银行家算法－也就是四舍六入，而五入不入取决后面跟的一位数是奇数还是偶数，如果是奇数则进，如果是偶数则舍。简单说是奇进偶不进。  举例: 123.3359保留两位小数，如果是平常四舍五入123.3359 = 123.34，如果是银行家算法123.34；结果是一样；          123.3358保留两位小数，如果是平常四舍五入
Delphi中round函数保留两位小数的功能测试
描述中提到“delphi 中保留两位小数测试”，说明测试的主要目的是验证ROUND函数在保留两位小数时的功能。文件列表中的“Round测试”则进一步确认了测试的目的和文件内容。由于测试文件名称是简短的“Round测试”，...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值