Correção [ExibirSetup] Fast Report

[felipecaputo]

Estou implementado o boleto utilizando o FastReport e percebi que a configuração de não exibir o setup não funcionava. Caso ainda não tenha sido corrigida, segue abaixo a alteração no método imprimir do TACBrBoletoFCFR para não exibir o setup caso configurado:

          fiPDF:

          begin

            frxPDFExport.ShowDialog := MostrarSetup; //Adicionado

            frxPDFExport.FileName := NomeArquivo;

            frxReport.Export(DmBoleto.frxPDFExport);

          end;

          fiHTML:

          begin

            frxHTMLExport.ShowDialog := MostrarSetup; //Adicionado

            frxHTMLExport.FileName := NomeArquivo;

            frxReport.Export(DmBoleto.frxHTMLExport);

          end;

Parabéns a todos os desenvolvedores do ACBr boleto, o componente ficou ótimo!

[nazarenoneto]

Pessoal, eu apliquei as alterações feitas pelo filipe e adicionei também essa opção de não mostrar o setup na impressão, para ser impresso o boleto diretamente na impressora.

 

Segue em anexo o arquivo para possível merge.

As linhas linhas alterados foram as 220, 228 e 234

        
        case Filtro of
          fiNenhum:
          begin
             frxReport.PrintOptions.ShowDialog := MostrarSetup;
             if MostrarPreview then
                frxReport.ShowReport(False)
             else
                frxReport.Print;
          end;
          fiPDF:
          begin
             frxPDFExport.ShowDialog := MostrarSetup;
             frxPDFExport.FileName := NomeArquivo;
             frxReport.Export(DmBoleto.frxPDFExport);
          end;
          fiHTML:
          begin
             frxPDFExport.ShowDialog := MostrarSetup;
             frxHTMLExport.FileName := NomeArquivo;
             frxReport.Export(DmBoleto.frxHTMLExport);
          end;
        else
          exit;
        end;

ACBrBoletoFCFR.pas

ACBrBoletoFCFR.pas

Editado 9 Janeiro, 2013 por nazarenoneto

[Juliana Tamizou]

Boa noite Nazareno.

 

Alteração disponível no svn.

 

Att.

[nazarenoneto]

Vlw Juliana

[Wanderley Trevisan]

Juliana, 

 

Estou com um problema semelhante, quando dou o comando para exportar PDF, está aparecendo a tela de Diálogo do FastReport mesmo com as propriedades em False;

 

 

 ACBrBoleto1.ACBrBoletoFC.NomeArquivo := QBoletosNossoNumero.value+'.PDF';
 ACBrBoleto1.ACBrBoletoFC.MostrarPreview := false;
 ACBrBoleto1.ACBrBoletoFC.MostrarSetup := false;
 ACBrBoleto1.GerarPDF;

 

Eu gostaria que ele exportasse e abrisse direto o arquivo em PDF, a tela de Dialogo do Fast complica a minha operação.

 

Alguém já passou por este problema?

 

Atenciosamente,

 

Wanderley

[Wanderley Trevisan]

Juliana,

 

Atualizei meu ACBR pelo SVN hoje dia 05/03/2013 e recompilei os fontes e não vi as modificações acima sitadas pelos nossos colegas.

Apliquei os códigos postados acima e resolvi meu problema.

 

Atenciosamente,

 

Wanderley Trevisan

[Juliana Tamizou]

Boa tarde.

 

Me envie seu fonte corrigido, talvez algum outro ajuste tenha "quebrado" estes.

 

Att.

[guerreiro]

Pessoal estou com a mesma situação.

 

Trabalho com DATASNAP, com isso o PDF é gerado no servidor e enviado para o CLIENT, com isso não pode aparecer nada na impressão.

 

Alguma novidade?

[guerreiro]

Fiz atualização novamente e também não veio, porém as alterações indicadas no inicio funcionaram !!!

[guerreiro]

Aproveitando...coloquei o componente ACBRBoleto no meu servidor DATASNAP, porém quando mando GerarPDF simplesmente trava, sabem de algo?

[guerreiro]

Favor ignorem o post acima, foi erro de programador mesmo, está funcionando, só falta atualização conforme disse em 2 posts acima nos fontes originais.

[windsoft]

Atualizei meus fontes pelo SVN hoje 03/06/2013 e não encontrei as correções apresentadas acima.

 

Editado 3 Junho, 2013 por windsoft

[Gabriel.DutraVila]

Também atualizei ontem 27/06/2013 e não encontrei esta correção.

[Wanderley Trevisan]

Boa noite,

 

Realmente o problema persiste toda vez que atualizo o ACBR.