На данный момент заполняется поле Edit в зависимости от выбранного Combo.
как сделать чтоб в поле Edit попадали значения от всех элементов Combo?
как сделать чтоб в поле Edit попадали значения от всех элементов Combo?
Код:
#include <Array.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <EditConstants.au3>
#Include <GUIComboBox.au3>
$Form1 = GUICreate("Form1", 615, 437, 192, 124)
$Combo1 = GUICtrlCreateCombo("", 56, 56, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$Combo2 = GUICtrlCreateCombo("", 248, 56, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$Combo3 = GUICtrlCreateCombo("", 56, 156, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$Combo4 = GUICtrlCreateCombo("", 248, 156, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$Edit1 = GUICtrlCreateEdit("", 40, 280, 537, 137)
GUISetState(@SW_SHOW)
Local $aArray[][] = [ _
["Шкафа связи", "?x?x?", "600x600x2100", "", "" ], _
["ШТМ", "?x?x?", "800x600x2000", "1000x600x2000", "" ], _
["Шкаф ЗИП", "?x?x?", "600х450х700", "600х600х800", "" ], _
["ШОС", "?x?x?", "600x600x2000", "600x600x2160", "" ], _
["ШУМПС", "?x?x?", "600х250х800", "", "" ]]
For $i = 0 To UBound($aArray, 1) - 1
_GUICtrlComboBox_AddString($Combo1, $aArray[$i][0])
_GUICtrlComboBox_AddString($Combo3, $aArray[$i][0])
Next
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Combo1
_GUICtrlComboBox_ResetContent($Combo2)
$Index = _GUICtrlComboBox_GetCurSel($Combo1)
For $j = 1 To Ubound($aArray, 2) - 1
If $aArray[$Index][$j] = "" Then ExitLoop
_GUICtrlComboBox_AddString($Combo2, $aArray[$Index][$j])
Next
_GUICtrlComboBox_SetCurSel($Combo2, 0)
GUICtrlSetData($Edit1, GUICtrlRead($Combo1) & ': ' & GUICtrlRead($Combo2) & ' мм (ШхГхВ);' & @CRLF)
Case $Combo2
GUICtrlSetData($Edit1, GUICtrlRead($Combo1) & ': ' & GUICtrlRead($Combo2) & ' мм (ШхГхВ);' & @CRLF)
Case $Combo3
_GUICtrlComboBox_ResetContent($Combo4)
$Index = _GUICtrlComboBox_GetCurSel($Combo3)
For $j = 1 To Ubound($aArray, 2) - 1
If $aArray[$Index][$j] = "" Then ExitLoop
_GUICtrlComboBox_AddString($Combo4, $aArray[$Index][$j])
Next
_GUICtrlComboBox_SetCurSel($Combo4, 0)
GUICtrlSetData($Edit1, GUICtrlRead($Combo3) & ': ' & GUICtrlRead($Combo4) & ' мм (ШхГхВ);' & @CRLF)
Case $Combo4
GUICtrlSetData($Edit1, GUICtrlRead($Combo3) & ': ' & GUICtrlRead($Combo4) & ' мм (ШхГхВ);' & @CRLF)
EndSwitch
WEnd