加入成员 (目录组, 编辑框1.内容)
.判断循环首 (取数组成员数 (目录组) ≠ 0)
处理事件 ()
.计次循环首 (取数组成员数 (目录组), i)
处理事件 ()
目录 ＝ 寻找文件 (目录组 [i] ＋ “\*”, 16)
.判断循环首 (目录 ≠ “”)
处理事件 ()
.如果真 (目录 ≠ “.” 且 目录 ≠ “..”)
列表框1.加入项目 (目录组 [i] ＋ “\” ＋ 目录, )
加入成员 (新目录组, 目录组 [i] ＋ “\” ＋ 目录)
.如果真结束
目录 ＝ 寻找文件 (, 16)
.判断循环尾 ()
.计次循环尾 ()
目录组 ＝ 新目录组
清除数组 (新目录组)
.判断循环尾 ()
上一篇 文本分割到超级列表框
下一篇 混合文本取汉字工具