各位大大,  我發現一個問題  不知道是否有人有方法解決 .. 就是，若QuickRep連上比如Query1的 dataset，在其 Detail Band 裡原本是會將Query1裡的資料每一筆都印出來，但若我想在每一筆資料印出來之前先用某種條件判斷要不要印，我可以在此 Detail Band 的 onBeforePrint 事件裡寫while 程式，若不印就 Query1.Next 跳到下一筆繼續判斷要不要印...，若要印，就離開此BeforePrint函數，此筆自然就會印出來...印出來之後QuickRep的游標自動會跳到下一筆，重覆跑onBeforePrint事件..如此下去，到Query1.Eof 最後一筆時，問題就來了，若剛好這一筆是不要印的，因為是最後一筆，當然無法用 Query1.Next 把游標移到下一筆來跳此最後一筆，於是，我開始找有沒有函數可以中斷列印...結果我找不到 所以造成最後一筆永遠會列印出來的情況...想請問有沒方法可以解決 ?? 拜託拜託 @@

Hi:    你乾脆不要去作  Query1.Next，直接將 PrintBand := False 則該筆資料不印出即可     ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

Fishman 你好,    我沒找到PrintBand這個函數耶 可以請問它在哪兒嗎? 我是要寫在Detail Band 的 BeforePrint 事件裡.... 謝謝 

Hi:    dedo,你注意看一下 BeforePrint 的事件，它只是一個 Boolean，控制該 Band 是否會被列印出來

procedure TForm1.QRBand2BeforePrint(Sender: TQRCustomBand;
  var PrintBand: Boolean);
begin
    Inc(CurrentRec);
    QRLabel3.Caption := IntToStr(CurrentRec);
    if xxx then
        PrintBand := True;
    else
        PrintBand := False;
end;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

原來如此 I got it ! 謝謝你