Список папок из Windows в Combo

#include <GUIConstantsEx.au3>
#include <ComboConstants.au3>
#include <File.au3>

$hGUI = GUICreate("", 200, 40) ; Создаёт окно в центре экрана

$Combo = GUICtrlCreateCombo("", 10, 10, 180, 200, BitOr($GUI_SS_DEFAULT_COMBO, $CBS_DROPDOWNLIST)) ; стиль не редактируемого списка

$aList = _FileListToArray(@WindowsDir, "*", 2)

For $i = 1 To UBound($aList)-1
	GUICtrlSetData($Combo, $aList[$i])
Next

GUISetState() ; показывает созданное окно

; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
While 1
	$nMsg = GUIGetMsg()
	
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			ExitLoop
		Case $Combo
			MsgBox(0, '', 'Папка: "' & GUICtrlRead($Combo) & '"', 0, $hGUI)
	EndSwitch
WEnd

For $i = 1 To UBound($aList)-1
	If Not StringRegExp($aList[$i], "(?i)^(Help|Temp)$") Then
		GUICtrlSetData($Combo, $aList[$i])
	EndIf
Next