Fast Report - Fechar um Relatório
Boa tarde,
sou novo na área da programação, e o seguinte tenho o seguinte formulário quando faço a chamada do mesmo que não há dados o mesmo exibir a seguinte mensagem.
Gostaria que depois que eu clicar no "OK" o formulário fechasse segue abaixo meu código.
procedure Page1OnAfterPrint(Sender: TfrxComponent);
begin
if frdsMatriculaGeralMunicipioEscolaQTD.recordcount = 0 then
showmessage('Não há dados para este relatório.');
end;
begin
end.
sou novo na área da programação, e o seguinte tenho o seguinte formulário quando faço a chamada do mesmo que não há dados o mesmo exibir a seguinte mensagem.
Gostaria que depois que eu clicar no "OK" o formulário fechasse segue abaixo meu código.
procedure Page1OnAfterPrint(Sender: TfrxComponent);
begin
if frdsMatriculaGeralMunicipioEscolaQTD.recordcount = 0 then
showmessage('Não há dados para este relatório.');
end;
begin
end.
Wesley Melo
Curtidas 0
Respostas
Dirceu Morais
02/10/2017
Wesley,
Não seria melhor você não abrir o formulário se não tiver informação?
Mais ou menos assim:
Não seria melhor você não abrir o formulário se não tiver informação?
Mais ou menos assim:
if cdsMatriculaGeralMunicipioEscolaQTD.recordcount = 0 then
showmessage('Não há dados para este relatório.');
Else
Begin
frxImpressao.LoadFromFile(Caminho + '\\Meu_Formulario.fr3');
frxImpressao.SHOWREPORT;
end;
GOSTEI 0