Delphi,保留小数位
1.RoundTo---需要在uses中加入Math
保留浮点数到小数点后特定位,四舍五入,当然也可以保留到整数如下:
label2.Caption := FloatToStr(RoundTo(k, -2));    //此句要用Math
label2.Caption := FloatToStr(RoundTo(k, 2));   //此句要用Math
假如
k : Double = 7777.777;
上面结果分别为:
7777.78
7800
2. Format
注意直接输出字符型,不需要FloatToStr();
Label1.Caption := Format('%.2f',[k]);

解决方案 »

  1.   

    假如
    k : Double = 7777.777;
    结果为:
    7777.78假如
       k : Double = 7777;
      

  2.   

    数据库的该字段如果为Float的话是可以全显示的,如果你的字段是decimal或者没办法改变的话,可以考虑将该字段乘以1000倍显示什么的……
      

  3.   

    TFloatField(ADOQuery1.FieldByName('列名')).DisplayFormat='0.0000';
      

  4.   

    我说的是0.1111111在DBGridEh只能显示0.1111,怎样才能显示0.1111111?
      

  5.   

    我在数据库中字段是 利率 decimal(18,7) default 0 
      

  6.   

    但是显示在delphi dbgrideh显示只保留4位小数,我的最小要7为小数,苦恼啊