本帖最后由 sensel 于 2009-5-27 18:10 编辑
1. 创建Combo控件。
2. 用RegEnumVal获取键名。
3. 用RegRead获取键值。
4. 将得到的键值用GUICtrlSetData填入Combo控件。
循环2-4步,直至第2步的@error为真(即RegEnumVal枚举已无更多的键名)。
例(需要先创建窗口):
Local $hDisallowRun, $sName, $sValue, $i
Local Const $sRegKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun"
$hDisallowRun = GUICtrlCreateCombo("", 354, 30, 72, 18, BitOR($GUI_SS_DEFAULT_COMBO, $CBS_DROPDOWNLIST))
$i = 0
While 1
$i += 1
$sName = RegEnumVal($sRegKey, $i)
If @error Then ExitLoop
$sValue = RegRead($sRegKey, $sName)
If $sValue == "" Then ContinueLoop
GUICtrlSetData($hDisallowRun, $sValue)
WEnd
|