Actualizar la fecha del sistema via internet desde delphi.

[Edwardfeliz]

Saludos, como están amigos,
El titulo del tema lo dice todo, buscando por ahí vi este procedimiento:

Código Delphi [-]
var
MyNewTime: _SYSTEMTIME;
begin
// primero llenamos la estructura
with MyNewTime do
begin
wYear := 2004; // año
wMonth := 8; // agosto
wDayOfWeek := 5; // jueves
wDay := 19; // día del mes
wHour := 01; // hora
wMinute := 55; // minutos
wSecond := 00; // segundos
wMilliseconds:= 00; // milisegundos
end;
// luego la aplicamos
SetSystemTime(MyNewTime);

pero esto es para hacerlo de forma manual, como lo hacemos para llamar la función del sistema operativo para actualizar la hora y fecha vía Internet, que esa opción esta disponible en la pestaña de hora de Internet.

Gracias

[Neftali [Germán.Estévez]]

Puedes usar alguno de los webServices que hay por internet para obtener la fecha y hora.

Por ejemplo, en EarthTools tienes uno que te la devuelve al pasar la Longitud y Latitud de una ciudad.
Para Barcelona llamas a: http://www.earthtools.org/timezone/41.387128/2.16856499

Y te devolverá:

<timezone xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
xsi:noNamespaceSchemaLocation="http://www.earthtools.org/timezone.xsd">
<version>1.0</version>
<location>
<latitude>41.387128</latitude>
<longitude>2.16856499</longitude>
</location>
<offset>1</offset>
<suffix>A</suffix>
<localtime>24 Oct 2014 12:34:14</localtime>
<isotime>2014-10-24 12:34:14 +0100</isotime>
<utctime>2014-10-24 10:34:14</utctime>
<dst>True</dst>
</timezone>

[Edwardfeliz]

Empezado por Neftali

Puedes usar alguno de los webServices que hay por internet para obtener la fecha y hora.

Por ejemplo, en EarthTools tienes uno que te la devuelve al pasar la Longitud y Latitud de una ciudad.
Para Barcelona llamas a: http://www.earthtools.org/timezone/41.387128/2.16856499

Y te devolverá:

<timezone xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
xsi:noNamespaceSchemaLocation="http://www.earthtools.org/timezone.xsd">
<version>1.0</version>
<location>
<latitude>41.387128</latitude>
<longitude>2.16856499</longitude>
</location>
<offset>1</offset>
<suffix>A</suffix>
<localtime>24 Oct 2014 12:34:14</localtime>
<isotime>2014-10-24 12:34:14 +0100</isotime>
<utctime>2014-10-24 10:34:14</utctime>
<dst>True</dst>
</timezone>

El asunto es, que quiero actualizar la fecha del sistema, ya no me interesaría ponerla en el programa.

[Neftali [Germán.Estévez]]

Con lo que yo te he puesto la obtienes de internet y con el código que tú has puesto modificas la del sistema.

[Edwardfeliz]

Empezado por Neftali

Con lo que yo te he puesto la obtienes de internet y con el código que tú has puesto modificas la del sistema.

El complemento me permitira extraer los datos por individual en los diferentes edits?