Envio De Faturas Por E-Mail Com Fast Report

[Gabriel Bonzanini]

Boa tarde pessoal.

 

Estou implementando uma rotina para envio de faturas comerciais em massa, por e-mail. Para tal, utilizo os componentes TACBrBoleto e TACBrBoletoFCFR.

 

Ao executar o procedimento TACBrBoleto.EnviarEmail, o componente mostra a tela de setup da exportação do PDF, o que não é de meu interesse. Reparei que existe a propriedade 'MostrarSetup', mas a finalidade dela parece estar restrita apenas ao diálogo de impressão, e não ao de exportação.

 

Debugando o programa, cheguei ao procedimento TACBrBoletoFCFR.Imprimir, no qual o TDataModule responsável pela impressão é criado em tempo de execução (DmBoleto). Isto impede qualquer alteração dos dados nele contidos fora do contexto do procedimento (no código do aplicativo):

procedure TACBrBoletoFCFR.Imprimir;
var
  DmBoleto: TdmACBrBoletoFCFR;
begin
  inherited Imprimir; // Verifica se a lista de boletos está vazia

  DmBoleto := TdmACBrBoletoFCFR.Create(Self);

...

Logo após, a propriedade 'MostrarSetup' é aplicada nas opções de impressão do report:

frxReport.PrintOptions.ShowDialog := MostrarSetup;

E, finalmente, o momento da exportação do arquivo:

frxPDFExport.FileName := NomeArquivo;

{Esta é a linha que está resolvendo o impasse, por enquanto}
DmBoleto.frxPDFExport.ShowDialog := MostrarSetup;

frxReport.Export(DmBoleto.frxPDFExport);

Gostaria de saber dos colegas se há alguma outra forma de contornar isto. Caso não haja, como proceder para aplicar esta solução no projeto? É interessante criar outra propriedade específica para este fim?

 

Desde já agradeço a atenção,

 

Gabriel.

[Gabriel Bonzanini]

Alguém?

[Juliomar Marchetti]

Chegou a alterar o componente colocando a informação para mostrar a caixa de dialogo na exportação com essa mesma variavel?

[Gabriel Bonzanini]

Chegou a alterar o componente colocando a informação para mostrar a caixa de dialogo na exportação com essa mesma variavel?

 

Primeiramente, obrigado pela atenção Juliomar.

 

Adicionando a linha mencionada, o componente se comporta conforme a necessidade. É a primeira vez que preciso alterar algum componente do ACBr, visto a qualidade do projeto, então não sei exatamente como proceder. Fico na dúvida se a solução é aceitável, pois é um reaproveitamento de uma property utilizada também para controlar a visibilidade do diálogo de impressão. De qualquer forma, não me importaria de implementar uma property específica para este fim, assim evitaria de ter que alterar o código fonte do componente toda vez que for atualizar o projeto.

 

Abraço,

 

Gabriel.

[Gabriel Bonzanini]

Alguém saberia dizer qual seria o passo correto a seguir para ter esta alteração implementada?

 

Obrigado.

[Juliomar Marchetti]

Você já tem ela implementada em seu código? anexe a unit com ela aqui 

[Gabriel Bonzanini]

As linhas adicionadas são 287 (PDF) e 295 (HTML).

 

Obrigado pela atenção.

ACBrBoletoFCFR.pas

ACBrBoletoFCFR.pas

[Juliomar Marchetti]

Favor conferir a alteração

At revision: 6388

 

Farei um refatoração para criar uma propriedade para essa opção em específico pois pode ocorrer divergências

[Gabriel Bonzanini]

Muito obrigado Juliomar. Parabéns pra toda a equipe de vocês, os componentes são fantásticos, facilitam o trabalho de muita gente.

 

Como faço pra marcar o tópico como resolvido? (Se houver necessidade, claro)

 

Abraço!

[Juliomar Marchetti]

no canto inferior direito a partir do segundo post aparece um botão resolvido

e só marcar

já fiz