我在Quick Rep 的 ChildBand 放 一個 TQRRichEdit， 在 BeforePrint 事件中，讀資料出來，將這些資料寫迴 圈作判斷後，寫入 TQRRichEdit 中，印出來卻發生印兩 次的情況，不知有那位高手可以解答一下 .... 例 ....... ....... ABCDEFG HIJKLMN <-第一次 OPQRSTU VWXYZ ABCDEFG HIJKLMN <-第二次 (緊接著) OPQRSTU VWXYZ

引言: 我在Quick Rep 的 ChildBand 放 一個 TQRRichEdit， 在 BeforePrint 事件中，讀資料出來，將這些資料寫迴 圈作判斷後，寫入 TQRRichEdit 中，印出來卻發生印兩 次的情況，不知有那位高手可以解答一下 ....

如果預覽完再印沒有在QuickRep1的BeforePrint清空，這是正常的。 TJSQRBuild (簡易報表建立元件) http://freehomepage.taconet.com.tw/This/is/taconet/top_hosts//jieshu/delphi.htm#JSQRBuild 經由元件屬性設定，可不用自己拖拉QuickReport元件，即可建立簡單的QuickReport報表，可在設計階段預覽。亦可將建立的報表存成 Delphi 的 Form (類似 QuickReport Wizard 所產生的程式)，再做複雜的設定使用，免除一一拖拉元件的困擾。

引言: 如果預覽完再印沒有在QuickRep1的BeforePrint清空，這是正常的。 TJSQRBuild (簡易報表建立元件) http://freehomepage.taconet.com.tw/This/is/taconet/top_hosts//jieshu/delphi.htm#JSQRBuild 經由元件屬性設定，可不用自己拖拉QuickReport元件，即可建立簡單的QuickReport報表，可在設計階段預覽。亦可將建立的報表存成 Delphi 的 Form (類似 QuickReport Wizard 所產生的程式)，再做複雜的設定使用，免除一一拖拉元件的困擾。

感謝 jieshu 的回應，你說要清空 BeforePrint ，是要怎麼做呢?我QuickRep 的 BeforePrint 下並無任何程式碼，所以你說的清空，不是很了解??可以說明一下嗎? 另外我是用 D3，不知你說的 TJSQRBuild 在 D3 上能用嗎?

引言: 感謝 jieshu 的回應，你說要清空 BeforePrint ，是要怎麼做呢?我QuickRep 的 BeforePrint 下並無任何程式碼，所以你說的清空，不是很了解??可以說明一下嗎? 另外我是用 D3，不知你說的 TJSQRBuild 在 D3 上能用嗎?

QuickReport在預覽時，執行了一次你加入TQRRichEdit的資料，真正列印時又加了一次，OK？SO UP ....QRRichEdit1.Lines.Clear; TJSQRBuild 僅在 Delphi5、6試過，其他的沒試過，請直接用Source Code安裝元件，看可不可以成功安裝，可以的話恭喜你，不行的話再自行修改Debug，再不行Post上來問吧！ TJSQRBuild (簡易報表建立元件) http://freehomepage.taconet.com.tw/This/is/taconet/top_hosts//jieshu/delphi.htm#JSQRBuild 經由元件屬性設定，可不用自己拖拉QuickReport元件，即可建立簡單的QuickReport報表，可在設計階段預覽。亦可將建立的報表存成 Delphi 的 Form (類似 QuickReport Wizard 所產生的程式)，再做複雜的設定使用，免除一一拖拉元件的困擾。