由于要edit中要显示小数,我不知道怎样才能实现,简单举例如下:
var
x,y:real;
begin
 x=3.4;
 y=5.6;
//怎样赋值???
 edit1.text=x+y;
end.很菜鸟的问题,多谢各位大哥!

解决方案 »

  1.   

    我晕,你是什么意思?
    Var
      x,y:Real;
    begin
      x=3.4;
      y=5.6;
      edit1.text=Floattostr(x)+'+'+FloattoStr(y);
      //你不会是要这样的结果吧!!,弄不懂了!!
    end;
      

  2.   

    Edit1.Text := Format('%f10.2',[2*100000.34]);
    注:FORMAT的用法基本于C里的一致。
      

  3.   

    ***********************************************
    我晕,你是什么意思?
    Var
      x,y:Real;
    begin
      x=3.4;
      y=5.6;
      edit1.text=Floattostr(x)+'+'+FloattoStr(y);
      //你不会是要这样的结果吧!!,弄不懂了!!
    end;
    ***********************************************
    人家当然不是让你这么用啦。
    Var
      x,y:Real;
    begin
      x=3.4;
      y=5.6;
      edit1.text=Floattostr(x + y);
    end;
      

  4.   

    大侠  Didy(Diddy)  我错了  日你厉害!!  :)
      

  5.   

    日你厉害!!  :)
    ???
    为何骂人呢???不解ing
      

  6.   

    我来总结一下。
    嘿嘿!
    1、edit1.text=Floattostr(x+y);2、edit1.text=Floattostr(x)+'+'+FloattoStr(y);
    3、Edit1.Text := Format('%f10.2',[2*100000.34]);当然,我再加一条。
    4、Edit1.text:=FormatFloat('0.00',x+y);以两位小数的形式显示出来!!
    看看你要的是哪样的效果??
      

  7.   

    hehehe
    给我点吧,我想帮你的
    但是来晚了
    :)