Программное выключение клавиатуры и мыши

Delphi , ОС и Железо , Мышка и Курсор

Программное выключение клавиатуры и мыши

Code:

winexec(Pchar('rundll32 keyboard,disable' ) ,sw_Show); //Отключение клавиатуры 

        winexec(Pchar('rundll32 mouse,disable' ) ,sw_Show); //Отключение мыши

Отключение клавиатуры

Code:

Asm 

        in al,21h

        or al,00000010b

        out 21h,al

        End;

Включение клавиатуры

Code:

Asm 

        in al,21h

        mov  al,0

        out 21h,al

        End;

Автор: Radmin

BlockInput(), живёт в user32.dll

Автор: Song

Взято с Vingrad.ru http://forum.vingrad.ru

Статья Программное выключение клавиатуры и мыши раздела ОС и Железо Мышка и Курсор может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Мышка и Курсор ::

19.04.2024 15:56:24/0.00089716911315918/0