Fastreport relatorio com dois forms

Fórum sobre ferramentas de apoio à programação (Clipper/[x]Harbour)

Moderador: Moderadores

Avatar do usuário
rubens
Colaborador
Colaborador
Mensagens: 1520
Registrado em: 16 Ago 2003 09:05
Localização: Nova Xavantina - MT

Fastreport relatorio com dois forms

Mensagem por rubens »

Boa noite...

Alguém que usa fastreport pode me dar uma ajuda?
Preciso imprimir em um mesmo relatório com dois ou mais forms (fr3).
Alguém sabe como fazer?
Achei que fosse com o :Newpage() mas quando executa este método da erro no Windows..
Como estou tentando:
FrPrn:= frReportManager():new()
FrPrn:LoadFromFile(cRelat+'Teste1.Fr3')
FrPrn:NewPage()
FrPrn:LoadFromFile(cRelat+'Teste2.Fr3')
FrPrn:PrepareReport()
FrPrn:DesignReport()
FrPrn:DestroyFR()
Obrigado...
Rubens
"Eu e minha casa servimos ao Senhor e você ???"
Avatar do usuário
rubens
Colaborador
Colaborador
Mensagens: 1520
Registrado em: 16 Ago 2003 09:05
Localização: Nova Xavantina - MT

Fastreport relatorio com dois forms

Mensagem por rubens »

Bom dia..

Resolvido...
FrPrn:= frReportManager():new()
FrPrn:LoadFromFile(cRelat+'Teste1.Fr3')
FrPrn:PrepareReport()
FrPrn:LoadFromFile(cRelat+'Teste2.Fr3')
FrPrn:PrepareReport(FR_NOTCLEARLASTREPORT)
FrPrn:ShowPreparedReport()
FrPrn:DestroyFR()
O FrPrn:PrepareReport(FR_NOTCLEARLASTREPORT) evita que o relatório anterior seja destruído/limpo e tem que trocar FrPrn:ShowReport() por FrPrn:ShowPreparedReport().

Rubens
"Eu e minha casa servimos ao Senhor e você ???"
Responder