我用idtime取网页时间出错，请求帮助！

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
  IdTime1.Host :='http://www.baidu.com';   // 时间同步服务器
  //IdTime1.Port := 37;
  //IdTime1.SyncTime;
  Label2.Caption := '网络时间：' + DatetimeToStr(IdTime1.DateTime);
  Label1.Caption := '系统时间：' + DatetimeToStr(now);
end;
提示socket eror #1104

Answer 1

百度屏蔽了INDY 的 user agent, 修改为别的。否则永远都是 Socket error #11004