在德尔福获取网络时间

Question

我想从互联网上获取时间和日期

我使用以下代码

IdDayTime1.ReadTimeout := 5000;
IdDayTime1.Host := 'www.time.windows.com';
IdDayTime1.Port := 37     ;
Label1.Caption := IdDayTime1.DayTimeStr;

但我得到:套接字错误#11004

什么是这个,我做错了什么

我的互联网和其他东西都还可以

Answer 1

DayTime协议不是 NTP协议.DayTime使用端口13,而不是 37.3 时间协议使用37,而不是使用123(UDP)的NTP协议.我不知道time.windows.com是否支持 DayTime和 Time协议,目前从可靠的时间源获取时间的最常用的协议是 NTP,以及更简单的兄弟SNTP,它取代了DayTime和Time协议.