Ir para conteúdo
  • Cadastre-se

dev botao

ACBR Boleto não cria o PDF corretamente


  • Este tópico foi criado há 2451 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 para o comentário
Compartilhar em outros sites

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.