Leo Cavazzola

Cara, resolveu meu problema, muito obrigado!

Testei dessa maneira, o lazarus da que o item está fora do intervalo, segue abaixo mensagem de erro. O que eu já esperava já que quando eu dei o comando .ADD ele criou um item no vetor com índice 0 e com i incrementado antes do código o software está tentando alimentar o item de Índice seguinte ao criado. Olhei por muitas horas inclusive, mas como sou novo na área da programação e o código do exemplo em lazarus é complexo eu não consegui encontrar nada referente a alimentação dos produtos no compontente ACBrNFe.

Boa Noite Estou tentando criar o arquivo Xml de uma Nota fiscal, mas na tag det nItem fica com zero para todo os produtos como vocês podem observar na imagem. A Parte do código que estou usando para gerar: i:=0; while i<ZQItens.RecordCount do begin ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Add; ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Items[i].Prod.cProd:='456'; i:=i+1; end;