timesvrs.inc

通过indy datetime控件同步互联网时间服务器的小软件

const
  ATimeSvr: array[0..10] of record
    Host: String;
    Addr: String;
  end = (
    (Host: 'time.nist.gov'; Addr: '192.43.244.18';),
    (Host: 'nist1.datum.com'; Addr: '209.0.72.7';),
    (Host: 'time-a.nist.gov'; Addr: '129.6.15.28';),
    (Host: 'time-b.nist.gov'; Addr: '129.6.15.29';),
    (Host: 'time-nw.nist.gov'; Addr: '131.107.1.10';),
    (Host: 'time.windows.com'; Addr: '207.46.130.100';),
    (Host: 'utcnist.colorado.edu'; Addr: '128.138.140.44';),
    (Host: 'time-a.timefreq.bldrdoc.gov'; Addr: '132.163.4.101';),
    (Host: 'time-b.timefreq.bldrdoc.gov'; Addr: '132.163.4.102';),
    (Host: 'time-c.timefreq.bldrdoc.gov'; Addr: '132.163.4.103';),
    (Host: 'nist1.nyc.certifiedtime.com'; Addr: '208.184.49.129';)
  );