Erro Nf De Produtor Rural Referenciada

[tiautomacao]

Boa tarde a todos, estou com o seguinte problema:

 

Ao tentar setar os dados de uma nota fiscal de produtor rural referenciada

 

Ide.refNFP.cUF := 31; estou recebendo uma acess violation. Verifcando os fontes

do componente percebi que o objeto "refNFP" da classe TIde não esta sendo instanciado.

 

fiz a seguinte alteração: 

 

No construtor da classe TIde adicionei a linha em destaque.

 

constructor TIde.Create(AOwner: TNFe);

begin

  inherited Create;

  FrefNFP := TRefNFP.Create;

  FNFref  := TNFrefCollection.Create(Self);

end;

 

E no destructor da mesma classe adicionei a seguinte linha:

 

destructor TIde.Destroy;

begin

  FNFref.Free;

  FrefNFP.Free;

  inherited;

end;

 

Detalhe:

 

Percebi que a linha que foi adicionada por mim esta no bloco abaixo

 

constructor TNFrefCollectionItem.Create;

begin

  FRefNF := TRefNF.Create;

  FRefNFP := TRefNFP.Create;

  FRefECF := TRefECF.Create;

end;

 

Porém parece que o mesmo não está sendo chamado ao enviar uma nfe.

 

Gostaria da opinião de vocês se o procedimento esta correto.

 

Grato pela atenção.