Acceleraptor
Новичок
- Сообщения
- 3
- Репутация
- 0
Вот сам код:
Задаются чекбоксы в окне, квадратом 37х37(всего 1369) и после этого надо сделать действия над каждым из них через цикл. Порядок не важен. Например, проверить включен текущий чекбокс или нет. Если включен выдать соответствующий MsgBox и перейти на проверку следующего. Это так, чисто для примера.
Сори если было, не знаю как задать в поиске, вручную не нашел. Заранее благодарен. :stars:
Код:
#Include <GUIConstantsEx.au3>
$gui= GUICreate("xxx", 900, 625)
$NButt = 37
Local $ahChk[$NButt][$NButt]
for $x=-18 to 18
for $y=-18 to 18
$ahChk[$x + 18][$y + 18] = GUICtrlCreateCheckbox ("", 15*($x+19), 15*($y+19), 15, 15)
Next
Next
$startbutton= GUICtrlCreateButton("Start", 630, 15, 50, 20)
GUISetState()
While 1
$msg = GUIGetMsg()
Switch $msg
Case $startbutton
For $i = 0 to $NButt-1
For $j = 0 to $NButt - 1
$pos = ControlGetPos($gui, "", $ahChk[$i][$j])
If Not @error Then
MsgBox(0, "Window Stats:", "POS: " & $pos[0] & "," & $pos[1] & " SIZE: " & $pos[2] & "," & $pos[3],10 )
EndIf
Next
Next
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
Задаются чекбоксы в окне, квадратом 37х37(всего 1369) и после этого надо сделать действия над каждым из них через цикл. Порядок не важен. Например, проверить включен текущий чекбокс или нет. Если включен выдать соответствующий MsgBox и перейти на проверку следующего. Это так, чисто для примера.
Сори если было, не знаю как задать в поиске, вручную не нашел. Заранее благодарен. :stars: