Delphi通过网络同步校对系统时间的源程序.rar

Delphi实现从互联网更新同步系统时间的功能。你大致可通过本例掌握TidTime控件的基本用法。编写代码：(1)获取时间：获取系统时间和网络时间，其中系统时间我们只需要用now函数就可以得到，然后利用DateTimeToStr()函数将它转换为字符串格式赋值给Label1就行了。网络时间我们可以利用TidTime控件的DateTime属性直接得到，不过在使用TidTime的那个属性前我们必须告诉它获取时间的网络地址，即Edit1提供的网址。(2)校对时间：这里利用TidTime的SyncTime方法既可轻松完成。(3)关闭程序：直接使用DELPHI窗体的Close方法即可。涉及到对系统时间的修改，网络时间的获取，所有核心代码均