易语言动态墙纸
.版本 2
.子程序 __启动窗口_首次激活
延时 (1000)
打开.打开 ()
.判断开始 (打开.文件名 = “”)
信息框 (“请选择一个文件打开呀~” + #换行符 + “没有文件,程序会退出哦~”, #询问图标, “错误!”, )
结束 ()
.默认
.判断结束
置托盘图标 (#图标, “动态墙纸正在播放”)
墙纸 = 打开.文件名
信息框 (“Yes Sir,收到您的视频啦~” + #换行符 + “即将为您加载动态墙纸~”, 0, “成功”, )
可视 = 假
载入 (播放, , 真)
易语言视频制作视频墙纸