Цитата BlaJes:
|
необходимо считать название подпапок в папке и сделать из них GUICtrlCreateList »
|
Т.е вывести только один уровень подпапок в определённом каталоге?
Так...
Код:
#include <GuiConstantsEx.au3>
#include <File.au3>
;
$sFolder = @ScriptDir
$GUI = GUICreate("Dir List", 300, 200)
$aFilesList = _FileListToArray($sFolder, "*", 2)
$sList_Data = ""
For $i = 1 To $aFilesList[0]
$sList_Data &= $aFilesList[$i] & "|"
Next
GUICtrlCreateList("", 20, 20, 260, 140)
GUICtrlSetData(-1, $sList_Data)
GUISetState(@SW_SHOW, $GUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
?
