SavickiyAV
Новичок
- Сообщения
- 23
- Репутация
- 0
Ниже приведен шаблон кода. Проблема в том что чекбоксы отображаются не корректно первый пропадает при наведении на него или не отображается с самого начала.
Как поправить или как правельние сделать?
#include <GUIConstantsEx.au3>
$GUI = GUICreate('okno', 400, 150)
$1 = GUICtrlCreateCheckbox("1", 10, 10, 120, 20)
$2 = GUICtrlCreateCheckbox("2", 10, 10, 120, 80)
$knopka = GUICtrlCreateButton ("knopka",0,100,400,50)
GUISetState(@SW_SHOW)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $knopka
$1_=GUICtrlRead ( $1, 0 )
$2_=GUICtrlRead ( $2, 0 )
If $1_=1 Then
$newapp="1"
MsgBox(0,'',$newapp &' = OK')
EndIf
If $2_=1 Then
$newapp="2"
MsgBox(0,'',$newapp &' = OK')
EndIf
MsgBox(0,'','все')
EndSwitch
wend
Как поправить или как правельние сделать?
#include <GUIConstantsEx.au3>
$GUI = GUICreate('okno', 400, 150)
$1 = GUICtrlCreateCheckbox("1", 10, 10, 120, 20)
$2 = GUICtrlCreateCheckbox("2", 10, 10, 120, 80)
$knopka = GUICtrlCreateButton ("knopka",0,100,400,50)
GUISetState(@SW_SHOW)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
Exit
Case $knopka
$1_=GUICtrlRead ( $1, 0 )
$2_=GUICtrlRead ( $2, 0 )
If $1_=1 Then
$newapp="1"
MsgBox(0,'',$newapp &' = OK')
EndIf
If $2_=1 Then
$newapp="2"
MsgBox(0,'',$newapp &' = OK')
EndIf
MsgBox(0,'','все')
EndSwitch
wend