دریافت ساعت و تاریخ از سرور

host: time.windows.com

Label1.Caption := DateToStr(IdSNTP1.DateTime)
   + ' - ' + TimeToStr(IdSNTP1.DateTime);
Label2.Caption := IdSNTP1.Host;

get server time date delphi