就是数据为0的字段,打印为空白....以前还记得的,现在忘了...帮帮忙啊

解决方案 »

  1.   

    在OnPrint事件里判断
    为0就赋空值
      

  2.   

    将数据集的字段DISPLAY FORMAT 设置为:#,#0.000;-#,#0.000;#
      

  3.   

    我现在是这样写的语句procedure Tprint.QRBand1BeforePrint(Sender: TQRCustomBand;
      var PrintBand: Boolean);
    var
    i:integer;
    begin
    for i:=0 to ComponentCount-1 do
    if Components[i] is TQRDBText1 then
    begin
    if (Components[i] as TQRDBText).text='0' then
      (Components[i] as TQRDBText).text:='';
    end;end;提示(Components[i] as TQRDBText).text的.text不对,那应该用什么?用.field也不对