Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

ACBR Boleto não cria o PDF corretamente


  • Este tópico foi criado há 1771 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa Noite

Estou com o seguinte problema, quando crio apenas um PDF o ACBRBoleto gera o PDF e funciona, quando gero vários em um Loop e limpo  a

quantidade de titulos, ( Quero gerar 1 a 1 ) dá erro na estrutura do PDF. ( Na impressão funciona legal )

Alguem sabe como corrigir ?

Codigo abaixo

inicio do LOOP


       Titulo := AcbrBoleto.CriarTituloNaLista;
       PreparaBoleto( Titulo );

       if ckGeraPdf.Checked then
       begin
          ACBrBoletoFCFR1.dmBoleto.frxPDFExport.ShowDialog := False;
          ACBrBoletoFCFR1.NomeArquivo := Trim(edPasta.Text) + '\Boleto-'+ FormatFloat('000',ACBrBoleto.Banco.Numero)+'-'+RemoveChars( '/;:,\.<>|*!',Trim( ListaNome.asString ))+'-'+RemoveChars('/;:,\.<>|*!',Trim( ListaTitulo.AsString ))+'.pdf';
          ACBrBoleto.GerarPDF;
       end else begin
         ACBrBoletoFCFR1.MostrarPreview := False;
         ACBrBoleto.Imprimir;
       end;
   

       // gravando no Banco       

AcbrBoleto.ListadeBoletos.Clear; 

FIM do loop

 

Obrigado

Hudson

 

 

 

 

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.