SetRoundMode(rmUp)和舍入"round"值如10,结果10,0001怎么来的？

这段代码:

 SetRoundMode(rmUp);
 Memo1.Lines.Add(CurrToStr(SimpleRoundTo(10)));

结果10,0001.

我根本就没有得到它.

我认为rmUp会做类似的事情,围绕10,0001到11,但从不到10到10,000.

谁能解释为什么会这样？

谢谢.

SimpleRoundTo 像这样工作:

将输入值除以10 ^-x,其中x是结果中要保留的小数位数.

将0.5添加到该产品中.

截断总和.

乘以10 ^-x.

结果是浮点值.与大多数浮点值一样,结果也不准确,即使在您的情况下,您也会以精确值开头.指定的小数位数SimpleRoundTo为负数,因此对于示例输入,步骤1中的除数理想情况下为0.01.但是这不能完全表示为浮点数,因此当在步骤1中计算10/0.01时,结果不完全是1000.但是,步骤3中的结果将恰好为1000,因此不精确分裂并不重要.但是,步骤4中乘法的不精确性.那个产品不准确.它会略高于10.

所以SimpleRoundTo返回一个略高的值,因为你已经指定了四舍五入应该走了,在转换Extended的结果SimpleRoundTo的Currency输入CurrToStr结果正好10.0001.

Currency价值是准确的; 它们代表一个定点值,一个按小数点后四位缩放的整数.