| 窗口程序集名 | 保 留 | 保 留 | 备 注 |
| 窗口程序集_启动窗口 | |||
| 变量名 | 类 型 | 数组 | 备 注 |
| 程序集_找到文件 | 文本型 | ||
| 程序集_文件大小 | 双精度小数型 | ||
| 程序集_文件时间 | 日期时间型 |
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| _按钮1_被单击 | |||||
按钮1.禁止 ＝ 真
子程序1查找 (编辑框1.内容, )
状态条1.置文本 (1, “”)
按钮1.禁止 ＝ 假
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 子程序1查找 | |||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 文件路径 | 文本型 | 父项目索引 | 整数型 | ||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 临时索引 | 整数型 | |||||
如果真 (取文本右边 (文件路径, 1) ≠ “\”)
文件路径 ＝ 文件路径 ＋ “\”
如果真 (是否为空 (父项目索引) ＝ 真)父项目索引 ＝ -1程序集_找到文件 ＝ 寻找文件 (文件路径 ＋ “*.*”, 1 ＋ 2 ＋ 4 ＋ 16 ＋ 32)
状态条1.置文本 (1, 文件路径 ＋ 程序集_找到文件)
判断循环首 (程序集_找到文件 ≠ “”)如果真 (程序集_找到文件 ＝ “.” 或 程序集_找到文件 ＝ “..”)程序集_找到文件 ＝ 寻找文件 (, 1 ＋ 2 ＋ 4 ＋ 16 ＋ 32)到循环尾 ()临时索引 ＝ 树型框1.加入项目 (父项目索引, 程序集_找到文件, , , , , )如果真 (取文件属性 (文件路径 ＋ 程序集_找到文件) ＝ #子目录 )子程序1查找 (文件路径 ＋ 程序集_找到文件, 临时索引)程序集_找到文件 ＝ 寻找文件 (, 1 ＋ 2 ＋ 4 ＋ 16 ＋ 32)到循环尾 ()处理事件 ()程序集_找到文件 ＝ 寻找文件 (, 1 ＋ 2 ＋ 4 ＋ 16 ＋ 32)
判断循环尾 ()| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| _树型框1_项目被选择 | |||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 选择方式 | 整数型 | ||||||
子程序1获取选中信息 ()
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 子程序1获取选中信息 | |||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 参数_选中 | 整数型 | ||||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 数组 | 文本型 | 0 | ||||
| i | 整数型 | |||||
| 文件路径 | 文本型 | |||||
参数_选中 ＝ 树型框1.取父项目 (树型框1.现行选中项)
判断循环首 (参数_选中 ≠ -1)加入成员 (数组, 树型框1.取项目文本 (参数_选中) ＋ “\”)参数_选中 ＝ 树型框1.取父项目 (参数_选中)判断循环尾 ()计次循环首 (取数组成员数 (数组), i)文件路径 ＝ 文件路径 ＋ 数组 [i]计次循环尾 ()程序集_找到文件 ＝ 树型框1.取项目文本 (树型框1.现行选中项)
程序集_文件大小 ＝ 四舍五入 (取文件尺寸 (文件路径 ＋ 树型框1.取项目文本 (树型框1.现行选中项)) ÷ 1024, 1)
程序集_文件时间 ＝ 取文件时间 (文件路径 ＋ 树型框1.取项目文本 (树型框1.现行选中项))
列表框1.加入项目 (“标题:” ＋ 程序集_找到文件, 0)
列表框1.加入项目 (“大小:” ＋ 到文本 (程序集_文件大小), 1)
列表框1.加入项目 (“时间:” ＋ 到文本 (程序集_文件时间), 2)
列表框1.加入项目 (“路径:” ＋ 文件路径, 0)
| i支持库列表 | 支持库注释 |
| iext | 扩展界面支持库一 |