#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=D:\backup\Form1.kxf
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$Combo1 = GUICtrlCreateCombo("", 184, 80, 129, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$input = GUICtrlCreateInput("",184,150,129,25)
GUICtrlSetData($Combo1, "我的文档|收藏夹|桌面|IE 临时文件夹|Cookies|软件安装位置", "")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo1
dir()
EndSwitch
WEnd
Func dir()
$vardir = FileSelectFolder ("请选择一个文件夹","",1,"d:")
GUICtrlSetData($input,$vardir)
EndFunc
楼主可以参考下. |