Luiz Eduardo Gdfhg

Solução: ACBrBoleto1.ListadeBoletos.Clear;

Bom dia, Tenho alguns boletos PDF de cobrança antigos e estou precisando gerar novos boletos PDF com o ACBrBoletoFCFR em um laço de interação FOR e preciso fazer a seguinte forma: 1º Extrair alguns dados do boleto antigo 2º Pegar esses dados extraídos anteriormente, montar o novo boleto com novos dados e mantendo alguns dados antigos ( como Nome do Sacado, Valor do Documento por exemplo ). Meu problema é que após o primeiro boleto gerado, o próximo boleto vem com 1 cópia a + incluindo dados do boleto anterior ( do primeiro ) na primeira cópia mostrada no Adobe PDF Reader e só na segunda cópia mostrada ( pode ser vista descendo a barra de rolagem do Adobe PDF Reader ) é que vem da forma como deveria ser. Então gostaria de saber como gerar apenas uma cópia para cada boleto sem pegar os mesmos dados do boleto anterior? Vou deixar um Pastebin AQUI com a parte mais relevante do código para o objetivo em questão. E em anexo estão 2 boletos pdf gerados, como falei, o primeiro é gerado corretamente e o segundo é gerado de forma incorreta. Qualquer sugestão aqui será bem vinda. Boletos.rar

Fenix, o problema era que ontem eu havia instalado o Delphi 7 para trabalhar em um outro projeto feito em tal IDE, lembrei que antes de instalar o D7, estava funcionando corretamente como havia dito acima e você pôde comprovar no teste, agora que desistalei o D7, voltou a funcionar!! Muito obrigado pela ajuda sobretudo pelo teste do meu exemplo que fiz. Juliomar, muito obrigado também kra!

Fenix, já uso a versão 2 do ACBr, mas de qualquer forma, vou reinstalar novamente.

Caros, segue abaixo o meu projeto de teste, feito por mim mesmo. Estava funcionando bem, não fiz nenhuma alteração, já quando fui ver hoje, aconteceu este problema. Projeto de exemplo

Bom dia, Alguém por favor, poderia me dar alguma dica para solução desse erro? Erro ao gerar boleto PDF Agradeço por qualquer dica aqui apresentada.

Já resolvi, com a dica do Juliomar. Vlw kra!

Juliomar, entre as opções não há ACBrBoletoFC como falei anteriormente. Eu preciso deste componente.

Boa tarde caros amigos, sou novato no uso do ACBrBoleto. Um amigo me passou um exemplo de projeto usado para gerar boletos feito a uns anos atrás por algum programador o qual não nos recordamos para dármos os devidos créditos. Estando em posse de tal projeto, recentemente venho estudando a fundo sobre o ACBrBoleto ( códigos, instalação do ACBr etc ). Vi aqui que este projeto faz referência ao componente ACBrBoletoFC, o qual não estou conseguindo encontrar na versão atual do ACBr ou até mesmo o componente em separado para instalar no meu Delphi XE5. Eis aqui os trechos do código que fazem menção ao referido componente acima: type TForm1 = class(TForm) Boleto: TACBrBoleto; end; procedure TForm1.Button2Click(Sender: TObject); begin Boleto.ACBrBoletoFC.NomeArquivo := 'Boleto.fr3'; Boleto.ACBrBoletoFC.LayOut := TACBrBolLayOut( 0 ); try Boleto.GerarPDF; except // end; end; Dessa forma, na unit principal do componente ACBrBoleto no procedimento de GerarPDF causa a exeção informando a ausência do ACBrBoletoFC como mostro abaixo: procedure TACBrBoleto.GerarPDF; begin if not Assigned(ACBrBoletoFC) then raise Exception.Create( ACBrStr('Nenhum componente "ACBrBoletoFC" associado' ) ) ; ChecarDadosObrigatorios; ACBrBoletoFC.GerarPDF; end; Então venho aqui saber de vocês onde posso encontrar esse aparente depreciado componente ACBrBoletoFC, ou se em caso de não mais existir tal componente, alguém me indicar ( inclusive com exemplo de código ) alguma outra solução similar para geração do boleto. Agradeço a atenção de todos para com a minha questão aqui formulada. Aguardo retorno.

Boa tarde caros amigos, sou novato no uso do ACBrBoleto. Um amigo me passou um exemplo de projeto usado para gerar boletos feito a uns anos atrás por algum programador o qual não nos recordamos para dármos os devidos créditos. Estando em posse de tal projeto, recentemente venho estudando a fundo sobre o ACBrBoleto ( códigos, instalação do ACBr etc ). Vi aqui que este projeto faz referência ao componente ACBrBoletoFC, o qual não estou conseguindo encontrar na versão atual do ACBr ou até mesmo o componente em separado para instalar no meu Delphi XE5. Eis aqui os trechos do código que fazem menção ao referido componente acima: type TForm1 = class(TForm) Boleto: TACBrBoleto; end; procedure TForm1.Button2Click(Sender: TObject); begin Boleto.ACBrBoletoFC.NomeArquivo := 'Boleto.fr3'; Boleto.ACBrBoletoFC.LayOut := TACBrBolLayOut( 0 ); try Boleto.GerarPDF; except // end; end; Dessa forma, na unit principal do componente ACBrBoleto no procedimento de GerarPDF causa a exeção informando a ausência do ACBrBoletoFC como mostro abaixo: procedure TACBrBoleto.GerarPDF; begin if not Assigned(ACBrBoletoFC) then raise Exception.Create( ACBrStr('Nenhum componente "ACBrBoletoFC" associado' ) ) ; ChecarDadosObrigatorios; ACBrBoletoFC.GerarPDF; end; Então venho aqui saber de vocês onde posso encontrar esse aparente depreciado componente ACBrBoletoFC, ou se em caso de não mais existir tal componente, alguém me indicar ( com exemplo de código ) alguma outra solução similar para geração do boleto. Agradeço a atenção de todos para com a minha questão aqui formulada. Aguardo retorno.