Mudanças entre as edições de "TPHXML"
| Linha 11: | Linha 11: | ||
ArqXML.Arquivo := XMLString; // String com o conteúdo XML | ArqXML.Arquivo := XMLString; // String com o conteúdo XML | ||
ArqXML.Executar; | ArqXML.Executar; | ||
| − | while ArqXML.ValorTag(1, 'det', '', I + 1, 'cProd') <> | + | while ArqXML.ValorTag(1, 'det', '', I + 1, 'cProd') <> EmptyStr do |
begin | begin | ||
V_CodProduto := ArqXML.ValorTag(1, 'det', '', I + 1, 'cProd'); | V_CodProduto := ArqXML.ValorTag(1, 'det', '', I + 1, 'cProd'); | ||
Edição das 11h57min de 11 de dezembro de 2020
Conceito
O objeto TPHXML pode ser utilizado para realizar a leitura de conteúdos em formato XML.
Exemplo
// O exemplo de leitura de códigos de produtos de XML de NF-e
ArqXML := NewPHXML;
try
ArqXML.Arquivo := XMLString; // String com o conteúdo XML
ArqXML.Executar;
while ArqXML.ValorTag(1, 'det', , I + 1, 'cProd') <> EmptyStr do
begin
V_CodProduto := ArqXML.ValorTag(1, 'det', , I + 1, 'cProd');
I := I + 1;
end;
finally
ArqXML.Free;
end;
