Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-01-2020
cocute cocute is offline
Miembro
 
Registrado: nov 2008
Posts: 403
Poder: 16
cocute Va por buen camino
Leer valores XML

Hola han cambiado el formato del xml que necesito leer y no doy como leerlo:
Cita:
<?xml version="1.0" encoding="ISO-8859-1"?>
<observations xmlns="">
<observations>
<observations>
<stationID>IALMUDIDI</stationID>
<obsTimeUtc>2020-01-09T09:40:24Z</obsTimeUtc>
<obsTimeLocal>2020-01-09 10:40:24</obsTimeLocal>
<neighborhood>Abalate</neighborhood>
<softwareType>EasyWeatherV1.4.5</softwareType>
<country>ES</country>
<solarRadiation>91.13</solarRadiation>
<lon>-0.58356375</lon>
<epoch>1578562824</epoch>
<lat>42.04382324</lat>
<uv>1</uv>
<winddir>213</winddir>
<humidity>99</humidity>
<qcStatus>-1</qcStatus>
<metric>
<temp>-0.3888888888888885</temp>
<heatIndex>-0.3888888888888885</heatIndex>
<dewpt>-0.6111111111111119</dewpt>
<windChill>-0.3888888888888885</windChill>
<windSpeed>0</windSpeed>
<windGust>0</windGust>
<pressure>1020.522068496</pressure>
<precipRate>0</precipRate>
<precipTotal>0</precipTotal>
<elev>437.08320000000003</elev>
</metric>
</observations>
</observations>
</observations>
Alguien me puede decir como leo por ejemlo el valor neighborhood y el valor temp ?

tengo algo así pero se me ha olvidado como me muevo por los distintos nodos y demás y no doy
Código Delphi [-]

 try

XmlContent := GetContent('enlace del xml')
  except
    on E: Exception do
    begin
      Exit;
    end;
  end;

  if (not XmlContent.IsEmpty()) then
  begin
    XMLDoc.LoadFromXML(XmlContent);


begin

 StartItemNode := XMLDoc.DocumentElement.ChildNodes.FindNode('observations');
 label3.Text:=StartItemNode.childNodes['neighborhood'].Text;


 StartItemNode := XMLDoc.DocumentElement.ChildNodes.FindNode('metric');
  StartItemNode := XMLDoc.DocumentElement.ChildNodes.FindNode('temp') ;
 label1.Text:=  StartItemNode.Text+'ºC';



muuuchas gracias
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como leer valores Binarios del Registro JoAnCa OOP 5 09-09-2015 23:08:20
Leer valores hexadecimales del registro Feñiz OOP 1 28-01-2015 02:11:46
VALORES FANTASMAS FIREBIRD 2.1 valores Grandes ASAPLTDA Firebird e Interbase 17 02-12-2012 12:09:02
Driver dbExpress para db2 falla al leer valores BCD de campos DECIMAL rolandoj Conexión con bases de datos 9 10-08-2010 16:44:51
Leer arreglo de valores __hector PHP 2 12-12-2003 17:14:56


La franja horaria es GMT +2. Ahora son las 19:22:21.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi