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 (escoje el que más te convenga).
Después en el código
Código Delphi
[-]
idSNTP1.Active := True;
label1.Caption := DateTimeToStr(idSNTP1.DateTime);
idSNTP1.Active := False;