ViSiToR
Silver Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Maza Faka У тебя в корне неверно построено всё... Зачем задавать значения при нажатии чекбоксов? Ты проверяешь выбор (Select), там будет происходить только одно условие/случай (первое найденное)... Вот поизучай Код: #include <GUIConstants.au3> GUICreate("Easy Tweaker for client workstation", 350, 280, -1, -1, -1, $WS_EX_CLIENTEDGE) GuiSetIcon("regedit.exe", 0) ;GUISetBkColor(0xE0FFFF ;Label GUICtrlCreateLabel("Каталог для временных (temp)файлов", 10, 185, 200, 15) GUICtrlCreateLabel("Настройка прокси", 10, 235, 100, 15) ;Buttons $ok = GuiCtrlCreateButton("Ok", 200, 250, 60, -1, $BS_FLAT) $cancel = GUICtrlCreateButton("Cancel", 285, 250, 60, -1, $BS_FLAT) ;Input $tmp = GUICtrlCreateInput(@HomeDrive & "\Temp", 10, 200, 100, 17, -1) GUICtrlSetTip(-1, "Введите путь для папки с временными файлами") $proksi = GUICtrlCreateInput("192.168.0.11:8080", 10, 250, 100, 17, -1) GUICtrlSetTip(-1, "Укажите IP-адрес сервера и порт") ;Checkbox $print = GUICtrlCreateCheckbox("Отменить поиск сетевых принтеров", 10, 10, 200, 15) GUICtrlSetTip(-1, "Ускоряет отображение сетевых подключений") $sched = GUICtrlCreateCheckbox("Отменить поиск назначенных заданий", 10, 25, 215, 15) GUICtrlSetTip(-1, "Ускоряет отображение сетевых подключений") $chkdsk = GUICtrlCreateCheckbox("Сократить время ожидания перед проверкой диска", 10, 40, 280, 15) GUICtrlSetTip(-1, "Сокращает время ожидания с 10 до 3 секунд") $update = GUICtrlCreateCheckbox("Отключить автоматическое обновление Windows", 10, 55, 270, 15) GUICtrlSetTip(-1, "Полностью отключить обновление Windows из интернета") $clean = GUICtrlCreateCheckbox("Отключить мастер очистки рабочего стола", 10, 70, 235, 15) GUICtrlSetTip(-1, "Отключает очистку рабочего стола от неиспользуемых ярлыков") $secur = GUICtrlCreateCheckbox("Отключить все предупреждения центра безопасности", 10, 85, 300, 15) GUICtrlSetTip(-1, "Отключает значок предупреждения системы безопасности в трее") $remote = GUICtrlCreateCheckbox("Отключить отправку приглашения удалённому помощнику", 10, 100, 340, 15) GUICtrlSetTip(-1, "Отключает возможность удалённого подключения к рабочему столу компьютера") $share = GUICtrlCreateCheckbox("Отключить простой общий доступ к файлам", 10, 115, 250, 15) GUICtrlSetTip(-1, "Устанавливает классический диалог назначения прав и доступа") $bug = GUICtrlCreateCheckbox("Отключить отчёт об ошибках", 10, 130, 200, 15) GUICtrlSetTip(-1, "Отключает возможность отправки отчёта об ошибке в Microsoft") GUISetState() While 1 $Msg = GUIGetMsg() Switch $Msg Case $ok $PrintRead = GUICtrlRead($print) $SchedRead = GUICtrlRead($sched) $ChkdskRead = GUICtrlRead($chkdsk) $UpdateRead = GUICtrlRead($update) $CleanRead = GUICtrlRead($clean) $SecurRead = GUICtrlRead($secur) $RemoteRead = GUICtrlRead($remote) $ShareRead = GUICtrlRead($share) $BugRead = GUICtrlRead($bug) If $PrintRead = $GUI_CHECKED Then RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace\" & _ "{2227A280-3AEA-1069-A2DE-08002B30309D}") EndIf If $SchedRead = $GUI_CHECKED Then RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace\" & _ "{D6277990-4C6A-11CF-8D87-00AA0060F5BF}") EndIf If $ChkdskRead = $GUI_CHECKED Then RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager", "AutoChkTimeOut", "REG_DWORD", "3") EndIf ;И так далее... ExitLoop Case $cancel ExitLoop EndSwitch WEnd |
---------- ViSiToR a.k.a CreatoR CreatoR это не ник, CreatoR это стиль жизни! |
|