Access Violation ao utilizar o assign da classe TNfe

[Antonio Brandão]

Bom dia, ao utilizar o método assign do TNfe e destruir o objeto de origem, notei a ocorrência de AV, olhando o código detectei que algumas propriedades do tipo objeto estavam sendo atribuídas diretamente sem o uso do assign ocasionando assim o AV, fiz as correções e testei, vou esta disponibilizando o código para caso haja interesse em colocar no repositório, obrigado.

Exemplo:

var 
  NFe1: TNFe;
  Nfe2: TNfe;
begin
  Nfe1 := TNfe.Create();
  Nfe2 := TNfe.Create();
  Nfe2.Assign(Nfe1);
  Nfe1.Free;
  Nfe2.Det[0].DFeReferenciado;
end;

 

ACBrNFe.Classes.pas

[antonio.carlos]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn - #TK-7317

[Daniel Simoes]

@EMBarbosa, me ajuda com essa validação ?

 

[EMBarbosa]

Em 10/07/2025 at 15:31, Daniel Simoes disse:

@EMBarbosa, me ajuda com essa validação ?

Claro.

Em 09/07/2025 at 12:07, Antonio Brandão disse:

Bom dia, ao utilizar o método assign do TNfe e destruir o objeto de origem, notei a ocorrência de AV,

Muito obrigado.

Subi suas alterações para o SVN na Revisão  40255.
Pelo que vi está tudo certo.
Favor testar e reportar qualquer problema.
Mais uma vez, Obrigado.