Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как отключить служебные клавиши (win, alt+tab и др) в WinNT/2K/XP [D5, NT4, Win2k, WinXP]

3S © (2003-05-17 20:12:00)
Подскажите, пожалуйста, как программно отключить служебные клавиши (win, alt+tab, ctrl+esc и т.д.) в WinNT/2K/XP. Вроде был какой-то шарованный компонентик для этого?!

P.S. Фишка под Win9*/Me не работает!

DVM (2003-05-18 15:55:00) [1]

> Delphi5.01

http://msdn.microsoft.com/msdnmag/issues/0700/win32/default.aspx

Song (2003-05-18 15:48:00) [2]
Чтобы не проскальзывала надо хук ставить на WH_KEYBOARD_LL

Delphi5.01 (2003-05-18 15:07:00) [3]
>DVMsorry no ia ne ponal MSDN eto resurs, help file, sait ili chtonibut esho, elsi mojno potochnei.
Spasibo

DVM (2003-05-18 12:58:00) [4]

> 3S

На MSDN есть пример LowLevel хука на блокировку некоторых клавишь. Кажется от Рихтера.

3S (2003-05-18 12:19:00) [5]
Хуком.
Эту фишку мы проходили и как уважаемый Delphi5.01 совершенно правильно заметил

> no k sojaleniu knopka Win proskalzivaet

И видала она хук по все платформе...
Так что это не выход...
Если кто-то справился с данной проблемой, то пожалуйста
> esli mojno primerchik

Delphi5.01 (2003-05-18 10:40:00) [6]
Ispolzuiu tipa

SetWindowsHookEx(WH_KEYBOARD, @KeyboardHook, HInstance, 0);

no k sojaleniu knopka Win proskalzivaet, kak mojno izbejat eto?

Function KeyboardHook(Code: Integer; ParamW: WPARAM; ParamL: LPARAM): LRESULT;stdcall;
Begin
If Code IN [HC_ACTION, HC_NOREMOVE] Then
Begin
SendMessage(ShareInf^.AppWndHandle, WM_USER, ParamW, Code);
//tapa unichtojau vse dannie o najatoi knopke
ParamW:=0;
ParamL:=0;
End;
ne peredau infu sleduiushemu Hooku, no vso ravno ne rabotaet
// Result := CallNextHookEx(ShareInf^.OldHookHandle, Code, ParamW, ParamL)
End;

esli mojno primerchik

demonyator (2003-05-17 20:19:00) [7]

> Хуком.

....клавиатурой об колено 8-)

Song (2003-05-17 20:15:00) [8]
Хуком.

Наверх

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