易语言彗星真彩控件模块动画例子

.如果真 (文件是否存在 (取运行目录 () ＋ “\data”))
删除目录 (取运行目录 () ＋ “\data”)
.如果真结束
创建目录 (取运行目录 () ＋ “\data”)
写到文件 (取运行目录 () ＋ “\data\data.zip”, #A)
ZIP压缩1.解压 (取运行目录 () ＋ “\data\data.zip”, 取运行目录 () ＋ “\data\”)
真彩窗口.从句柄创建 (取窗口句柄 ())
.计次循环首 (35, i)
加入成员 (图像, 真彩控件_载入内存图片 (读入文件 (取运行目录 () ＋ “\data\a” ＋ 到文本 (i))))
.计次循环尾 ()