如何实现网上时间校正,就就象WINDOWSXP的internettime一样的功能?(50分)

  • 主题发起人 主题发起人 TanXin
  • 开始时间 开始时间
T

TanXin

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在程序中实现网上在限制校正系统时间?
 
用NMDayTime控件,以下是帮助中的例子。试试看。

procedure TForm1.Button1Click(Sender: TObject);
begin
NMDayTime1.ReportLevel := Status_Basic;
NMDayTime1.TimeOut := 5000;
NMDayTime1.Host := 'www.netmastersllc.com';
Label1.Caption := NMDayTime1.DayTimeStr;
end;

 
多谢了!^_^
 
gonghh,网上时间是获取了,但是如何把NMDayTime的时间转化成系统时间呢?
 
后退
顶部