易语言提醒备忘时钟源码

系统结构:子程序_读取数据库,子程序_时间数组排序,

======窗口程序集_启动窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ _备忘录查看_被选择
           |  |
           |  |------ _透明标签_时钟_鼠标左键被按下
           |  |
           |  |------ _透明标签_时钟_鼠标右键被按下
           |  |
           |  |------ _图片框1_被双击
           |  |
           |  |------ _退出_被选择
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ _隐藏时钟_被选择
           |  |
           |  |
======窗口程序集_备忘查看
           |  |
           |  |------ __窗口_备忘查看_创建完毕
           |  |
           |  |------ _按钮_添加备忘_被单击
           |  |
           |  |------ _按钮_删除备忘_被单击
           |  |
           |  |------ __窗口_备忘查看_可否被关闭
           |  |
           |  |------ 子程序_读取数据库
           |  |
           |  |------ 子程序_时间数组排序
           |  |
           |  |
======窗口程序集_添加备忘
           |  |
           |  |------ __窗口_添加备忘_创建完毕
           |  |
           |  |------ _调节器_时_调节钮被按下
           |  |
           |  |------ _调节器_分_调节钮被按下
           |  |
           |  |------ _按钮_添加_被单击
           |  |
           |  |------ _按钮_取消_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   _取得窗口信息
           |  |
           |  |---[dll]------   _设置窗口特征
           |  |
           |  |---[dll]------   _透明窗口

调用的DLL命令:

.DLL命令 _取得窗口信息, 整数型, , "GetWindowLongA", , user32.dll
    .参数 窗口句柄, 整数型
    .参数 属性, 整数型

.DLL命令 _设置窗口特征, 子程序指针, , "SetWindowLongA"
    .参数 窗口句柄, 整数型
    .参数 特征索引, 整数型
    .参数 新特征, 整数型

.DLL命令 _透明窗口, 逻辑型, , "SetLayeredWindowAttributes", , 成功返回真，否则返回假
    .参数 hwnd, 整数型, , 透明窗体的句柄
    .参数 crKey, 整数型, , 颜色值
    .参数 bAlpha, 字节型, , 透明度，取值范围是[0,255]
    .参数 dwFlags, 整数型, , 透明方式：LWA_ALPHA(2)时，crKey参数无效，bAlpha参数有效 || LWA_COLORKEY(1)时，bAlpha参数有效而窗体中的所有颜色为crKey的地方将变为透明