易语言如何制作屏幕右下角弹出窗口

这篇文章将为大家详细讲解有关易语言如何制作屏幕右下角弹出窗口,小编觉得挺实用的,因此分享给大家做个参考,希望大家阅读完这篇文章后可以有所收获。

屏幕右下角广告

.版本 2
.程序集 窗口程序集1
.程序集变量 伸缩判断, 逻辑型
.子程序 __启动窗口_创建完毕
.子程序 _时钟1_周期事件
.如果 (伸缩判断 = 真)
  .如果真 (窗口1.顶边 > 取屏幕高度 () - 窗口1.高度 - 30)
    窗口1.移动 (, 窗口1.顶边 - 1, , )
  .如果真结束
.否则
  .如果真 (窗口1.顶边 < 取屏幕宽度 ())
    窗口1.移动 (, 窗口1.顶边 + 1, , )
  .如果真结束
.如果结束
.子程序 _按钮_关闭_被单击
伸缩判断 = 假
时钟1.时钟周期 = 1
.子程序 _时钟2_周期事件
伸缩判断 = 真
时钟1.时钟周期 = 1
载入 (窗口1, , 真)
时钟2.时钟周期 = 0
.子程序 _按钮_弹出_被单击
载入 (窗口1, _启动窗口, 假)
窗口1.移动 (取屏幕宽度 () - 窗口1.宽度, 取屏幕高度 (), , )
_启动窗口.获取焦点 ()
时钟2.时钟周期 = 2000

运行结果:

易语言如何制作屏幕右下角弹出窗口

关于“易语言如何制作屏幕右下角弹出窗口”这篇文章就分享到这里了,希望以上内容可以对大家有一定的帮助,使各位可以学到更多知识,如果觉得文章不错,请把它分享出去让更多的人看到。