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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 27.05.2008, 14:06   #1
JoanM
Дешево пишу проги)
Форумчанин Подтвердите свой е-майл
 
Аватар для JoanM
 
Регистрация: 12.12.2006
Сообщений: 106
По умолчанию Выключение клавиатуры

Здравствуйте!
Скажите пожайлуста, как программно выключить клавиатуру (вобще вырубить, чтобы даже CTRL+ALT+DEL не работало), выключить мышь (нет реакции системы на её движение). Желательно, чтобы всё это можно было вырубить по отдельности. Наиболее важен для меня ответ на 1-ый вопрос. Нужно как можно скорее.
Заранее спасибо!
JoanM вне форума Ответить с цитированием
Старый 28.05.2008, 07:20   #2
JoanM
Дешево пишу проги)
Форумчанин Подтвердите свой е-майл
 
Аватар для JoanM
 
Регистрация: 12.12.2006
Сообщений: 106
По умолчанию

Что? Никто не знает?
JoanM вне форума Ответить с цитированием
Старый 28.05.2008, 08:24   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Что? Никто не знает?
Пробовал хук глобальный ставить?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 28.05.2008, 09:26   #4
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

теоретически
EnableHadwareInput(Enable:boolean):
но разблокировать можно будет именно alt+ctrl+del
или полностью отключать устройство в системе, но за это надо руки отрезать )
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 28.05.2008, 09:51   #5
Terran
Участник клуба
 
Аватар для Terran
 
Регистрация: 28.11.2007
Сообщений: 1,521
По умолчанию

Я знаю такой вариант, но CTRL+ALT+DEL будет работать и при нажатии всё разблокируется. Я в этом случае ставил блокировку в таймер.

Procedure BlockInput; External 'user32.dll';

Procedure Block;
Asm
Push 1;
Call BlockInput;
End;

Procedure UnBlock;
Asm
Push 0;
Call BlockInput;
End;
Всегда рад помочь!
Terran вне форума Ответить с цитированием
Старый 30.05.2008, 06:58   #6
JoanM
Дешево пишу проги)
Форумчанин Подтвердите свой е-майл
 
Аватар для JoanM
 
Регистрация: 12.12.2006
Сообщений: 106
По умолчанию

Подскажие, как поставить ловушку на кнопки Ctrl и Alt (и желательно Del)!
JoanM вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Выключение компьютера aesoem Общие вопросы Delphi 2 03.07.2008 16:50
Выключение и перезагрузка Патрон Win Api 8 26.03.2008 16:24
Выключение компютера Rahim1993 Win Api 3 03.02.2008 11:23
выключение компьютера Svop Общие вопросы Delphi 23 18.12.2006 22:57