易语言创建时钟事件模块源码

系统结构:事件1,事件2,事件3,置时钟事件,取消时钟事件,取消所有时钟事件,API_SetTimer,API_KillTimer,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 事件1
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ 事件2
           |  |
           |  |------ _按钮5_被单击
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ 事件3
           |  |
           |  |------ _按钮6_被单击
           |  |
           |  |------ _按钮7_被单击
  ======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |
======接口程序集
           |  |
           |  |------ 置时钟事件
           |  |
           |  |------ 取消时钟事件
           |  |
           |  |------ 取消所有时钟事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_SetTimer
           |  |
           |  |---[dll]------   API_KillTimer

调用的DLL命令:

.DLL命令 API_SetTimer, 整数型, "user32", "SetTimer", , 安装系统定时器
    .参数 hWnd, 整数型
    .参数 nIDEvent, 整数型
    .参数 uElapse, 整数型
    .参数 lpTimerFunc, 子程序指针

.DLL命令 API_KillTimer, 整数型, "user32", "KillTimer", , 中止定时器
    .参数 hwnd, 整数型
    .参数 nIDEvent, 整数型