我在打印時,是這樣寫的
-----------------------------------------------------
allprt.SQL.Clear;
allprt.SQL.Text:='select csbh from cg_cszl order by csbh';
allprt.Open;
while not allprt.Eof do
begin
h:=0;
yfdz_p1.active:=false;
yfdz_p1.Parameters.ParamByName('@csbh').Value:=allprt.fieldbyname('csbh').AsString;
yfdz_p1.Parameters.ParamByName('@t1').Value:=formatdatetime('yyyy-mm-dd',datetimepicker1.date);
yfdz_p1.Parameters.ParamByName('@t2').Value:=formatdatetime('yyyy-mm-dd',datetimepicker2.date);
yfdz_p1.active:=true;
yfdz_fr.showreport;
allprt.Next;
end;
allprt.Close;
------------------------------------------------------------------
這樣每一個CSBH就會出現一個打印預覽界面,關掉一個才會出現下一個界面
請問:可不可以做到後面的CSBH選 出來打印的頁面追加到前一CSBH的打印頁面後
最後只出現一次打印預覽的界面,而預覽的內容是所有CSBH,
謝謝!!分不夠,另外開帖加...

解决方案 »

  1.   

    allprt.SQL.Clear;
    allprt.SQL.Text:='select csbh from cg_cszl order by csbh';
    allprt.Open;
    while not allprt.Eof do
    begin
    ...........end;
    yfdz_fr.showreport;//把打印语句放这里
    allprt.Close;
      

  2.   

    谢谢Rail100(每逢佳节倍思春)回帖....这样子写我也试过了,不过最后显示的只有最后一次的记录..
      

  3.   

    建议你把FastReport安装目录下的Demo先看一遍。
    跟着Demo做一次比我说更清楚。