Sincronizar hora en Delphi.

[alfredosg19]

Hola a todos!!, hace días que busco la manera de sincronizar la hora de un servidor en internet (mediante servidor ntp) y que éste le de la hora a toda la red. El problema es como sincronizar el servidor al servidor ntp. ¿Alguien me podría ayudar?. He estado buscando referencias a este tema en el foro y no he encontrado nada al respecto.

Muchas gracias.

[basti]

Las Indy tienen un componente que se llama idSNTP, que se puede conectar a un servidor de hora de internet.

En Host tienes que poner uno de los que aparecen en esta lista (http://ntp.isc.org/bin/view/Servers/NTPPoolServers) (escoje el que más te convenga).

Después en el código

idSNTP1.Active := True;
label1.Caption := DateTimeToStr(idSNTP1.DateTime);
idSNTP1.Active := False;