Подстановка значений из ini-файла в ComboBox

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiComboBox.au3>

$Form1_1 = GUICreate("Form1", 354, 572, 821, 257)
$Button1 = GUICtrlCreateButton("Button1", 24, 520, 129, 25)
$Combo1 = GUICtrlCreateCombo("", 16, 208, 153, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL, $CBS_DROPDOWNLIST))
GUISetState(@SW_SHOW)
Global $Radio1 = GUICtrlCreateRadio("Выбор1", 8, 24, 135, 16)
Global $Radio2 = GUICtrlCreateRadio("Выбор2", 8, 55, 135, 16)

$INI1 = IniRead(@ScriptDir & '\1.ini', 'commands', 'key', '')
$INI2 = IniRead(@ScriptDir & '\2.ini', 'drivers', 'key2', '')

Func SetButtonState()
    if GUICtrlRead($Radio1) = $GUI_CHECKED _
    Then
	  _GUICtrlComboBox_ResetContent($Combo1)
   GuiCtrlSetData($Combo1, $INI1, StringLeft($INI1, StringInStr($INI1&'|', '|')-1))
   Else
   if   GUICtrlRead($Radio2) = $GUI_CHECKED _
   Then
	  _GUICtrlComboBox_ResetContent($Combo1)
   GuiCtrlSetData($Combo1, $INI2, StringLeft($INI2, StringInStr($INI2&'|', '|')-1))
   EndIf
EndIf
EndFunc

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
		 Case $Button1
		 Case $Radio1
			SetButtonState()
		 Case $Radio2
			SetButtonState()
	EndSwitch
WEnd

$result=GUICtrlRead($Combo1)
if $result = "Иванов" Then
   MsgBox(0,"","Логинимся под Ивановым")
  ;функция ввода логина и пароля для Иванова
EndIf

#include <GUIConstants.au3>

$Form1_1 = GUICreate("Form1", 354, 572, 821, 257)
$Button1 = GUICtrlCreateButton("Button1", 24, 520, 129, 25)
$Combo1 = GUICtrlCreateCombo("", 16, 208, 153, 25, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL, $CBS_DROPDOWNLIST))
GUISetState(@SW_SHOW)
Global $Radio1 = GUICtrlCreateRadio("Выбор1", 8, 24, 135, 16)
Global $Radio2 = GUICtrlCreateRadio("Выбор2", 8, 55, 135, 16)

$INI1 = IniRead(@ScriptDir & '\1.ini', 'Users1', 'Izh1', '')
$INI2 = IniRead(@ScriptDir & '\2.ini', 'Users2', 'Moscow', '')

Func Login($user, $pass)
    Opt("WinTitleMatchMode", 2)
    $login = WinWait("авторизация", "")
    WinActivate($login)
    Sleep(500) ; Дождаться, когда контролы станут активны
    ControlSetText($login, "", "[CLASS:TEdit; INSTANCE:2]", $user) ; Поле с именем
    ControlSetText($login, "", "[CLASS:TEdit; INSTANCE:1]", $pass) ; Поле с паролем
    ControlClick($login, "", "[CLASS:TButton; INSTANCE:1]") ; Кнопка
EndFunc

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
      Select
        Case BitAND(GUICtrlRead($Radio1), $GUI_CHECKED) = $GUI_CHECKED
          MsgBox(0, "", "Отмечен Radio1", 0, $Form1_1)
		  RunWait(@ComSpec & ' /C regedit /s "' & @ScriptDir & '\etc\srv1.reg"', '', @SW_HIDE)
        Case BitAND(GUICtrlRead($Radio2), $GUI_CHECKED) = $GUI_CHECKED
          MsgBox(0, "", "Отмечен Radio2", 0, $Form1_1)
        Case Else
          MsgBox(0, "", "Не отмечены", 0, $Form1_1)
      EndSelect
      MsgBox(0, "", "В Combo выбрана строка: " & GUICtrlRead($Combo1), 0, $Form1_1)
	  $result=GUICtrlRead($Combo1)
	  If ProcessExists("TrueConf.exe") Then
                    MsgBox(64, $title, "TrueConf уже запущен")
            Else
                    Run(@ProgramFilesDir & "\TrueConf Client\TrueConf.exe")
				 EndIf
				 ; Активация клиента
                $client = WinWait("TrueConf Client")
                WinActivate($client)
                Send("{ALT}{ENTER}")
                Sleep(500)
	  if $result = "Сырбов" Then
		 MsgBox(0,"","Логинимся под Ивановым")
	  Login("login", "passwd")
	  EndIf
	  MsgBox(0,"",$result)
        Case $Radio1
      GUICtrlSetData($Combo1, "|" & $INI1, $INI1)
        Case $Radio2
      GUICtrlSetData($Combo1, "|" & $INI2, $INI2)
    EndSwitch
 WEnd

