Alt+F4 как отключить работу этой комбинации??? - Общие вопросы Delphi - Страница 3

ZhekON · 20.06.2007, 14:21

Ну наконецто!

АЛЬТ+ТАБ ужэ не работает, точнее моё приложэние теперь вечно главное!!!

и АЛЬТ+ТАБ ничего не можэт зделать
Это наверное StayOnTop дало такой результат... странно только почемуто этого результата никогда не мог добится

...
теперь вот проблема КАК СПРЯТАТЬ ИЗ ДИСПЕТЧЕРА ЗАДАЧ МОЮ ПРОГУ, чтобы ни в процэсах ни в приложэниях небыло видно её?

Fainder · 20.06.2007, 16:02

Цитата:

КАК СПРЯТАТЬ ИЗ ДИСПЕТЧЕРА ЗАДАЧ МОЮ ПРОГУ, чтобы ни в процэсах ни в приложэниях небыло видно её?

Вот простое решение: назови свою прогу, например svchost.exe. Сколько их там, 4,5, ну будет на одну больше, кто это заметит?
Правда, будет видно, что процесс запустил юзер, а не система.

ZhekON · 20.06.2007, 16:13

зачем мне эта смена имени,- мне реально нужно спрятать мою прогу!

Трофимов Александр · 20.06.2007, 16:40

http://www.programmersforum.ru/showt...p?t=901&page=2

ZhekON · 20.06.2007, 17:19

а именно спрятать мою прогу в диспетчере, а не сам диапетчер?

mutabor · 20.06.2007, 21:46

Цитата:

Сообщение от ZhekON

Это не проходит...(( всёравно открывается... и альт-таб работает...

P.S. Это в перезагрузке не нуждается?

Это немного не то, что я имел в вииду.
Расскажу принцип, код писать не буду, т.к. не помню уже ничего.

Как известно, из Дельфи можно редактировать реестр. Причем он никак не защищен, можно любые параметры заменить.
Был у меня как то вирус, к-рый отключил мне вызов диспетчера задач.
Я полез в нет и нашел решение проблемы. Решение такое - полезть в реестр, и где-то там параметр изменить (не помню я уже

) единичку вместо нолика. Факт в том, что помогло, стал запускаться.
Так вот, это все можно прекрасно проделать из Delphi. При таком отключении, при попытке запуска будет появлятся сообщение "Диспетчер задач отключен администратором". Ни один юзер не догадается как включить, ну а если больно грамотный попадется, так он твою прогу все равно вычислит.

mutabor · 20.06.2007, 21:57

Цитата:

Сообщение от ZhekON

зачем мне эта смена имени,- мне реально нужно спрятать мою прогу!

Кашпировский с NOD32 по тебе плачет

p.s. простите за флуд

Трофимов Александр · 21.06.2007, 13:18

Посмотри этот код может поможет, как раз на основе таймера и ничё не ругается:Вложение 739

ZhekON · 21.06.2007, 15:50

Цитата:

Сообщение от Трофимов Александр

Посмотри этот код может поможет, как раз на основе таймера и ничё не ругается:Вложение 739

прикольно

но хотелосьбы чтобы только процэс спрятать а диспетчер работал...

Still_Learn · 21.06.2007, 17:51

Как убрать программу из списка в Alt+Ctrl+Del
Code:
function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external'KERNEL32.DLL';

implementation

procedure TForm1.Button1Click(Sender: TObject);
begin//Скрываем
ifnot (csDesigning in ComponentState) then
RegisterServiceProcess(GetCurrentPr ocessID, 1);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin//Опять показываем
ifnot (csDesigning in ComponentState) then
RegisterServiceProcess(GetCurrentPr ocessID, 0);
end;
Реально тут ни слова моего... Все из FAQ.... ZhekON, ну почему ты настолько ленивый... Найди хоть что-нибудь в инете...

20.06.2007, 14:21	#21
ZhekON Форумчанин Регистрация: 24.01.2007 Сообщений: 323	Ну наконецто! АЛЬТ+ТАБ ужэ не работает, точнее моё приложэние теперь вечно главное!!! и АЛЬТ+ТАБ ничего не можэт зделать Это наверное StayOnTop дало такой результат... странно только почемуто этого результата никогда не мог добится... теперь вот проблема КАК СПРЯТАТЬ ИЗ ДИСПЕТЧЕРА ЗАДАЧ МОЮ ПРОГУ, чтобы ни в процэсах ни в приложэниях небыло видно её? Всё проще чем вы думаете, нужно только правильно подойти к тому или иному вопросу?

20.06.2007, 16:13	#23
ZhekON Форумчанин Регистрация: 24.01.2007 Сообщений: 323	зачем мне эта смена имени,- мне реально нужно спрятать мою прогу! Всё проще чем вы думаете, нужно только правильно подойти к тому или иному вопросу?

20.06.2007, 17:19	#25
ZhekON Форумчанин Регистрация: 24.01.2007 Сообщений: 323	а именно спрятать мою прогу в диспетчере, а не сам диапетчер? Всё проще чем вы думаете, нужно только правильно подойти к тому или иному вопросу?

21.06.2007, 13:18	#28
Трофимов Александр Форумчанин Регистрация: 03.11.2006 Сообщений: 321	Посмотри этот код может поможет, как раз на основе таймера и ничё не ругается:Вложение 739 Последний раз редактировалось Трофимов Александр; 02.06.2008 в 08:05.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как отключить монитор???	Манжосов Денис :)	Помощь студентам	5	14.07.2008 17:11
Имитация нажатия комбинации клавиш	Zeraim	Win Api	15	05.05.2008 20:35
для этой штуки нужны тригеры и курсоры.	zinnyrik	БД в Delphi	4	15.05.2007 14:47

20.06.2007, 16:40	#24
Трофимов Александр Форумчанин Регистрация: 03.11.2006 Сообщений: 321	http://www.programmersforum.ru/showt...p?t=901&page=2

21.06.2007, 17:51	#30
Still_Learn Пользователь Регистрация: 30.05.2007 Сообщений: 16	Как убрать программу из списка в Alt+Ctrl+Del Code: function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer; stdcall; external'KERNEL32.DLL'; implementation procedure TForm1.Button1Click(Sender: TObject); begin//Скрываем ifnot (csDesigning in ComponentState) then RegisterServiceProcess(GetCurrentPr ocessID, 1); end; procedure TForm1.Button2Click(Sender: TObject); begin//Опять показываем ifnot (csDesigning in ComponentState) then RegisterServiceProcess(GetCurrentPr ocessID, 0); end; Реально тут ни слова моего... Все из FAQ.... ZhekON, ну почему ты настолько ленивый... Найди хоть что-нибудь в инете...