Qrcompositereport

Olá pessoal,

Alguém sabe me explicar porque sai somente um relatório no Qrcomposite sendo que envio 2 relatórios?


Segue rotina do botão imprimir.

procedure Tfrmtermo.SpeedButton1Click(Sender: TObject);
begin
if frmrelabertura = nil then
frmrelabertura:=tfrmrelabertura.create(self);
if frmrelencerramento = nil then
frmrelencerramento:=tfrmrelencerramento.create(self);
qrcompositereport1.Prepare;
qrcompositereport1.Preview;
end;


procedure Tfrmtermo.QRCompositeReport1AddReports(Sender: TObject);
begin
qrcompositereport1.Reports.Add(frmrelabertura.QuickRep1);
qrcompositereport1.Reports.Add(frmrelencerramento.QuickRep1);
end;


Quem puder ajudar agradeço.

Abraço todos

Ricardo