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
Impressão de Relatório após inclusão de Registro
[phpBB Debug] PHP Warning: in file [ROOT]/vendor/twig/twig/lib/Twig/Extension/Core.php on line 1236: count(): Parameter must be an array or an object that implements Countable
Quem está online
Usuários navegando neste fórum: Nenhum usuário registrado e 6 visitantes