控件连接access表的Money_字段(单精度,2位有效小数),不过在预览的时候,显示小数位数过多,比如表里面的值为409.20,但在报表中却显示409.203125,请问怎么解决

解决方案 »

  1.   

    ShowMessage(FormatFloat('00.00',409.203125));
      

  2.   

    能说说在程序中怎么实现吗?
    有个button
    我是这样写的:
    procedure TForm1.Button1Click(Sender: TObject);
    begin
      QRDBText2.Caption:=FormatFloat('0.00',ADOQuery1.fieldbyname('money_').AsFloat);
      QuickRep1.Preview ;
    end;
    但不行
      

  3.   

    procedure TForm1.Button1Click(Sender: TObject);
    var i:real;
    begin
      //i:=12.612412;
      i:=ADOQuery1.fieldbyname('money_').AsFloat;
      QRDBText2.Caption :=formatfloat('#.00',i);
    end;
      

  4.   

    在你SQL取数的时候装一下
    convert(money,field)
      

  5.   

    呵呵
    我说的是在报表里,不是显示在普通的text里
    下面是代码:
    procedure TForm1.Button1Click(Sender: TObject);
    var i:real;
    begin
      i:=ADOQuery1.fieldbyname('money_').AsFloat;
      QRDBText2.Caption:=FormatFloat('#.00',i);
      QuickRep1.Preview ;
    end;
    不信你再试试
      

  6.   

    to z2y3(郑张翼):
      能再说具体点吗?
      

  7.   

    QRDBText 有个属性叫mask,可以填写输出格式:##,###.##
      

  8.   

    本楼正解
    ------
    双击adoquery-找到对应字段-设置displayformat属性
      

  9.   

    有没有试过format('%4.2f',[money_]),我没有试,不过在edit中是可用的