ACBR Boleto não cria o PDF corretamente

[Hudson Fernando Tiburcio]

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

 

 

 

 

[José M. S. Junior]

Bom dia

Qual erro está retornando? Chegou a gerar o primeiro Boleto em PDF, ou não gera nenhum?