子目录枚举排序问题

weilaideren

子目录枚举不能按照顺序来，有什么办法解决吗

zainex

想要按照系统的方式排序，可以利用 StrCmpLogicalW 这个 API：

  

DLL命令名	返回值类型	公开	备 注
StrCmpLogicalW	整数型
DLL库文件名:
Shlwapi.dll
在DLL库中对应命令名:
StrCmpLogicalW
参数名	类 型	传址	数组	备 注
文本1	字节集
文本2	字节集

.版本 2<br /> <br /> .DLL命令 StrCmpLogicalW, 整数型, "Shlwapi.dll", "StrCmpLogicalW"<br />     .参数 文本1, 字节集<br />     .参数 文本2, 字节集

并通过编写相应的排序算法进行实现：

  

子程序名	返回值类型	公开	备 注
目录排序
参数名	类 型	参考	可空	数组	备 注
数组	文本型
从大到小	逻辑型

变量名	类 型	静态	数组	备 注
数	整数型
下标	整数型
值	整数型
临时	字节集		2

如果真 (是否为空 (从大到小) ＝ 真)
从大到小 ＝ 假
' 这里使用了选择排序
计次循环首 (取数组成员数 (数组), 数)
下标 ＝ 数
计次循环首 (取数组成员数 (数组) － 数, 值)
临时 [1] ＝ 编码转换 (到字节集 (数组 [下标]), #编码_GB18030, #编码_UTF_16LE, ) ＋ { 0, 0 }
临时 [2] ＝ 编码转换 (到字节集 (数组 [数 ＋ 值]), #编码_GB18030, #编码_UTF_16LE, ) ＋ { 0, 0 }
如果 (从大到小 ＝ 真)
如果真 (StrCmpLogicalW (临时 [1], 临时 [2]) ＜ 0)
下标 ＝ 数 ＋ 值

如果真 (StrCmpLogicalW (临时 [1], 临时 [2]) ＞ 0)
下标 ＝ 数 ＋ 值


计次循环尾 ()
如果真 (下标 ≠ 数)
交换变量 (数组 [下标], 数组 [数])

计次循环尾 ()

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
目录	文本型		0
数	整数型

目录_枚举子目录1 (取运行目录 () ＋ “\新建文件夹”, 目录, 假)
目录排序 (目录)
计次循环首 (取数组成员数 (目录), 数)
调试输出 (目录 [数])
计次循环尾 ()
调试输出 (“---------------”)
目录排序 (目录, 真)
计次循环首 (取数组成员数 (目录), 数)
调试输出 (目录 [数])
计次循环尾 ()

i支持库列表	支持库注释
iconv	编码转换支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 iconv<br /> .支持库 spec<br /> <br /> .子程序 目录排序<br /> .参数 数组, 文本型, 数组<br /> .参数 从大到小, 逻辑型, 可空<br /> .局部变量 数, 整数型<br /> .局部变量 下标, 整数型<br /> .局部变量 值, 整数型<br /> .局部变量 临时, 字节集, , "2"<br /> <br /> .如果真 (是否为空 (从大到小) ＝ 真)<br />     从大到小 ＝ 假<br /> .如果真结束<br /> ' 这里使用了选择排序<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     下标 ＝ 数<br />     .计次循环首 (取数组成员数 (数组) － 数, 值)<br />         临时 [1] ＝ 编码转换 (到字节集 (数组 [下标]), #编码_GB18030, #编码_UTF_16LE, ) ＋ { 0, 0 }<br />         临时 [2] ＝ 编码转换 (到字节集 (数组 [数 ＋ 值]), #编码_GB18030, #编码_UTF_16LE, ) ＋ { 0, 0 }<br />         .如果 (从大到小 ＝ 真)<br />             .如果真 (StrCmpLogicalW (临时 [1], 临时 [2]) ＜ 0)<br />                 下标 ＝ 数 ＋ 值<br />             .如果真结束<br /> <br />         .否则<br />             .如果真 (StrCmpLogicalW (临时 [1], 临时 [2]) ＞ 0)<br />                 下标 ＝ 数 ＋ 值<br />             .如果真结束<br /> <br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (下标 ≠ 数)<br />         交换变量 (数组 [下标], 数组 [数])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 目录, 文本型, , "0"<br /> .局部变量 数, 整数型<br /> <br /> 目录_枚举子目录1 (取运行目录 () ＋ “\新建文件夹”, 目录, 假)<br /> 目录排序 (目录)<br /> .计次循环首 (取数组成员数 (目录), 数)<br />     调试输出 (目录 [数])<br /> .计次循环尾 ()<br /> 调试输出 (“---------------”)<br /> 目录排序 (目录, 真)<br /> .计次循环首 (取数组成员数 (目录), 数)<br />     调试输出 (目录 [数])<br /> .计次循环尾 ()

鹏书

那你就自己排序咯

weilaideren

怎么排序，不会，请指教

冰棍好烫啊

https://bbs.125.la/search.php?mo ... =%E6%8E%92%E5%BA%8F

冰棍好烫啊

数组_排序() 先试一下

weilaideren

大佬 还是不行