Текущий архив: 2003.07.28;
Скачать: CL | DM;
Вниз
Как отключить служебные клавиши (win, alt+tab и др) в WinNT/2K/XP Найти похожие ветки
← →
3S (2003-05-17 20:12) [0]Подскажите, пожалуйста, как программно отключить служебные клавиши (win, alt+tab, ctrl+esc и т.д.) в WinNT/2K/XP. Вроде был какой-то шарованный компонентик для этого?!
P.S. Фишка под Win9*/Me не работает!
← →
Song (2003-05-17 20:15) [1]Хуком.
← →
demonyator (2003-05-17 20:19) [2]
> Хуком.
....клавиатурой об колено 8-)
← →
Delphi5.01 (2003-05-18 10:40) [3]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
← →
3S (2003-05-18 12:19) [4]Хуком.
Эту фишку мы проходили и как уважаемый Delphi5.01 совершенно правильно заметил
> no k sojaleniu knopka Win proskalzivaet
И видала она хук по все платформе...
Так что это не выход...
Если кто-то справился с данной проблемой, то пожалуйста
> esli mojno primerchik
← →
DVM (2003-05-18 12:58) [5]
> 3S
На MSDN есть пример LowLevel хука на блокировку некоторых клавишь. Кажется от Рихтера.
← →
Delphi5.01 (2003-05-18 15:07) [6]>DVM sorry no ia ne ponal MSDN eto resurs, help file, sait ili chtonibut esho, elsi mojno potochnei.
Spasibo
← →
Song (2003-05-18 15:48) [7]Чтобы не проскальзывала надо хук ставить на WH_KEYBOARD_LL
← →
DVM (2003-05-18 15:55) [8]
> Delphi5.01
http://msdn.microsoft.com/msdnmag/issues/0700/win32/default.aspx
Страницы: 1 вся ветка
Текущий архив: 2003.07.28;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.005 c