Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Отключение/включение мыши/клавы [D5, D6, Win95/98, WinME, NT4, Win2k, WinXP]


zooooo ©   (2002-04-22 02:20:00) 

Надобно по моему хотению ;) делать сабж, причём что бы и директиксовые прилаги не могли читать клаву(мышь)
...Да отключить не вопрос rundll32 keyboard, disable - но тогда как включить? Может есть другой способ?


Kondusov Victor   (2002-04-23 07:23:00) [1]

Procedure BlockInput(ABlockInput : boolean); stdcall; external "USER32.DLL";

Включение:

BlockInput(True);
{а потом отключить Alt-Ctrl-Del (Alt-Tab, Win ... ):}
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 1, 0, 0);

А так всё включить:
BlockInput(False);
SystemParametersInfo(SPI_SCREENSAVERRUNNING, 0, 0, 0);


Севостьянов Игорь   (2002-04-22 11:16:00) [2]

Сколько же можно подымать этот вопрос ?
zooooo (22.04.02 02:20)ты что искать не умеешь ?
Хотя бы поискал на данном сайте
Могу сказать одно выключить и включить дело нехитрое
Только вот интересно как ты включишь ее ? Разве по таймеру или по мессаге какой-нибудь...


Song   (2002-04-22 08:29:00) [3]

А enable не действует?

Может есть другой способ?- есть: BlockInput(), но тока вместе с клавой.


Наверх

Титульная страница Поиск, карта сайта Написать письмо