有这样的函数吗？？？

Question

我想把123.34000变成123.34，也就是把小数末尾的0都去掉，有这样的函数吗？？

Answer 1

to：mrfanghansheng(……*Rocket*……) 我不是要保留两位~，我是想把小数末尾的0都去掉
to：largewang(老王) 晕~~我不是想听“有”或“没有”，？？？

Answer 2

有个笨办法,先将它转换为string,然后用trim函数
别向我仍砖头

Answer 3

我想你的123.34000之类的数据肯定是编辑框中的内容，也就是string类型，
为什么不先处理这个字符串？

Answer 4

s := '123.34000';
i := length(s);
while s[i]='0' do 
     dec(i);
s := copy(s, 1, i);

Answer 5

试试 strtofloat(floattostr(123.450000));

Answer 6

先转换为字符串再处理，Pos以及Delete，Length几个函数配合就OK了，具体算法比较简单，自己写了，这里只是给些提示的

Answer 7

不知道楼主想做什么用啊，一般都是想把后边添加多少零补位，很少有想去零的，比如说：
var
  testnum: double;
begin
  testnum := 123.456000000;
  edit1.Text := floattostr(testnum);
end;edit1中显示的就是123.456，而不是123.456000000