請問有沒有辦法在QuickReport之DetailBand限制它列印的筆數? 如：資料表中有10筆資料，但我要設計一張制式表格，它只能印5筆， 所以我需要限制DetailBand的列印筆數。

...
var
  i:integer;
...
implementation
...
procedure TForm1.QRBand1AfterPrint(Sender: TQRCustomBand;
  BandPrinted: Boolean);
begin
   if (i mod 5)=0 then//印出5筆
    begin
      QuickRep1.NewPage;
    end;
if i=5 then
i=0;
end;    procedure TForm1.QRBand1BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
  i := i   1;
end;    

以下這篇參考看看 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=26631 發表人 - huangeider 於 2003/09/14 07:05:39

不好意思這篇按錯了 發表人 - huangeider 於 2003/09/14 07:12:05

設一變數NumOfDetail初值為0代表DetailBand跑一次就加一
在DetailBand.AfterPrint中 
Inc(NumOfDetail);
if NumOfDetail=5 then //每頁印5筆
 begin
   NumOfDetail:=0;
   Report.NewPage; //跳下一頁
 end;

對不起，我可能問題沒有說的很詳細，我指的是限制筆數後，不再跳頁，亦不再列印，也就是中止的意思。

那我只有6條記錄，在第二頁中我如何才能讓打出其余4行地空記錄呢（如下） －－－－－－－ ************** －－－－－－－ （以下空白） －－－－－－－    －－－－－－－    －－－－－－－    －－－－－－－    Happy Coding 原來答案就在下面    發表人 - hxf_wolf 於 2003/09/15  14:58:20 發表人 -

------
Happy Coding

引言: 對不起，我可能問題沒有說的很詳細，我指的是限制筆數後，不再跳頁，亦不再列印，也就是中止的意思。 如果是有條件的列印可以再拉一個tquery 把要的那5筆select 起來 再到tquickrep上把相關欄位設好 再參考上面的程式方法就可以了 若是沒有條件的,要自已選record的話 也是再拉一個tquery或ttable 把要的record加入Tquery或ttable 再到tquickrep上把相關欄位設好 再參考上面的程式方法就可以了

「堅持」從洗馬桶做起 Aric

引言: 那我只有6條記錄，在第二頁中我如何才能讓打出其余4行地空記錄呢（如下） －－－－－－－ ************** －－－－－－－ （以下空白） －－－－－－－ －－－－－－－ －－－－－－－ －－－－－－－ 空白部份會自動會列出

「堅持」從洗馬桶做起 Aric