
使用此方法可实现窗口的淡入淡出效果,不需要添加任何窗口组件(比如时钟等),而是直接用代码实现,代码如下:
源码文件下载:淡入淡出窗口.rar
.版本 2
.支持库 eAPI
.支持库 EThread
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
设置窗口透明度 (取窗口句柄 (), 0)
启动线程 (&进入透明化, , )
可视 = 假
.子程序 进入透明化
.局部变量 透明度, 整数型
.变量循环首 (1, 200, 5, 透明度)
可视 = 真
设置窗口透明度 (取窗口句柄 (), 透明度)
延迟 (10)
.变量循环尾 ()
延迟 (50)
.子程序 退出透明化
.局部变量 透明度, 整数型
.变量循环首 (200, 1, -5, 透明度)
设置窗口透明度 (取窗口句柄 (), 透明度)
延迟 (10)
.变量循环尾 ()
延迟 (50)
可视 = 假
销毁 ()
.子程序 __启动窗口_窗口可否被关闭, 逻辑型
退出透明化 ()
暂无评论
要发表评论,您必须先 登录