Delphi - Leer datos de un xml

 
Vista:

Leer datos de un xml

Publicado por gransasso (1 intervención) el 22/10/2009 11:56:16
Hola,
estoy intentando leer los datos almacenados en un fichero xml, el codigo es el siguiente:

procedure CargaXml(fichero: String; Var ePais, eCiudad, eDir: TEdit; Var rgRep: TRadioGroup);
var
pais : String;
ciudad : String;
direccion : String;
representacion : String;
mision: IXMLNode;
XML: IXMLDocument;
begin
XML.LoadFromFile(ExtractFilePath(Application.ExeName) + fichero);
XML.Active := True;
mision := XML.DocumentElement.ChildNodes[0];
pais := mision.ChildNodes['pais'].Text;
ciudad := mision.ChildNodes['ciudad'].Text;
direccion := mision.ChildNodes['direccion'].Text;
representacion := mision.ChildNodes['representacion'].Text;
end;

Estoy usando xmldom, XMLIntf, msxmldom y XMLDoc
Depurar lo depura bien, pero a la hora de cargar el archivo me da un error (XML.LoadFromFile).
No se si es que me falta algo, o hago algo mal. Espero que alguien pueda ayudarme.
Muchas gracias y un saludo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder