Клава

← →
Nika123 © (2002-10-11 11:15) [0]

Как заблокировать клавиатуру и мышь в Windows(включая NT,2000,XP).

← →
Song © (2002-10-11 13:39) [1]

Хуком.

← →
nick_vstu © (2002-10-11 14:38) [2]

> Song ©

а подробней можно
это надо какое-то сообщение ловить
если да то какое?

← →
Song © (2002-10-11 14:48) [3]

Поподробней в статьях. Ловить WH_MOUSE

← →
Nika123 © (2002-10-11 15:13) [4]

Мышка не двигалась, а нажатия клавиш не передавались Windows.

← →
Song © (2002-10-11 16:38) [5]

А Вам как надо?

← →
Геннадий (2002-10-12 22:11) [6]

А ещё вот так можно :)

BlockInput(True)
BlockInput(False)

procedure LockComp;
var
D : Integer;
begin
D:= 0; //1
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 1 {0}, @D, 0); // Вырубили ALT-TAB нафиг
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 1 {0}, @D, 0); // CTRL-ALT-DEL туда же

BlockInput(True);
end;

procedure UnLockComp;
var
D : Integer;
begin
D:= 1;
SystemParametersInfo( SPI_SETFASTTASKSWITCH, 0, @D, 0); // Врубили ALT-TAB
SystemParametersInfo( SPI_SCREENSAVERRUNNING, 0, @D, 0); // CTRL-ALT-DEL

BlockInput(False);
end;

Не знаю как там в разных ОС, но под МЕ работает.

← →
3asys (2002-10-21 13:04) [7]

>>Геннадий
А как такое-же проделать с PrintScreen ?

С Уважением, 3asys

23asys (21.10.02 13:04)
По-моему я Вам уже говорил, что один из простых и оригинальных способов - это через RegisterHotKey() тем более что в FAQ есть и по-моему как раз для PrintScreen

Клава Найти похожие ветки