Alt+Ctrl+Delete

[dr.MIG]

Подскажите пожалуйста можно ли заблокировать сочетание клавиш Alt+Ctrl+Delete, т.е. когда моя программа работает при нажатии этой волшебной комбинации не должно ничего не происходить.

[ANDLL]

А Windows?

[Шнурок]

реестр виндовс. там есть такая фича: блокировка TaskManager'a правда будет вылетать окошко мол...запрещено админом

[Шнурок]

вот! нашел
DisableTaskMgr
HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System
...а это ты не вирусами промышляешь

[hCORe]

Нет, "утилитами для высокоинтеллектуальной моментальной летальной очистки диска"

[Шнурок]

hCORe
ни чего себе сказанул

[Tarik]

Подскажите пожалуйста можно ли заблокировать сочетание клавиш Alt+Ctrl+Delete, т.е. когда моя программа работает при нажатии этой волшебной комбинации не должно ничего не происходить.

Нельзя. Ибо три кнопки в виндах работают всегда, даже если хук поставишь и будешь пытаться отловить.

[ANDLL]

Если Windows - XP без SP1, можно отлавливать опявление окна TaskManager'а. Если Windows - 9x видимо, млжно подредактировать системную память... Скажем, вектор прерыванийЮ, если он там есть....

[Александр80]

dr.MIG - Как я понял, ты хочешь заблокировать вход в диспетчер задач Windows, чтобы никто не видел работу твоей программы в диспетчере задач? Может просто ее скрыть....

[Freeman]

В xp скрыть можна
смотри тут
http://bbs.vbstreets.ru/viewtopic.php?t=12120

[step]

Я В ХП ВОТ ТАК МУТИЛ, НО НЕ ЗНАЮ ПОДОЙДЁТ ТЕБЕ?


Private Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long

Private Sub Timer1_Timer()
Dim hand As Long
Dim retval As Long
hand = FindWindow(vbNullString, "Диспетчер задач Windows")
retval = ShowWindow(hand, 0)
End Sub

[A.A.Z.]

http://bbs.vbstreets.ru/viewtopic.php?p=72020#72020

[dr.MIG]

Всё прочитал. Теперь попытаюсь проанализировать.
P.S.

...а это ты не вирусами промышляешь

Ну почему чуть что сразу вирусами? Может просто для общего развития поднял этот вопрос.

[dr.MIG]

Скачал PhantomasProject... Что-то не пашет. Процесс виден как прежде и убивается на ура с первого раза. Или я чего-то не понимаю в этой жизни?

Посмотрел App.TaskVisible = False. При этом в дисп.зад. вместо названия программы св-во caption формы.

Private Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long

Private Sub Timer1_Timer()
Dim hand As Long
Dim retval As Long
hand = FindWindow(vbNullString, "Диспетчер задач Windows")
retval = ShowWindow(hand, 0)
End Sub

На XP не смотрел, на 98 - интересный эфект: если вызвать дисп.зад., а потом его потащить, то за окошком тянется шлейф из хучи туевой таких же окошек. Но всё по-прежнему убивается.

Посмотрел

HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System

"DisableTaskMgr"=0

Что-то тоже эффекта не было.

[ANDLL]

=1 вообщето

[GM]

В 98:

Код: Выделить всё

Declare Function SystemParametersInfo Lib "user32" Alias _
"SystemParametersInfoA" (ByVal uAction As Long, _
ByVal uParam As Long, ByVal lpvParam As Any, _
ByVal fuWinIni As Long) As Long

Для отключения реакции на Ctrl+Alt+Del:
SystemParametersInfo 97, True, ByVal 1&, 0

Для включения:
SystemParametersInfo 97, False, ByVal 1&, 0


[dr.MIG]

Спасибо всем за обсуждение. Теперь от моей "утилиты для высокоинтеллектуальной моментальной летальной очистки диска" так просто не отвертишься. ...Шутка

[dr.MIG]

По-моему есть какая-то функция в Winapi....

Да в WinApi вообще много чего есть. Вопрос какая функция.

[ALX_2002]

Челы.... На хрен мучаться.... Надо при запуске проги удалять TASKMGR.exe и не париться

Решим проблему на корню - удалим виндовс

[Freeman]

Челы.... На хрен мучаться.... Надо при запуске проги удалять TASKMGR.exe и не париться

в WinXp он создаётся каждый раз заново при нажатии 3-х клавиш!!!

[A.A.Z.]

Что тебе мешает удалить его из dllcache?

[GM]

Челы.... На хрен мучаться.... Надо при запуске проги удалять TASKMGR.exe и не париться

в WinXp он создаётся каждый раз заново при нажатии 3-х клавиш!!!

Не-а, ехе-шник заново не создается.

[Freeman]

2 GM если его удалить то он там опять появится - как это обьяснить?

[GM]

2 GM если его удалить то он там опять появится - как это обьяснить?

У меня почему-то не появляется.

[Freeman]

А когда нажмеш ctrl+alt+del просто ничего не делает?
а какая версия XP?

[ANDLL]

Появляется, появляется. Сказали уже: надо удалить сначало из папки system32\dllcache, а потом уже из папка system32. И то, вряд ли поможет.

[GM]

А когда нажмеш ctrl+alt+del просто ничего не делает?
а какая версия XP?

Win XP SP1, 3 кнпоки жму, a taskmgr не появляется

[dr.MIG]

Ну зачем же подходить к вопросу так глобально и извращённо: удалять TM?
Ведь код:

Declare Function SystemParametersInfo Lib "user32" Alias _
"SystemParametersInfoA" (ByVal uAction As Long, _
ByVal uParam As Long, ByVal lpvParam As Any, _
ByVal fuWinIni As Long) As Long

Для отключения реакции на Ctrl+Alt+Del:
SystemParametersInfo 97, True, ByVal 1&, 0

Для включения:
SystemParametersInfo 97, False, ByVal 1&, 0

в 98 Windows'e прекрасно работает. Неужели нет аналогичного решения для XP?

[GM]

Нет.