Что нового

Установка галочки на пункте

Атос

Новичок
Сообщения
85
Репутация
0
Как мне установить галочку на пункте?
Переменную прекрасно понимает, но упорно не хочет ставить галку.


Код:
Local $hGUI = GUICreate('111', 350, 400)
Local $m000 = GUICtrlCreateContextMenu()
Local $m1 = GUICtrlCreateMenuItem('1', $m000)
Local $m2 = GUICtrlCreateMenuItem('2', $m000)
Local $m3 = GUICtrlCreateMenuItem('3', $m000)
Local $m4 = GUICtrlCreateMenuItem('4', $m000)
Local $m5 = GUICtrlCreateMenuItem('5', $m000)
Local $m6 = GUICtrlCreateMenuItem('6', $m000)
Local $m7 = GUICtrlCreateMenuItem('7', $m000)
$ddd = 6
For $i = 1 To 10
If $i = $ddd Then
$zv = '$m' & $i
; $zv = Eval('$m' & $iz)
; 
; Assign($mz, "data", 2)
;
MsgBox(0, $i & '   ' & $zv, $i)
;
; Execute(GUICtrlSetState($zv, 1))
; GUICtrlSetState($m5, 1)
GUICtrlSetState($zv, 1)
; MsgBox(0, Eval('zv'), '')
EndIf
Next
; GUICtrlSetState($m5, 1)

GUISetState()
While 1
Local $hMsg = GUIGetMsg(1)
Select
Case $hMsg[0] = -3
Exit
EndSelect
WEnd
 
Автор
А

Атос

Новичок
Сообщения
85
Репутация
0
InnI, спасибо. А то я хожу вокруг, да около.
 
Верх