Problemas com Quick Report e fechamento de formulários

Delphi

04/09/2003

Tenho um formulario que uso para impressão de relatorio.
Eu crio o relatorio da seguinte forma:
frmrrecibos := Tfrmrrecibos.create(self);

Neste formulario eu chamo um formulariod e preview personalizado
frmrecibo.QRP1.preview;

No meu relatorio que estou visualizando tem o seguinte:

procedure Tfrmrecibo.QRP1Preview(Sender: TObject);
begin
frmvisualizar.QrPreview1.qrPrinter :=TqrPrinter(Sender);
frmvisualizar.Show;
end;


O que esta acontecendo é que o formulario (frmrrecibos := Tfrmrrecibos.create(self);
) que uso para visualizar o meu relatorio não consegue fechar após fechar o formulario de vizualização.

Alguém já passou por isso ou sabe o porque deste problema que esta me acontecendo.


sds[]

Eugênio


José Ramos

José Ramos

Curtidas 0

Respostas

Delphox

Delphox

04/09/2003

8) Não sei se o que vou dizer vai te ajudar porém nunca deu erro:
crio um form onde jogo todos os relatorios lá e mudo a propriedade state dessa form para minimizade ,quando quero um relatorio faço o seguinte:
j:Tform_do_relatorio;
begin
j:=Tform_do_relatorio.create(application);
j.meu_relatorio.preview;
j.close;
end;
lógico,implementando tb codigo para acionar o acesso ao banco de dados


GOSTEI 0
Aristodemo

Aristodemo

04/09/2003

[i:66dc97fef2]no form close:[/i:66dc97fef2]
...QRPrinter.Cancel
[i:66dc97fef2]para evitar erro se a pessoa finalizar o form enquanto o relatorio é gerado.[/i:66dc97fef2]

Action := caFree;
[i:66dc97fef2]ou[/i:66dc97fef2]
frmrrecibos := nil;

Abraços...


GOSTEI 0
POSTAR