.版本 2 .程序集 窗口程序集1 .子程序 __启动窗口_创建完毕 组合框1.现行选中项 ＝ 0' 本源码来自三叶资源网(www.sanye.cx) .子程序 _按钮2_被单击, , , ' 本源码来自三叶资源网(www.sanye.cx) 通用对话框1.打开 () .如果真 (通用对话框1.文件名 ≠ “”) 编辑框1.内容 ＝ 通用对话框1.文件名 .如果真结束 .子程序 _按钮1_被单击 .局部变量 临时文件, 文本型 .局部变量 编码特征, 文本型 .如果真 (编辑框1.内容 ＝ “”) 信息框 (“文件路径不能为空!”, #信息图标, “提示”) 返回 () .如果真结束 .如果 (选择框1.选中) 临时文件 ＝ 编辑框1.内容 ＋ “.bak” .如果真 (文件是否存在 (临时文件)) 删除文件 (临时文件) .如果真结束 文件更名 (编辑框1.内容, 临时文件) 编码特征 ＝ 文件_编码转换 (临时文件, 编辑框1.内容, 组合框1.内容) .如果 (编码特征 ≠ “”) 信息框 (“文件:” ＋ 编辑框1.内容 ＋ #换行符 ＋ “备份:” ＋ 临时文件 ＋ #换行符 ＋ “编码:” ＋ 取文件编码 (临时文件) ＋ #换行符 ＋ “现在:” ＋ 编码特征, #信息图标, “信息”) .否则 信息框 (“转换失败!”, #信息图标, “提示”) .如果结束 .否则 临时文件 ＝ 编辑框1.内容 ＋ “.new” 编码特征 ＝ 文件_编码转换 (编辑框1.内容, 临时文件, 组合框1.内容) .如果 (编码特征 ≠ “”) 信息框 (“文件:” ＋ 编辑框1.内容 ＋ #换行符 ＋ “转换:” ＋ 临时文件 ＋ #换行符 ＋ “编码:” ＋ 取文件编码 (编辑框1.内容) ＋ #换行符 ＋ “现在:” ＋ 编码特征, #信息图标, “信息”) .否则 信息框 (“转换失败!”, #信息图标, “提示”) .如果结束 ' 本源码来自三叶资源网(www.sanye.cx) .如果结束 .子程序 _组合框1_失去焦点 .如果真 (组合框1.选择 (组合框1.内容) ＝ -1) 组合框1.加入项目 (组合框1.内容, ) .如果真结束 .子程序 _按钮3_被单击 .如果真 (文件是否存在 (编辑框1.内容 ＋ “.bak”)) .如果真 (文件是否存在 (编辑框1.内容)) 删除文件 (编辑框1.内容) .如果真结束 文件更名 (编辑框1.内容 ＋ “.bak”, 编辑框1.内容) .如果真结束