Delphi7中QuickRep報表的分欄,分列打印.

因爲維護舊程序的原因,有時還用到Delphi7自帶的QR報表,要設計的報表作如下方式打印:

Line 1 record #1  | record #2
Line 2 record #3  | record #4
Line 3 record #5  | record #6
Line 4 record #7  | record #8
Line 5 record #9  | record #10 

<一>、如果在QR的page-->columns設置爲4列,則出現下面的報表

qr的分欄效果(report setting中設置）是

Line 1 record #1  | record #6
Line 2 record #2  | record #7
Line 3 record #3  | record #8
Line 4 record #4  | record #9
Line 5 record #5  | record #10

<二>不用<一>的設置方法,用以下方法就可以實現:

請不要將報表分欄， 假若要打印的欄位爲三欄
Column#1 Column#2 Column#3
要打印的報表爲

                    Report Title
                   ==============

Column#1 Column#2 Column#3  Column#1 Column#2 Column#3
==========================  ==========================
QRText1    QRText2     QRText3      QRText4     QRText5    QRText6

注意控件的建立順序，可用View as text查看!
在QRDBText4之OnPrint事件中寫下下面代碼即可,注意是QRText4的OnPrint:
....
DataSet.Next;  

......