Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.78/9: Рейтинг темы: голосов - 9, средняя оценка - 4.78
10-9-3-15-6
13 / 11 / 2
Регистрация: 04.09.2014
Сообщений: 221
1

Диспетчер задач

12.06.2019, 12:15. Просмотров 1729. Ответов 3
Метки нет (Все метки)

В Uses добавил Registry

Запретить получилось вот таким способом.

Delphi
1
2
3
4
5
6
7
8
9
var 
Reg:TRegistry; 
begin 
Reg:=TRegIniFile.Create; 
Reg.RootKey:=HKEY_CURRENT_USER; 
Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Policies\System', True); 
Reg.WriteInteger('DisableTaskMgr', 1); 
Reg.CloseKey; 
Reg.Free;
и разрешить вот таким способом

Delphi
1
2
3
4
5
6
7
8
9
10
var 
Reg:TRegistry; 
begin 
Reg:=TRegIniFile.Create; 
Reg.RootKey:=HKEY_CURRENT_USER; 
Reg.OpenKey('Software\Microsoft\Windows\CurrentVer sion\Policies\System', True); 
Reg.WriteInteger('DisableTaskMgr', 0); 
Reg.CloseKey; 
Reg.Free; 
end;
но именно разрешить его запуск так и не удалось.
может есть код по стабильнее?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
12.06.2019, 12:15
Ответы с готовыми решениями:

Диспетчер задач
Как сделать так чтобы при выходе из второй формы (не основной), то есть при выходе из программы,...

Закрыть диспетчер задач
Всем привет! Возникла проблема с закрытием Диспетчера задач на Windows 8.1. На Widnows 7 работал...

Диспетчер задач и компонент
Доброго всем времени суток! Меня интересует вопрос на который вы думаю знаете ответ! Какой...

Диспетчер задач ActionManager
Вопрос адресован тем, кто читал книгу "Программирование в Delphi 7" Архангельский. В разделе 4.5.2...

3
320 / 158 / 65
Регистрация: 25.02.2018
Сообщений: 591
12.06.2019, 12:25 2
Лучший ответ Сообщение было отмечено FromOutSide как решение

Решение

А так?

Добавлено через 5 минут
И тут ещё почитать.
1
1757 / 823 / 289
Регистрация: 15.11.2015
Сообщений: 3,243
12.06.2019, 13:08 3
Лучший ответ Сообщение было отмечено FromOutSide как решение

Решение

Вирусня запрещала запуск диспетчера задач и редактора реестра. Включал этим кодом:
Delphi
1
2
3
4
5
6
7
8
9
10
11
uses ... MiniReg...
...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  RegSetDword(HKEY_CURRENT_USER , 'Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools', 0);
  RegSetDword(HKEY_LOCAL_MACHINE, 'Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools', 0);
  RegSetDword(HKEY_CURRENT_USER , 'Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegedit', 0);
  RegSetDword(HKEY_LOCAL_MACHINE, 'Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegedit', 0);
  RegSetDword(HKEY_CURRENT_USER , 'Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskmgr', 0);
  RegSetDword(HKEY_LOCAL_MACHINE, 'Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskmgr', 0);
end;
1
10-9-3-15-6
13 / 11 / 2
Регистрация: 04.09.2014
Сообщений: 221
12.06.2019, 15:06  [ТС] 4
Цитата Сообщение от Ашотик2018 Посмотреть сообщение
И тут ещё почитать.
Спасибо! Получилось.
Цитата Сообщение от AzAtom Посмотреть сообщение
Включал этим кодом:
тоже на вооружение возьму
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.06.2019, 15:06

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Наход процессов в диспетчер задач
Мне нужно - Если запущен определенный процесс в диспетчер задач то выход не предлагать ЭТО var...

Выполнение кода при закрытии через диспетчер задач
В общем ситуация такая. Есть программа, которая... Работает, скажем так в фоне. Так вот. При...

Как заблокировать диспетчер задач, клавиатуру, мышь, и все остальное
Уважвемые люди!!! Желательно кидайте прямые ссылки на скачивание готовых прог (Которые блокируют...

Как закрыть скрытую программу которую нельзя выключить через диспетчер задач ?
Здравствуйте, мне нужно закрыть программу которая скрыта (ShowWindow(Application.Handle, SW_HIDE))...

Диспетчер печати
Помогите, а то завтра сдавать.... Программа «Диспетчер печати» позволяет пользователю...

Delphi диспетчер устройств
Здравствуйте. Можно ли на Delphi получить список как в диспетчере устройств с сортировкой не типу а...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.