Mudanças entre as edições de "TPHRelatorio"

(Funções)
Linha 61: Linha 61:
  
 
===Funções===
 
===Funções===
*'''GerarPDF(var Stream:TMemoryStream):String:''' Realiza a geração do PDF do relatório e popula o Stream passada pelo parâmetro, e resulta no nome do relatório.
+
*'''GerarPDF(var Stream:TMemoryStream):String:''' Realiza a geração do PDF do relatório e popula o Stream passada pelo parâmetro, e resulta no nome do arquivo PDF.
  
 
===Exemplo===
 
===Exemplo===

Edição das 14h34min de 15 de dezembro de 2023

O objeto TPHRelatorio é utilizado para realizar a chamda de relatórios para visualização ou envio por e-mail.

Propriedades

Nome Tipo Descrição
Filtro String Texto SQL correspondente ao filtro. O texto será atribuido a variável padrão "Filtro" junto ao relatório.
FormatoID Integer Informar o número correspondente ao ID do formato do relatório. Tabela DB_RELATORIOFORMATOS.
NomeFormato String Quando informado o nome do formato, a propriedade "FormatoID" será preenchida com ID correspondente ao formato do relatório. Tabela DB_RELATORIOFORMATOS.
De String E-mail do responsável pelo envio.
Para String E-Mail do destinatário. Pode-se utilizar mais de um e-mail utilizando a separação por ';'.
CC String E-Mail de destinatário de cópia. Pode-se utilizar mais de um e-mail utilizando a separação por ';'.
CCO String E-Mail de destinatário de cópia oculta. Pode-se utilizar mais de um e-mail utilizando a separação por ';'.
AssuntoStr String Descrição do assunto do e-mail.
ExibirTelaEnvio Boolean Quando enviar, será exibida tela de envio de e-mail.
MostrarProcesso Boolean Caso estiver sendo utilizado objeto de exibição de processo, será exibido o procedimento que o e-mail esta executando (Obsoleta).

Procedimentos

  • SetCorpo(Corpo:String): Determina o texto utilizado no corpo do e-mail.
  • AddCorpo(Texto:String): Adicionar um texto em uma nova linha no corpo do e-mail.
  • AdicionarAnexo(Anexo:String): Informar o caminho do arquivo que será anexado no envio do e-mail.
  • EnviarEmail: Realiza o envio do e-mail.
  • Prever: Realizar o visualização do relatório.
  • Agendar Envio: Realiza o cadastro do e-mail junto ao cadastro de e-mails do sistema (DB_EMAIL). Nesse caso o envio vai ocorrer conforme determinado no agendamento de envio de e-mails.
  • VariavelDate(Nome: String; Value:TDateTime): Preencher variável do tipo data.
  • VariavelString(Nome:String; Value:String): Preencher variável do tipo texto.
  • VariavelInteger(Nome:String; Value:Integer): Preencher variável do tipo número.

Funções

  • GerarPDF(var Stream:TMemoryStream):String: Realiza a geração do PDF do relatório e popula o Stream passada pelo parâmetro, e resulta no nome do arquivo PDF.

Exemplo

 procedure EnviarRelatorio;
 var
   PHRel:TPHRelatorio;                                                 
 begin
   PHRel := NewPHRelatorio;
   try
     PHRel.IDFormato       := 151;
     PHRel.Filtro          := '1';
     PHRel.Para            := 'email@exemplo.com.br';
     PHRel.ExibirTelaEnvio := False;
     PHRel.MostrarProcesso := False;
     PHRel.VariavelDate('DateDATAINICIAL',Date-360);
     PHRel.VariavelDate('DateDATAFINAL',Date);        
     PHRel.EnviarEmail;                      
   finally
     PHRel.Free;                        
   end;            
 end;