巴士下载站 / 汇聚当下最新最酷的软件下载站!
巴士下载站
您的位置: 首页 >软件下载 > 应用软件 > 时钟日历 > 分钟定时提醒工具

巴士为您推荐: 分钟定时提醒

因为工作时候老是忘记喝水,所以写了这个小软件

分钟定时提醒下载-分钟定时提醒工具下载

分钟定时提醒下载-分钟定时提醒工具下载

被杀软拦截请允许即可

源码如下:

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击

按钮1.禁止 = 真

按钮2.禁止 = 假

时钟1.时钟周期 = 1000 × 60 × 到整数 (编辑框1.内容)

.子程序 _编辑框2_被双击, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

编辑框2.内容 = “”

.子程序 _时钟1_周期事件

时钟1.时钟周期 = 0

猫叔卡通信息框 (2, #淡隐, 编辑框2.内容)

时钟1.时钟周期 = 1000 × 60 × 到整数 (编辑框1.内容)

.子程序 __启动窗口_创建完毕

' 加载皮肤 (23)

按钮2.禁止 = 真

未闻花名_1_有阴影 (取窗口句柄 (), , , , , , )

置托盘图标 (#图片1, “弹信息框”)

.子程序 _按钮2_被单击

按钮1.禁止 = 假

按钮2.禁止 = 真

时钟1.时钟周期 = 0

.子程序 __启动窗口_可否被关闭, 逻辑型

_启动窗口.可视 = 假

返回 (假)

.子程序 __启动窗口_托盘事件

.参数 操作类型, 整数型

.判断开始 (操作类型 = #单击左键)

_启动窗口.可视 = 真

.默认

.判断结束

.判断开始 (操作类型 = #单击右键)

弹出菜单 (退出1, , )

.默认

.判断结束

.子程序 _退出_被选择

结束 ()

.子程序 _透明标签3_鼠标左键被放开, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

_启动窗口.可视 = 假

分钟定时提醒下载

猜你喜欢
回顶部 去下载