Ver Mensaje Individual
  #2  
Antiguo 26-04-2008
SMTZ SMTZ is offline
Miembro
 
Registrado: nov 2003
Posts: 225
Reputación: 21
SMTZ Va por buen camino
Solucionado

Hola, he conseguido sacar un valor que quería. Adjunto ejemplo:

Código:
Procedure ReadConfig;
Var
   XMLDoc : XMLDocument;
   Lista  : XMLNodeList;
   Campos : XMLNode;
Begin

   XMLDoc := XMLDocument.Create;
   XMLDoc.Load ( 'config.xml' );

   WriteLn ( XMLDoc.GetElementsByTagName ('Puerto')[0].ChildNodes[0].Value );
   XMLDoc.Free;


End;
Fichero config.xml (de prueba):

Código:
<Red>
   <Puerto>26983</Puerto>
</Red>
Responder Con Cita