是关于报表的.
两个窗体Form1,form3。form1中有控件datasetzfm,button1。form3中有控件quickrep1,上边放有qrband2,qrband3,qrband4,其bandtype属性依次设为rbtitle,rbcolumnheader,rbdetail。qrband3中放有qrlabel2到qrlabel5。qrband4中放有qrdbtext1到qrdbtext4。现有如下程序:
procedure TForm1.Button1Click(Sender: TObject);
begin
 datasetzfm.Close;
 datasetzfm.CommandText:=searchsql;
 datasetzfm.Open;
 if datasetzfm.RecordCount=0 then
  showmessage('对不起,没有查到相关记录!')
 else
  begin
   form3.QRLabel2.Caption:='公司';
   form3.QRLabel3.Caption:='收款';
   form3.QRLabel4.Caption:='支付';
   form3.QRLabel5.Caption:='差额';
   form3.QRDBText1.DataSet:=datasetzfm;
   form3.QRDBText2.DataSet:=datasetzfm;
   form3.QRDBText3.DataSet:=datasetzfm;
   form3.QRDBText4.DataSet:=datasetzfm;
   form3.QRDBText1.DataField:='公司';
   form3.QRDBText2.DataField:='收款';
   form3.QRDBText3.DataField:='支付';
   form3.QRDBText4.DataField:='差额';
   form3.QuickRep1.Preview;
end;
现在有两个问题:
1、QRLabel2到QRLabel5均无显示
2、只显示一行数据,而实际查到却有多行数据
是什么地方不对?