recorrer XML con IXMLnode
 

Hola de nuevo,
necesito crear un bucle para leer un archivo xml pero no lo consigo. La estructura tendria un esqueleto similar a:

necesito crear un bucle para obtener el id de cada artículo pero no lo consigo, tampoco vi ningún hilo que me ayudara. Supongo que no es difícil pero llevo demasiado tiempo perdido en este tema.

Trabajo con los componentes TXMLDocument y IXMLNode:

Código Delphi [-]
 XMLDoc.LoadFromFile(nomfile);
 XMLDoc.Active   := true;
 XMLDoc.Version  := '1.0';
 
with XMLDoc.DocumentElement do
    begin
        nodoRaiz := ChildNodes.FindNode('articulos');
        nodoRaiz.ChildNodes.First;
        for x:= 1 to (nodoRaiz.ChildNodes.Count) do
              begin
                   node2 := nodoRaiz.ChildNodes.FindNode('articulo');
                   xxx   := node2.Attributes['id'];
                   showmessage(' articulo  : ' + xxx );

                   nodoRaiz := nodoRaiz.ChildNodes.NextSibling;
               end;
     end;

gracias

Hola de nuevo,

he estado buscando de nuevo por los foros de la web y he visto que no soy el único que se ha encontrado con este problema. ¿Hay alguna solución posible?