查看: 49|回覆: 0

[教程] 易语言制作屏幕右下角弹出窗口的源码

[複製鏈接]

4

主題

0

回帖

0

積分

热心网友

金币
0
閲讀權限
220
精華
0
威望
0
贡献
0
在線時間
0 小時
註冊時間
2010-10-27
發表於 2018-12-5 11:23:49 | 顯示全部樓層 |閲讀模式

屏幕右下角广告

.版本 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

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对琼殿技术社区的支持。如果你想了解更多相关内容请查看下面相关链接

您可能感兴趣的文章:
  • 易语言地下城与勇士拾取卖物功能类源码
  • 易语言地下城与勇士辅助顺图类源码
  • 易语言地下城与勇士辅助剧情类源码
  • 易语言制作DNF解封源码
  • 易语言超级列表框表项关键字搜索代码示例
  • 易语言赋值定义多维数组的代码实例
  • 易语言制作黑客小程序源码
  • 易语言获取程序已运行时间的代码
  • 易语言制作英雄联盟辅助的源码
  • 易语言地下城与勇士辅助自动刷图类源码
回覆

使用道具 舉報

您需要登錄後才可以回帖 登錄 | 立即注册

本版積分規則

相关侵权、举报、投诉及建议等,请发 E-mail:qiongdian@foxmail.com

Powered by Discuz! X5.0 © 2001-2026 Discuz! Team.

在本版发帖返回顶部