易语言取网络时间源码

系统结构:取网络时间,InternetTimeToSystemTimeA,GetTimeZoneInformation,SystemTimeToTzSpecificLocalTime,

======_启动窗口窗口程序集
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 取网络时间
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   InternetTimeToSystemTimeA
           |  |
           |  |---[dll]------   GetTimeZoneInformation
           |  |
           |  |---[dll]------   SystemTimeToTzSpecificLocalTime

调用的DLL命令:

.DLL命令 InternetTimeToSystemTimeA, 逻辑型, "wininet.dll"
    .参数 lpszTime, 文本型
    .参数 pst, SYSTEMTIME
    .参数 dwReserved

.DLL命令 GetTimeZoneInformation, 逻辑型
    .参数 lpTimeZoneInformation, TIME_ZONE_INFORMATION

.DLL命令 SystemTimeToTzSpecificLocalTime
    .参数 lpTimeZone, TIME_ZONE_INFORMATION
    .参数 lpUniversalTime, SYSTEMTIME
    .参数 lpLocalTime, SYSTEMTIME