Не уверен что правильно понял, но вот что получилось:
Код:
![Выделить весь код](images/misc/selectcode.png)
#include <GUIConstantsEx.au3>
#include <ListBoxConstants.au3>
OnAutoItExitRegister("_OnExitProc")
Global $sConfig_File = @ScriptDir & "\Config.ini"
Global $aIniData = IniReadSection($sConfig_File, "Variables")
$hGUI = GUICreate("Test Script", 300, 200)
$nList = GUICtrlCreateList("", 20, 20, 260, 120, BitXOR($GUI_SS_DEFAULT_LIST, $LBS_SORT))
$nInput = GUICtrlCreateInput("", 20, 150, 200, 20)
$nSet_Button = GUICtrlCreateButton("Set", 225, 150, 55, 20)
For $i = 1 To UBound($aIniData)-1
GUICtrlSetData($nList, $aIniData[$i][0])
Next
GUISetState(@SW_SHOW, $hGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $nList
$sItem = GUICtrlRead($nList)
For $i = 1 To UBound($aIniData)-1
If $aIniData[$i][0] = $sItem Then
GUICtrlSetData($nInput, $aIniData[$i][1])
ExitLoop
EndIf
Next
Case $nSet_Button
$sItem = GUICtrlRead($nList)
If $sItem = "" Then
MsgBox(48, 'Attention', 'No selected item.', 0, $hGUI)
ContinueLoop
EndIf
For $i = 1 To UBound($aIniData)-1
If $aIniData[$i][0] = $sItem Then
$aIniData[$i][1] = GUICtrlRead($nInput)
ExitLoop
EndIf
Next
EndSwitch
WEnd
Func _OnExitProc()
IniWriteSection($sConfig_File, "Variables", $aIniData)
EndFunc