Не удовлетворяет результат сортировки массива.
Надо, чтобы file стоял над списком file($i)(соответсветнно "русский" над "русский($i)", как это происходит при сортировке explorere или т.п. В остальном все нормально.
Добавлено:
P.S.: Скрипт добавит папку jpg в рабочей директории
Код:
#include <WindowsConstants.au3>
#include <GUIConstantsEx.au3>
#include <TreeViewConstants.au3>
#Include <Array.au3>
#Include <WinAPI.au3>
Dim $fl[50], $filelist[50][3]
GUICreate("",300,140)
GUISetState()
$wd=@WorkingDir
DirCreate (@WorkingDir&"\jpg")
_WinAPI_CreateFile(@WorkingDir&"\jpg\file.jpg",1)
_WinAPI_CreateFile(@WorkingDir&"\jpg\elif.jpg",1)
For $i = 1 to 3
_WinAPI_CreateFile(@WorkingDir&"\jpg\file("&$i&").jpg",1)
Next
_WinAPI_CreateFile(@WorkingDir&"\jpg\Русский.jpg",1)
FileChangeDir(@WorkingDir&"\jpg")
$tr1=GUICtrlCreateTreeView(10,10,280,120,BitOR($TVS_LINESATROOT,$TVS_FULLROWSELECT,$TVS_CHECKBOXES),$WS_EX_CLIENTEDGE)
$search = FileFindFirstFile("*.jpg")
$i=0
While 1
$i+=1
$file=FileFindNextFile($search)
If @error Then ExitLoop
$filelist[$i][1]=$file
WEnd
$n=$i-1
FileClose($search)
FileChangeDir($wd)
_ArraySort($filelist,0,1,$n,1)
For $i= 1 to $n
GUICtrlCreateTreeViewItem($filelist[$i][1],$tr1)
Next
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
WEnd
Надо, чтобы file стоял над списком file($i)(соответсветнно "русский" над "русский($i)", как это происходит при сортировке explorere или т.п. В остальном все нормально.
Добавлено:
Сообщение автоматически объединено:
P.S.: Скрипт добавит папку jpg в рабочей директории