如何将Edit1中的文本内容(小数点后所有的数字都舍去即取整)
代码应如何写?例如:23.632      取整为23
      4252.2685   取整为4252

解决方案 »

  1.   

    Trunc(StrToFloat(Edit1.Text));注:round是四舍五入
    需Trunc是将实型值截取为整型值
      

  2.   

    i:=3.14;
    i:=StrToDate('2004-1-1');
    i:=now;
    ...
    依次show下看看
      

  3.   

    nnd,回错贴子了(第一次,第一次)
    这个贴子本来想回“晕”的
      

  4.   

    edit2.text:=floattostr(trunc(strtofloat(Edit1.Text)  ));
      

  5.   

    i:=round(StrToFloat(Edit1.Text)-0.5);这个应该也没错吧!!还是学C++时,老师讲的!
      

  6.   

    trunc 和 round
    都可以,但是有区别
    trunc直接去处小数部分
    round则可以做四舍五入
      

  7.   

    var s:String; s := floattostr(4252.2685);
     s := copy(s,1,pos('.',s)-1);
     ShowMessage(s);
      

  8.   

    如果是除法就用 div
    如果是数 急用 trunc函数
      

  9.   

    取整使用Int
    原型:function Int(X: Extended): Extended
    例:
    ShowMessage(FloatToStr(Int(1.565)));//1,实为1.0