Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.29;
Скачать: CL | DM;

Вниз

Работа с удаленным компьютером   Найти похожие ветки 

 
Dr.Karter   (2002-06-25 16:04) [0]

Здравствуйте уважаемые мастера!
У меня встала такая очень тонкая задача. Мне нужно знать как с другово компьютера, отключить( нажав клавишу ), а за тем включить обратно! клавиатуру и мышку, так чтобы клавиатура отключалась, даже если запущена какая-нибудь игра. Вот такой кусочек только отключает, а когда запущена игра вообще по-фиг,
клавиатуру, а включение происходит не для всей клавы только
Ctrl+Alt+Del (благодаря которой я могу закрыть приложение, а затем, после закрытия вкл. вся клава).
var
Form1: TForm1;
k_Dummy:Integer = 0;
k_OldKBHook:HHook = 0;

function KbHook( code: Integer; wparam: Word; lparam: LongInt ): LongInt;stdcall;
procedure KeyBoardOn;
procedure KeyBoardOff;

implementation
{$R *.DFM}

function KbHook( code: Integer; wparam: Word; lparam: LongInt ): LongInt;stdcall;
begin
if code<0 then Result:=CallNextHookEx( k_oldKbHook, code, wparam, lparam )
else Result:=1;
end;

// GOd¦


 
Игорь Шевченко ©   (2002-06-26 10:38) [1]

Вирус пишем ?



Страницы: 1 вся ветка

Текущий архив: 2002.08.29;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.021 c
1-95809
аааааа
2002-08-20 05:17
2002.08.29
Как подключиться к удаленной БД MySQL?


1-95738
Aszbed
2002-08-19 06:14
2002.08.29
Расположение форм


1-95905
staratel
2002-08-16 13:30
2002.08.29
Работа с формами


14-95951
Hellman
2002-08-03 20:10
2002.08.29
Win XP Style


3-95686
RDA
2002-08-08 11:50
2002.08.29
Использование справочников