Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.11.2018, 11:58   #1
Maetsky
Пользователь
 
Регистрация: 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;

А другие кнопки убрать можно?
Maetsky вне форума Ответить с цитированием
Старый 06.11.2018, 12:44   #2
NetSpace
Участник клуба
 
Аватар для NetSpace
 
Регистрация: 03.06.2009
Сообщений: 1,792
По умолчанию

как вариант, если только отследить появление окна и узнать его хэндл. затем узнать перебором хэндлы кнопок, чтоб потом все параметры, которые им передаются, обнулять. может, быть даже и можно скрыть, если послать окну сообщение... сам не пробовал
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.

Последний раз редактировалось NetSpace; 06.11.2018 в 20:39.
NetSpace вне форума Ответить с цитированием
Старый 06.11.2018, 12:55   #3
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Цитата:
Сообщение от NetSpace Посмотреть сообщение
отловить хэндл окна
Как ловить будете?
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 07.11.2018, 08:05   #4
Maetsky
Пользователь
 
Регистрация: 14.03.2011
Сообщений: 14
По умолчанию

Хорошие люди посоветовали ссылку.
Нашёл, но не всё. Ниже кнопки по порядку, появляющиеся по Alt+Ctrl+Del и справа записи реестра, которые отвечают за показ кнопок:

1. Блокировать компьютер - DisableLockWorkstation
2. Сменить пользователя - ?
3. Выйти из системы - NoLogoff
4. Сменить пароль... - DisableChangePassword
5. Запустить диспетчер задач - DisableTaskMgr
6. Выход - NoClose

Кнопочку "Сменить пользователя" никак не убрать.
Maetsky вне форума Ответить с цитированием
Старый 07.11.2018, 08:05   #5
Maetsky
Пользователь
 
Регистрация: 14.03.2011
Сообщений: 14
По умолчанию

Или я мало курил эту таблицу, может проглядел.
Maetsky вне форума Ответить с цитированием
Старый 07.11.2018, 09:25   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

проверьте этот способ - http://www.interface.ru/home.asp?artId=21841
но, честно говоря, я не удивлюсь, если это не сработает.


p.s. а что это Вы такое пишете?
Вирус-вымогатель? Винлокер?
Какую задачу Вы пытаетесь решить столь радикально-хакерским способом?!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 07.11.2018, 09:28   #7
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

Не спасет. Сторонних менеджеров процессов кучка и на реестр они реагируют. Да и остальные кнопки мало кто из продвинутых пользователей используют.
p51x на форуме Ответить с цитированием
Старый 07.11.2018, 10:23   #8
Maetsky
Пользователь
 
Регистрация: 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.
Maetsky вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
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