Как вырубить клаву, а потом снова включить, оставив работать толь мышь. И как заставить винт шуметь на определенное время

← →
ЗЛ (2002-03-22 08:17) [0]

← →
nimble © (2002-03-22 09:05) [1]

По этому вопросу обратись к APIшникам! И по рассылке уже это проходило!

← →
Song © (2002-03-22 09:24) [2]

Поиск - классная вещь! Попробуйте Вам понравиться.

http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1000971867&n=2

← →
Fellomena (2002-03-22 11:51) [3]

Ставишь хук типа WH_KEYBOARD и из функции обработки хука Result:=1; главное, что бы не нуль. В результате клавиши "отключены"
Но Ctrl-Alt-Del и ещё некоторые комбинации работают - как их подавить - читай в форуме - рецептов полно.
Винт шуметь можно заставить очень просто - либо пишешь и тут же стираешь какой-нибудь файл, либо производишь поиск чего-нибудь на винте, либо со свопом работай интенсивнее(хороший пэйджинг обеспечен 8)

← →
Rooman © (2002-03-22 12:39) [4]

и статья 273 - создание и распространение зловредных программ:)))

← →
Chin © (2002-03-23 13:33) [5]

Чего мудрить!!! Пиши:
winexec("rundll32 keyboard,disable",SW_SHOWNORMAL);
Правда есть одна фишка. Для включения клавы помогает (помоему) только Ctrl+Alt+Reset!!!

TO Chin : А не лучше ли BlockInput ?

совместно с
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, nil, 0);

???

BlockInput либо включает либо отключает и мышь и клаву вместе, но никак не в отдельности.

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