「dirlistのソート順」の続き
http://hsp.tv/play/pforum.php?mode=pastwch&num=87090
dirlistで取得できるファイル名一覧は文字コード順でソートされますが、Windowsのエクスプローラーで名前順ソートすると同じ順になりません。
Windowsのほうはもう少し賢く(?)、数字は数値順で考慮されるようです。
私も同じ悩みを抱えこちらのいののてさんのサンプルを見て解決しました。
サンプルではバブルソートでしたがクイックソートにブラッシュアップしたのを作ったので返信しようとしたのですが、私の画面からはなぜか返信できませんでした。
過去一定時間過ぎたものは返信できないのでしょうか。
あえて新しくスレッドを立ち上げる必要があるほどかは分かりませんが、知識の共有として書き込んでおきます。
#include "hsp3util.as" #module #uselib "shlwapi" #cfunc StrCmpLogicalW "StrCmpLogicalW" wstr, wstr #deffunc qsort array a,int pivotcnt,int i_,int j_ if j_-i_<=1:return i=i_ j=j_ p=a.pivotcnt repeat -1 repeat -1 if StrCmpLogicalW(a.i,p)>=0:break i++ if i==j_:break loop j-- repeat -1 if StrCmpLogicalW(a.j,p)<=0:break j-- if j<=i:break loop if i<j{//swap tmp=a.i a.i=a.j a.j=tmp }else{ break } loop qsort a,(i_+i)/2,i_,i qsort a,(i+j_)/2,i,j_ return #global list = {"005.png 1.png 10.png 2.png a1.png"} note2array list_arr,list//複数行文字列を配列へ len=length(list_arr) qsort list_arr,len/2,0,len array2note list,list_arr//配列を複数行文字列へ mes list
