易语言程序安装包制作

安装包_打包 (取运行目录 () ＋ “\install.exe”, “D:\Program Files\Tencent\QQMusic\”, 进度条1, 编辑框1)
' 安装包_打包 (取运行目录 () ＋ “\1.exe”, “E:\电脑综合管理系统\安装包\新建文件夹\”, 进度条1, 编辑框1)
' 安装包_解包 (“E:\电脑综合管理系统\安装包\QQbak\”, 进度条1, 编辑框1)

参_进度条.位置 ＝ 局部_计次 × 100 ÷ 取数组成员数 (局部_安装包信息)
' 判断是否为目录
.判断开始 (取文本右边 (局部_安装包信息 [局部_计次].文件名, 1) ＝ “\”)
创建目录 (参_文件夹 ＋ 局部_安装包信息 [局部_计次].文件名)
参_编辑框.加入文本 (“创建目录：” ＋ 局部_安装包信息 [局部_计次].文件名 ＋ #换行符)
.默认
' 输出文件
写到文件 (参_文件夹 ＋ 局部_安装包信息 [局部_计次].文件名, 局部_安装包信息 [局部_计次].文件字节集)
参_编辑框.加入文本 (“创建文件：” ＋ 局部_安装包信息 [局部_计次].文件名 ＋ #换行符)