Fórum Xmaker

Boa noite.
Estou fazendo um pequeno cadastro de clientes onde após a inclusão de um registro (botão Salvar) preciso chamar o programa de impressão (sem aparecer a tela de diálogo e voltar para o cadastro de cliente para nova inclusão de cliente.

Já consegui fazer a inclusão e a impressão do relatório sem aparecer a tela de diálogo.

O problema é que após a impressão do relatório abre a tela de diálogo do relatório. Preciso que não abra a tela de diálogo e fecha o relatório automaticamente voltando para o programa de inclusão.

Segue abaixo as alterações nos programas:

Cadastro de Clientes (Frm_Cliente):
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Rel_001 (Relatório),

procedure TFormFrm_Cliente.BtnSalvarClick(Sender: TObject);
begin
//Chamar o Relatório
FormRel_001 := TFormRel_001.Create(Application);
Try
FormRel_001.Edit1.text := inttostr(TabGlobal.DCliente.Numero.Conteudo);// passagem do número do Cliente
FormRel_001.ShowModal;
Finally
FormRel_001.Free;
end;
end;


Relatório:
procedure TFormRel_001.FormShow(Sender: TObject);
begin
......
btnvisualizarclick(self); //Inabilita a tela de diálogo (seleção)
end;

Desde ja agradeço.

Daniel Montello Filho