• 0
  • 0

易语言时钟提醒效果

2019-07-31 140 0 admin 所属分类:易语言

最小化检测,出现通知则窗口还原震动。然后继续最小化

结合时钟以30毫秒的速度执行多次移动窗口。制造震动效果

.版本 2
.支持库 spec

.子程序 _时钟_震动_周期事件

.如果 (全局_振动次数 > 20)
    全局_振动次数 = 0
    时钟_震动.时钟周期 = 0
    子程序_窗体居中 (_启动窗口)
    延迟 (1500)
    窗口_最小化 (_启动窗口.取窗口句柄 ())

.否则

    全局_振动次数 = 全局_振动次数 + 1
    _启动窗口.总在最前 = 真
    _启动窗口.可视 = 真
    窗口_还原 (_启动窗口.取窗口句柄 ())

    _启动窗口.激活 ()
    _启动窗口.移动 (_启动窗口.宽度 - 取随机数 (-50, 50), _启动窗口.高度 - 取随机数 (-50, 50), , )
.如果结束



返回顶部