No fim do Relatorio aparecer outro em seguida

Delphi

05/06/2003

Já que não dá p/ inserir em um arquivo dois relatorios, cada um com sua query, então eu fiz um relatorio em um form, e outro relatorio em outro form, agora só preciso fazer com que quando eu chamar um relatorio o outro imende nele saca

ex: se no relatorio um tem um titulo assim: ´RELATÓRIO DE VENDAS´ e no outro relatorio tem um titulo assim ´RELATORIO DE COMRAS´, eu quero que gere um relatorio assim:

´RELATÓRIO DE VENDAS´
´RELATORIO DE COMRAS´ esses dois em uma folha só intende...

Alguém pode me ajudar? obrigado... :wink:


Thoor Cobain

Thoor Cobain

Curtidas 0

Respostas

Lord_angel

Lord_angel

05/06/2003

Caro colega,

se voce estiver utilizando o QuickReport tem jeito sim, utilize o componente CompositeReport para unir os 2 em um só.

dessa maneira, imediatamente apos terminar o primeiro relatorio, o segundo vem na mesma folha, na sequencia, e isso vale para quantos relatorios voce quiser unir..

segue abaixo um exemplo:

procedure TfrmPrincipal.QRProvRIONUSAddReports(Sender: TObject);
begin

// adiciona os relatorios ao composite
with QRProvRIONUS.Reports do begin

// RI
Add(frmRI_ProtocoloRELProv.QuickRep1);
// Onus
Add(frmRI_OnusRELProv.QuickRep1);

end;

end;


GOSTEI 0
POSTAR