高手请进！！！！！！！！ ( 积分: 200 )

如何使用普通的函数，或api，实现获取网络时间？ 使得程序无须安装可以直接移动植到其他系统上直接运行？
请给出代码，谢谢！

获取网络时间，可以利用 SNTP 协议。该协议的Delphi单元见下：
http://www.koders.com/delphi/fidBFCE2275A30F420735BE3F87AB3483677E37850B.aspx
使用范例：
sntp:=TSntpSend.
Create;
sntp.Timeout:=AppSetting.TimeOut*1000;
//设置超时 sec -> ms
try
sntp.TargetHost:=FIP;
b:=sntp.GetSNTP;
if b then
FUTCTime:=sntp.NTPTime;
//已取得UTC时间
finally
sntp.Free;
end;

我是菜鸟，能否给出具体的？

还要更具体的？——那就看看下面这个帖子吧：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1532534