要保留一个实数的小数点后面两位(现实数的小数点后面有很多位),有没有最简单的函数可以实现?另取整函数是什么?

解决方案 »

  1.   

    s := FormatFloat('0.00', 1.232342432);Trunc/Round
      

  2.   

    function FormatFloat(const Format: string; Value: Extended): string;其中format:Format string- 1234 -1234 0.5 0
                       1234     -1234   0.5      0
    0 1234 -1234 1 0
    0.00  1234.00 -1234.00 0.50 0.00
    #.##   1234 -1234 .5
    #,##0.00 1,234.00 -1,234.00 0.50 0.00
    #,##0.00;(#,##0.00) 1,234.00 (1,234.00) 0.50 0.00
    #,##0.00;;Zero  1,234.00 -1,234.00 0.50 Zero
    0.000E+00    1.234E+03 -1.234E+03 5.000E-01 0.000E+00
    #.###E-0   1.234E3 -1.234E3 5E-1 0E0