本帖最后由 南一 于 2011-8-30 13:16 编辑
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Local $var = DriveGetDrive("FIXED")
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$Input1 = GUICtrlCreateInput("", 56, 88, 337, 21, $ES_readonly)
$Combo1 = GUICtrlCreateCombo($var[1], 448, 88, 145, 25, $CBS_dropdownlist)
For $i = 2 To $var[0]
GUICtrlSetData($Combo1, $var[$i])
Next
GUICtrlSetData($Input1, $var[1] & "\123")
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo1
$Drive = GUICtrlRead($Combo1)
GUICtrlSetData($Input1, $Drive & "\123")
EndSwitch
WEnd
|