Здравствуйте.
Использую AutoIt: v.3.3.8.1
В главном окне создал две вкладки. На каждой вкладке чекбоксы со своими заданиями. Так вот, что-бы я не выбирал, отрабатывают задания только от чекбоксов что на первой вкладке.
Использую AutoIt: v.3.3.8.1
В главном окне создал две вкладки. На каждой вкладке чекбоксы со своими заданиями. Так вот, что-бы я не выбирал, отрабатывают задания только от чекбоксов что на первой вкладке.
Код:
;Отобразить главное окно
Global $i, $iCount
Global $hGui = GUICreate("DAU", 175, 410, -1, -1, $WS_SYSMENU, $WS_EX_TOPMOST)
Global $nButton1 = GUICtrlCreateButton("Загрузить", 35, 350, 90)
Global $tab = GUICtrlCreateTab(2, 2, 167, 345, $TCS_SCROLLOPPOSITE)
GUICtrlCreateTabItem("Утилиты")
GUICtrlCreateLabel("Версии антивирусных утилит", 5, 30, 158, -1, $SS_SUNKEN, BitOR($SS_CENTER, $SS_ETCHEDFRAME, $SS_WHITEFRAME))
GUICtrlSetTip(6, $DrWeb & @CRLF & $Kasp & @CRLF & $AVZ & @CRLF & $VerMBAM & @CRLF & $Hijack & @CRLF & $UVS & @CRLF & $GMER & @CRLF & $McA & @CRLF & $COFulV & @CRLF & $EKitFulV & @CRLF & $VUploaderFulAdrV & @CRLF & $HPFulDataU & @CRLF & $CBFFulDataU & @CRLF & $ATMFulData, 'Наличие версий программ', 1, 3)
Global $aCheckbox[15] = [14, 'Dr.Web CureIt!', 'Kaspersky AVP Tool', 'Malwarebytes', 'AVZ', 'HijackThis', 'UVS', 'GMER', 'McAfee-Stinger', 'COMODO CE', 'Emsisoft EKit', 'VirusTotal Uploader', 'Hitman Pro', 'ComboFix', 'AnVir Task Manager']
;Отрисовка чекбоксов
For $i = 1 To $aCheckbox[0]
$aCheckbox[$i] = GUICtrlCreateCheckbox($aCheckbox[$i], 8, 60 + ($i - 1) * 20)
Next
GUICtrlSetState(-1, $GUI_SHOW) ; будет отображаться выбранной
GUICtrlCreateTabItem("CD-DVD-USB")
GUICtrlCreateLabel("Версии cd-dvd-usb утилит", 5, 30, 158, -1, $SS_SUNKEN, BitOR($SS_CENTER, $SS_ETCHEDFRAME, $SS_WHITEFRAME))
GUICtrlSetTip(22, $DrFulDataU & @CRLF & $DrFulDataC & @CRLF & $KFulAdrV & @CRLF & $AFulAdr & @CRLF & $NODFulAdr & @CRLF & $BitDefFulAdr & @CRLF & $TrendFulAdr & @CRLF & $eScanFulAdrV & @CRLF & $COFAdrCDV & @CRLF & $AVGFulV & @CRLF & $TPFulAdrV & @CRLF & $VBAFulDataU & @CRLF & $SMSFulDataU & @CRLF & $mFileNameP, 'Наличие версий дисков', 1, 3)
Global $bCheckbox[15] = [14, 'Dr.Web LiveCD', 'Dr.Web LiveUSB', 'Kaspersky Rescue Disk', 'Avira Rescue System', 'ESET NOD32 LiveCD', 'BitDefenderRescueCD', 'Trend Micro Rescue Disk', 'eScanLiveCD', 'Comodo RD', 'AVG RD', 'TrustPort LCD', 'VBA32 Rescue', 'AntiSMS', 'PC Tools AOSS CD']
For $i = 1 To $bCheckbox[0]
$bCheckbox[$i] = GUICtrlCreateCheckbox($bCheckbox[$i], 8, 60 + ($i - 1) * 20)
Next
GUICtrlCreateTabItem("") ; определяет конец вкладок
GUISetState()
;Цикл выполнения основных функций GUI
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
MFLog()
MFClearTemp()
Exit
Case $nButton1
HotKeySet('s')
HotKeySet('h')
HotKeySet('c')
$iCount = 0
For $i = 1 To $aCheckbox[0]
If BitAND(GUICtrlRead($aCheckbox[$i]), $GUI_CHECKED) Then
Sleep(100)
$iCount += 1
Execute('_' & $i & '()')
ConsoleWrite(@error & @LF)
EndIf
Next
For $i = 1 To $bCheckbox[0]
If BitAND(GUICtrlRead($bCheckbox[$i]), $GUI_CHECKED) Then
Sleep(100)
$iCount += 1
Execute('_' & $i & '()')
ConsoleWrite(@error & @LF)
EndIf
Next
If Not $iCount Then
MsgBox(16+262144, 'Error', 'Ничего не выбрано!!!', 0)
MFLogBad()
MFClearTemp()
Exit
EndIf
MFLog()
MFClearTemp()
Exit
EndSwitch
WEnd