易语言制作图片组

.版本 2
.支持库 iext2

.程序集 窗口程序集_启动窗口
.程序集变量 图片组, 字节集

.子程序 __启动窗口_创建完毕

图片组 ＝ 建空图片组 (32, 32)


.子程序 _按钮_读入图片_被单击
.局部变量 i, 整数型
.局部变量 cururl, 文本型

cururl ＝ “E:\易程序\教务管理系统\32\”
.计次循环首 (370, i)
    图片框1.图片 ＝ 读入文件 (cururl ＋ 到文本 (i) ＋ “.png”)
    图片框1.刷新显示 ()
    加入图片 (图片组, 图片框1.图片, )
.计次循环尾 ()




.子程序 _按钮_导出图片组_被单击

写到文件 (“E:\易程序\教务管理系统\370_32.eil”, 图片组)