|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.11.2018, 11:58 | #1 |
Пользователь
Регистрация: 14.03.2011
Сообщений: 14
|
Возможно ли скрыть кнопки меню по Alt+Ctrl+Del в Win7/Vista?
Добрый день! По нажатию Alt+Ctrl+Del в Windows Vista, Windows 7 появляются кнопки в столбик:
1. Блокировать компьютер 2. Сменить пользователя 3. Выйти из системы 4. Сменить пароль... 5. Запустить диспетчер задач 6. Отмена Возможно ли скрыть эти кнопки, оставив только последнюю "Отмена"? Например, для того, чтобы убрать кнопку "Запустить диспетчер задач", знаю такой код: uses Registry; var Reg: TRegistry; Reg:=TRegIniFile.Create(); Reg.RootKey:=HKEY_CURRENT_USER; reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\System ', true); reg.WriteInteger('DisableTaskMgr', 1); //0 - вернуть на место reg.Free; А другие кнопки убрать можно? |
06.11.2018, 12:44 | #2 |
Участник клуба
Регистрация: 03.06.2009
Сообщений: 1,834
|
как вариант, если только отследить появление окна и узнать его хэндл. затем узнать перебором хэндлы кнопок, чтоб потом все параметры, которые им передаются, обнулять. может, быть даже и можно скрыть, если послать окну сообщение... сам не пробовал
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.
Последний раз редактировалось NetSpace; 06.11.2018 в 20:39. |
06.11.2018, 12:55 | #3 |
Старожил
Регистрация: 12.01.2011
Сообщений: 19,500
|
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом. |
07.11.2018, 08:05 | #4 |
Пользователь
Регистрация: 14.03.2011
Сообщений: 14
|
Хорошие люди посоветовали ссылку.
Нашёл, но не всё. Ниже кнопки по порядку, появляющиеся по Alt+Ctrl+Del и справа записи реестра, которые отвечают за показ кнопок: 1. Блокировать компьютер - DisableLockWorkstation 2. Сменить пользователя - ? 3. Выйти из системы - NoLogoff 4. Сменить пароль... - DisableChangePassword 5. Запустить диспетчер задач - DisableTaskMgr 6. Выход - NoClose Кнопочку "Сменить пользователя" никак не убрать. |
07.11.2018, 08:05 | #5 |
Пользователь
Регистрация: 14.03.2011
Сообщений: 14
|
Или я мало курил эту таблицу, может проглядел.
|
07.11.2018, 09:25 | #6 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
проверьте этот способ - http://www.interface.ru/home.asp?artId=21841
но, честно говоря, я не удивлюсь, если это не сработает. p.s. а что это Вы такое пишете? Вирус-вымогатель? Винлокер? Какую задачу Вы пытаетесь решить столь радикально-хакерским способом?! |
07.11.2018, 09:28 | #7 |
Старожил
Регистрация: 15.02.2010
Сообщений: 15,760
|
Не спасет. Сторонних менеджеров процессов кучка и на реестр они реагируют. Да и остальные кнопки мало кто из продвинутых пользователей используют.
|
07.11.2018, 10:23 | #8 |
Пользователь
Регистрация: 14.03.2011
Сообщений: 14
|
uses Registry;
//... procedure TForm1.Button1Click(Sender: TObject); //сокрытие кнопок по Alt+Ctrl+Del var Reg: TRegistry; begin try Reg:=TRegIniFile.Create(); Reg.RootKey:=HKEY_LOCAL_MACHINE; Reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\System ', true); Reg.WriteInteger('HideFastUserSwitc hing', 1); //Сменить пользователя Reg.CloseKey; Reg.RootKey:=HKEY_CURRENT_USER; Reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\System ', true); Reg.WriteInteger('DisableLockWorkst ation', 1); //Блокировать компьютер Reg.WriteInteger('DisableChangePass word', 1);//Сменить пароль... Reg.WriteInteger('DisableTaskMgr', 1); //Запустить диспетчер задач Reg.CloseKey; Reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\Explor er', true); Reg.WriteInteger('NoLogoff', 1); //Выйти из системы Reg.WriteInteger('NoClose', 1); //Выключить компьютер Reg.Free; except ShowMessage('У Вас нет прав администратора.'); end; end; procedure TForm1.Button2Click(Sender: TObject); //отображение кнопок var Reg: TRegistry; begin try Reg:=TRegIniFile.Create(); Reg.RootKey:=HKEY_LOCAL_MACHINE; Reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\System ', true); Reg.WriteInteger('HideFastUserSwitc hing', 0); Reg.CloseKey; Reg.RootKey:=HKEY_CURRENT_USER; Reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\System ', true); Reg.WriteInteger('DisableLockWorkst ation', 0); Reg.WriteInteger('DisableChangePass word', 0); Reg.WriteInteger('DisableTaskMgr', 0); Reg.CloseKey; Reg.OpenKey('Software\Microsoft\Win dows\CurrentVersion\Policies\Explor er', true); Reg.WriteInteger('NoLogoff', 0); Reg.WriteInteger('NoClose', 0); Reg.Free; except ShowMessage('У Вас нет прав администратора.'); end; end; Последний раз редактировалось Maetsky; 08.11.2018 в 05:51. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Windows ctrl-alt-del Ubuntu alt-sysrq-i | veter_s_morya | Свободное общение | 8 | 13.08.2010 16:16 |
Как сделать так, что бы приложение не реагировало на Alt+Tab, Windows и Ctrl+Alt+Del? | st6al | Помощь студентам | 0 | 27.12.2009 19:48 |
CTRL+ALT+DEL | foxes | Общие вопросы Delphi | 8 | 06.07.2009 12:46 |
не получается отключение CTRL+alt+del? Alt+TAb, часов с панели задач и Крестик окна | Reds | Общие вопросы Delphi | 1 | 30.09.2008 10:37 |