X
xhzhousw
Unregistered / Unconfirmed
GUEST, unregistred user!
我新建一个工程有Form1,form2,form3和form4,在Form1上放了button1,QRCompositeReport1。
我想打印这三张报表。
在Form1上的代码如下
procedure TForm1.QRCompositeReport1AddReports(Sender: TObject);
begin
with QRCompositeReport1do
begin
reports.Add(form2.QuickRep1);
reports.Add(form3.QuickRep1);
reports.Add(form4.QuickRep1);
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
QRCompositeReport1.Preview;
end;
注:其它三个Form上各用与数据库记录字段相对应的 TQrLabel 排成三个不同的报表。
执行程序预览时只看到重叠的一个报表,form4.QuickRep1的最上面。
请问这是怎么回事?怎样解决?
谢谢!!!
我想打印这三张报表。
在Form1上的代码如下
procedure TForm1.QRCompositeReport1AddReports(Sender: TObject);
begin
with QRCompositeReport1do
begin
reports.Add(form2.QuickRep1);
reports.Add(form3.QuickRep1);
reports.Add(form4.QuickRep1);
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
QRCompositeReport1.Preview;
end;
注:其它三个Form上各用与数据库记录字段相对应的 TQrLabel 排成三个不同的报表。
执行程序预览时只看到重叠的一个报表,form4.QuickRep1的最上面。
请问这是怎么回事?怎样解决?
谢谢!!!