怎么在取小数点2位？

谢谢！

解决方案 »

  1.   

    将熟*100 四舍五入，再/100;
    比如：temp:integer;
    temp:=temp*100;
    temp:=round(temp);
    temp:=temp/100;
      

  2.   

    有一个trunc函数，你去搜索一下
      

  3.   

    呵呵，不好意思，上面错了
    //把Edit1.Text四舍五入（保留两位小数），复制给Edit2
    edit2.Text:=floattostr(trunc(100*strtofloat(Edit1.Text)+0.5)/100);
      

  4.   

    Edit1.Text:=FormatFloat('#,##0.00',数字);
      

  5.   

    formatfloat('#.00',12.1) = 12.10;
      

  6.   

    同意
    用FormatFloat函数就可以了
      

  7.   

    formatfloat('#.00',12.1) = 12.10;