Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Actualizar la fecha del sistema via internet desde delphi. (https://www.clubdelphi.com/foros/showthread.php?t=86923)

Edwardfeliz 23-10-2014 18:32:14

Actualizar la fecha del sistema via internet desde delphi.
 
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] 24-10-2014 12:42:28

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á:

Código:

<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 24-10-2014 19:04:00

Cita:

Empezado por Neftali (Mensaje 483729)
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á:

Código:

<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] 24-10-2014 19:07:59

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 24-10-2014 19:17:34

Cita:

Empezado por Neftali (Mensaje 483766)
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?


La franja horaria es GMT +2. Ahora son las 12:50: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