...
      Case $Button1
        Login(GUICtrlRead($Combo1))
...
Func Login($str)
    $data = StringSplit(IniRead(@ScriptDir & '\1.ini', 'Users', $str, ''), "|")
    $user = $data[1]
    $pass = $data[2]
    Opt("WinTitleMatchMode", 2)
    $login = WinWait("авторизация", "")
    WinActivate($login)
    Sleep(500) ; Дождаться, когда контролы станут активны
    ControlSetText($login, "", "[CLASS:TEdit; INSTANCE:2]", $user) ; Поле с именем
    ControlSetText($login, "", "[CLASS:TEdit; INSTANCE:1]", $pass) ; Поле с паролем
    ControlClick($login, "", "[CLASS:TButton; INSTANCE:1]") ; Кнопка
EndFunc

#include <Array.au3>
#include <GUIConstants.au3>
#include <GuiComboBox.au3>

Global $users, $userRecords
Global $ini = "boxes.ini"


Func GetApplicableUsers($server)
	Local $result[0][3]
	For $username In $users
		$records = IniReadSection($ini, $username)
		$nName = _ArraySearch($records, "name_" & $server, 0, 0, 0, 2, 1, 0)
		$nPass = _ArraySearch($records, "pass_" & $server, 0, 0, 0, 2, 1, 0)
		If $nName <> -1 And $nPass <> -1 Then
			_ArrayAdd($result, $username & "|" & $records[$nName][1] & "|" & $records[$nPass][1])
		EndIf
	Next
	Return $result
EndFunc

Func _ArrayExtractColumn(Const ByRef $aArray, $iCol = 0)
	Local $result[0]
	For $i = 0 To UBound($aArray) - 1
		_ArrayAdd($result, $aArray[$i][$iCol])
	Next
	Return $result
EndFunc

; Серверы
; Формат [название, адрес]
$servers = IniReadSection($ini, "Servers")
;_ArrayDisplay($servers)

; Пользователи
; Формат [тэг, значение]
$users = IniReadSectionNames($ini)
Global $userRecords
_ArrayDelete($users, 0)
$l = UBound($users)-1
For $i = $l To 0 Step -1
	If $users[$i] == "Servers" Then
		_ArrayDelete($users, $i)
	EndIf
Next

; Формат $userRecords
; [полное имя, юзернейм, пасс]

; Интерфейс
$form = GUICreate("Boxes", 300, 200)
$serverBox = GUICtrlCreateCombo("", 20, 20, 260, -1, $CBS_DROPDOWNLIST)
; GUICtrlSetStyle($serverBox, $CBS_DISABLENOSCROLL)
GUICtrlSetData(-1, _ArrayToString($servers, "|", 1, $servers[0][0], "|", 0, 0))
_GUICtrlComboBox_SetCurSel(-1, 0)

$userBox = GUICtrlCreateCombo("", 20, 60, 260, -1, $CBS_DROPDOWNLIST)
UpdateUserBox()

$startButton = GUICtrlCreateButton("Сделай это!", 20, 100, 260)

Func UpdateUserBox()
	$serverName = GUICtrlRead($serverBox)
	$userRecords = GetApplicableUsers($serverName)
	$userNames = _ArrayExtractColumn($userRecords)
	_GUICtrlComboBox_ResetContent($userBox)
	GUICtrlSetData($userBox, _ArrayToString($userNames))
	_GUICtrlComboBox_SetCurSel($userBox, 0)
EndFunc

Func DoTheThing()
	$serverName = GUICtrlRead($serverBox)
	$userFullName = GUICtrlRead($userBox)
	$i = _ArraySearch($servers, $serverName, 0, 0, 1, 2, 1, 0)
	$serverAddress = $servers[$i][1]
	$i = _ArraySearch($userRecords, $userFullName, 0, 0, 1, 2, 1, 0)
	$userName = $userRecords[$i][1]
	$userPass = $userRecords[$i][2]
	MsgBox(0, "Ура!", "Логинимся на сервер " & @CRLF & @CRLF & _
		$serverAddress & @CRLF & @CRLF & _
		"с этими данными:" & @CRLF & @CRLF & _
		"Пользователь: " & $userName & @CRLF & _
		"Пароль: " & $userPass)
EndFunc

GUISetState(@SW_SHOW)
While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $serverBox
			UpdateUserBox()

		Case $startButton
			DoTheThing()
	EndSwitch
WEnd