易语言API创建时钟源码

系统结构:创建,销毁,取指针字节集,时钟1子程序,时钟2子程序,时钟3子程序,CreateTimerQueueTimer,CreateTimerQueue,DeleteTimerQueueTimer,

======CreateTimer
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 创建
           |  |
           |  |------ 销毁
           |  |
           |  |
======程序集1
           |  |
           |  |------ 取指针字节集
           |  |
           |  |
======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 时钟1子程序
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ 时钟2子程序
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ 时钟3子程序
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateTimerQueueTimer
           |  |
           |  |---[dll]------   CreateTimerQueue
           |  |
           |  |---[dll]------   DeleteTimerQueueTimer

调用的DLL命令:

.DLL命令 CreateTimerQueueTimer, 整数型, "kernel32", "CreateTimerQueueTimer"
    .参数 phNewTimer, 整数型, 传址
    .参数 TimerQueue, 整数型
    .参数 Callback, 整数型, , 时钟回调
    .参数 Parameter, 整数型, , 传递给时钟回调的参数
    .参数 DueTime, 整数型, , 首次触发时钟的延时
    .参数 Period, 整数型, , 时钟周期
    .参数 Flags, 整数型

.DLL命令 CreateTimerQueue, 整数型, "kernel32.dll", "CreateTimerQueue"

.DLL命令 DeleteTimerQueueTimer, 整数型, "kernel32.dll", "DeleteTimerQueueTimer"
    .参数 TimerQueue, 整数型
    .参数 Timer, 整数型
    .参数 CompletionEvent, 整数型