易语言世博迷你闹钟源码

系统结构:定时器,提示线程,提示,加入一个闹钟,删除当前闹钟,取最近闹钟,清理过期闹钟,创建线程_黑月,取文本型指针_黑月,KillTimer,SetTimer,CreateThread,MessageBox,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 定时器
           |  |
           |  |------ 提示线程
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _退出_被选择
           |  |
           |  |------ _透明标签1_鼠标右键被按下
           |  |
           |  |------ _透明标签1_鼠标左键被按下
           |  |
           |  |------ _记事本_被选择
           |  |
           |  |------ _计算器_被选择
           |  |
           |  |------ _控制面板_被选择
           |  |
           |  |------ _我的电脑_被选择
           |  |
           |  |------ _运行_被选择
           |  |
           |  |------ _命令提示符_被选择
           |  |
           |  |------ _注册表_被选择
           |  |
           |  |------ _锁定_被选择
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ 提示
           |  |
           |  |------ _透明标签1_被双击
           |  |
           |  |------ _设定闹钟_被选择
           |  |
           |  |------ _删除当前闹钟_被选择
           |  |
           |  |
======程序集_闹钟
           |  |
           |  |------ 加入一个闹钟
           |  |
           |  |------ 删除当前闹钟
           |  |
           |  |------ 取最近闹钟
           |  |
           |  |------ 清理过期闹钟
           |  |
           |  |------ 创建线程_黑月
           |  |
           |  |------ 取文本型指针_黑月
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ _窗口1_将被销毁
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _单选框2_被单击
           |  |
           |  |------ _单选框1_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   KillTimer
           |  |
           |  |---[dll]------   SetTimer
           |  |
           |  |---[dll]------   CreateThread
           |  |
           |  |---[dll]------   MessageBox

调用的DLL命令:

.DLL命令 KillTimer, 整数型, , "KillTimer"
    .参数 c1, 整数型
    .参数 Timerid, 整数型

.DLL命令 SetTimer, 整数型, , "SetTimer", 公开
    .参数 Thwnd, 整数型
    .参数 nIDEvent, 整数型
    .参数 uElapse, 整数型
    .参数 lpTimerFunc, 子程序指针

.DLL命令 CreateThread, 整数型, "kernel32", "CreateThread", 公开, 启动线程
    .参数 lpThreadAttributes, 整数型
    .参数 dwStackSize, 整数型
    .参数 lpStartAddress, 子程序指针
    .参数 lpParameter, 整数型
    .参数 dwCreationFlags, 整数型
    .参数 lpThreadId, 整数型, 传址

.DLL命令 MessageBox, 整数型, "user32.dll", "MessageBoxA", 公开
    .参数 hWnd
    .参数 lpText, 文本型
    .参数 lpCaption, 文本型
    .参数 uType