好友
阅读权限30
听众
最后登录1970-1-1
|
本帖最后由 hill_king 于 2019-4-10 20:31 编辑
有老铁说需要分钟循环的小软件,之前因为工作时候老是忘记喝水,所以写了这个小软件
有人说一直出现错误,我更新了一下
被杀软拦截请允许即可
定时提醒1.rar
(751.98 KB, 下载次数: 523)
源码如下:
.版本 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_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
_启动窗口.可视 = 假
|
免费评分
-
查看全部评分
|
发帖前要善用【论坛搜索】功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。 |
|
|
|
|