duvida ao pegar dados xml

[MICHELI_MARTINS]

Boa tarde pessoal.

Preciso pegar dados da tag retorno infprot, porém não estou conseguindo.

Segue o codigo:

nodepai:= vXMLDoc.DocumentElement.childNodes.FindNode('soap:Body'); //aqui ele encontra.

NodePai.ChildNodes.First;

repeat

nodepai.NextSibling;

until

nodepai = NodePai.ChildNodes['infProt'];

Como fazer para parar nessa tag infprot?

Tentei pegar dessa forma abaixo e tb não consigo:

nodepai:= wxmlpro.DocumentElement.ChildNodes.FindNode('soap:Body');

NodeSec:= NodePai.ChildNodes.FindNode('nfeConsultaNF2Result');

NodeSec:= nodesec.ChildNodes.FindNode('retConsSitNFe');

NodeSec:= nodesec.ChildNodes.FindNode('protNFe');

NodeSec:= nodesec.ChildNodes.FindNode('infProt');

wtipamb := NodeSec.childnodes['tpamb'].text;

wverapl := NodeSec.childnodes['verAplic'].text;

wchanfe := NodeSec.childnodes['chNFe'].text;

wdatrec := NodeSec.childnodes['dhRecbto'].text;

wnumpro := NodeSec.childnodes['nProt'].text;

wdigval := NodeSec.childnodes['digVal'].text;

wstatus := NodeSec.childnodes['cStat'].text;

wmotivo := NodeSec.childnodes['xMotivo'].text;

Editado Outubro 16, 2013 por MICHELI_MARTINS

[Jhonas]

veja com calma esse link, vai encontrar a solução

http://www.caiooliveira.com.br/wp-content/plugins/ajaxcomment/getcomments.php?id=73&s=0&n=10000

abraço