Invalid Pointer Operation - Acbrboleto

[CMConsultoria2012]

Bom dia

faço a seguinte construção:

 

      for i := 0 to Pred(ACBrBoleto1.ListadeBoletos.Count) do

      begin

       ACBrBoleto2.ListadeBoletos.Clear;

       ACBrBoleto2.ListadeBoletos.Add(ACBrBoleto1.ListadeBoletos.Objects);

 

       ACBrBoletoFCFR2.NomeArquivo := SqlPesquisaConfigBoletoGEMTOnline.FieldByName('CONFIG_PATH_GERARPDF').AsString+'\'+ACBrBoleto1.ListadeBoletos.Objects.NumeroDocumento+'.pdf';

       ACBrBoleto2.GerarPDF;

      end;

 

 

foi a forma mais simples que encontrei para fazer!!!!!!

E ao fechar form tenho invalid pointer operation, como eu poderia tratar isso?

[Eptus]

Bom dia,

 

Você conseguiu resolver este problema ? estou com o mesmo erro, mas não encontrei solução nos foruns...

 

Pela atenção, obrigado

[Juliana Tamizou]

Bom dia.

 

Este não parece ser um erro causado pelo componente, visto que o próprio demo faz algo semelhante...vc chegou a  testar o demo?

 

Att.

[Rafael Dias]

Erro simples a lista de boletos é uma lista de ponteiro de objetos encadeados.

Quando você coloca o boleto 1 do componente 1 no componente 2 e logo em seguida da clear o componente 2 da free no boleto 1 ai quando o componente 1 vai lá no ponteiro checar onde esta o próximo o mesmo não existe.

[joaolenosi]

Resolve na gambiarra, coloca dentro do try rs.

  try

  except

  end;

[jslima]

boa tarde, não sei se pode ajudar algém... eu estava tendo Invalid Point Operation, sempre que gerava uma remessa e depois precisava fazer outra já na sequencia, entao a lista de titulos estava com dados e precisava limpar, eu usava ACBrBoleto1.ListadeBoletos.Clear; na variavel fmensagem.Free ocorria o erro, então no ACBrBoleto adicionei as linhas em negrito.

Aqui resolveu,

Abraço a todos.

destructor TACBrTitulo.Destroy;
begin
   fMensagem := nil;
   fSacado := nil;
   fInformativo := nil;
   fLiquidacao := nil;
   fInstrucoes := nil;
   fOcorrenciaOriginal := nil;
   fMotivoRejeicaoComando := nil;
   fDescricaoMotivoRejeicaoComando := nil;

   fMensagem.Free;
   fSacado.Free;
   fInformativo.Free;
   fLiquidacao.Free;
   fInstrucoes.Free;
   fOcorrenciaOriginal.Free;
   fMotivoRejeicaoComando.Free;
   fDescricaoMotivoRejeicaoComando.Free;

   inherited;
end;

[Juliana Tamizou]

Boa tarde.

Acabei de realizar alguns testes gerando várias remessas seguidas e o problema citado não ocorreu, verifique se você está com seus fontes atualizados e se é possível reproduzir a mesma situação no demo.

Att.