| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | |||
| 变量名 | 类 型 | 数组 | 备 注 |
| 纯净文件名 | 文本型 | ||
| 执行批量程序开始标记 | 逻辑型 |
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮1_被单击 | |||||
编辑框1.内容 ＝ 通用对话框1.文件名
' 参数= "-sDEVICE=pdfwrite -dNoOutputFonts -o " + 输出文件路径 + " " + 输入文件路径
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮2_被单击 | |||||
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_创建完毕 | |||||
拖放对象1.注册拖放控件 (标签3.取窗口句柄 ())
创建目录 (取运行目录 () ＋ “\转曲结果\”)
图片框隐藏子程序 ()
图片框1.可视 ＝ 真
' 华侨_加载皮肤_淡雅简黑 ()
' 华侨_加载皮肤_炫彩深蓝 (_启动窗口, , , )
华侨_加载皮肤_炫彩蓝色 ()
执行批量程序开始标记 ＝ 假
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| __启动窗口_将被销毁 | |||||
华侨_卸载皮肤_默认窗口 ()
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮3_被单击 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 参数 | 文本型 | |||||
| 返回结果 | 文本型 | |||||
编辑框3.内容 ＝ “”
按钮3.禁止 ＝ 真
参数 ＝ 取运行目录 () ＋ “\gswin64c.exe” ＋ “ -o ” ＋ 编辑框2.内容 ＋ “[转曲后]” ＋ 纯净文件名 ＋ “ -sDEVICE=pdfwrite -dNoOutputFonts ” ＋ 编辑框1.内容
返回结果 ＝ 系统_取DOS执行结果 (参数, )
编辑框3.内容 ＝ 返回结果
按钮3.禁止 ＝ 假
如果 (寻找文本 (编辑框3.内容, “Page 1”, , 假) ≠ -1)
标签4.标题 ＝ “转曲成功”如果 (执行批量程序开始标记 ＝ 真)
执行 (2, 取运行目录 () ＋ “\转曲结果\”, , , )
标签4.标题 ＝ “转曲失败,请修改文件标题”
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| _拖放对象1_得到文件 | |||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 接收到的文件路径 | 文本型 | ||||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 出现位置 | 整数型 | |||||
| 剩余长度 | 整数型 | |||||
如果真 (文本_取行数 (接收到的文件路径) ＞ 1)标签4.标题 ＝ “拖拽文件不能超过1个”返回 ()
出现位置 ＝ 倒找文本 (接收到的文件路径, “\”, , 假)
剩余长度 ＝ 取文本长度 (接收到的文件路径) － 出现位置
纯净文件名 ＝ 取文本右边 (接收到的文件路径, 剩余长度)
编辑框2.内容 ＝ 取运行目录 () ＋ “\转曲结果\”
执行批量程序开始标记 ＝ 假
延迟 (100)
_按钮3_被单击 ()
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _超级按钮1_被单击 | |||||
图片框1.可视 ＝ 真
图片框2.可视 ＝ 假
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _超级按钮2_被单击 | |||||
图片框1.可视 ＝ 假
图片框2.可视 ＝ 真
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| 图片框隐藏子程序 | |||||
图片框2.可视 ＝ 假
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮4_被单击 | |||||
创建目录 (取运行目录 () ＋ “\批量转曲前\”)
执行 (2, 取运行目录 () ＋ “\批量转曲前\”, , , )
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮5_被单击 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 返回的文件路径 | 文本型 | |||||
| 索引2 | 整数型 | |||||
| bva | 整数型 | |||||
超级列表框1.全部删除 ()
返回的文件路径 ＝ 寻找文件 (取运行目录 () ＋ “\批量转曲前\*.pdf”, )
判断循环首 (返回的文件路径 ≠ “”)索引2 ＝ 超级列表框1.插入表项 (, , , , , )bva ＝ bva ＋ 1超级列表框1.置标题 (索引2, 0, 到文本 (bva))超级列表框1.置标题 (索引2, 1, 返回的文件路径)超级列表框1.置标题 (索引2, 3, 取运行目录 () ＋ “\批量转曲前\” ＋ 返回的文件路径)超级列表框1.置标题 (索引2, 2, “未开始”)返回的文件路径 ＝ 寻找文件 (, )
判断循环尾 ()| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮6_被单击 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| uyt | 整数型 | |||||
| ppg | 整数型 | |||||
进度条1.位置 ＝ 0
进度条1.最大位置 ＝ 超级列表框1.取表项数 ()
创建目录 (取运行目录 () ＋ “\批量转曲后\”)
计次循环首 (超级列表框1.取表项数 (), uyt)编辑框1.内容 ＝ 超级列表框1.取标题 (uyt － 1, 3)执行批量程序开始标记 ＝ 真纯净文件名 ＝ 超级列表框1.取标题 (uyt － 1, 1)编辑框2.内容 ＝ 取运行目录 () ＋ “\批量转曲后\”_按钮3_被单击 ()如果真 (标签4.标题 ＝ “转曲成功”)进度条1.位置 ＝ 进度条1.位置 ＋ 1计次循环尾 ()执行 (2, 编辑框2.内容, , , )
按钮6.禁止 ＝ 假
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _超级按钮3_被单击 | |||||
| i支持库列表 | 支持库注释 |
| shell | 操作系统界面功能支持库 |
| edroptarget | 拖放支持库 |
| spec | 特殊功能支持库 |
| iext | 扩展界面支持库一 |