Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Вниз

Как заблокировать клавиатуру и мышь? 


JAndrey   (2002-01-31 01:15) [0]

Как заблокировать клавиатуру и мышь?



Pat   (2002-01-31 01:58) [1]

Ctrl+Alt+Del работает...но это уже совсем другая история :-))

procedure BlockInput(a:boolean);stdcall; external "user32.dll";
...............
procedure TForm1.FormCreate(Sender: TObject);
begin
blockinput(true)// блокирует false - разблокирует
end;




nick_vstu   (2002-02-01 05:30) [2]

есть такие команды которые можно писать в командной строке
rundll32 mouse,disabled - отлючает мишь(перед и после запятой не должно быть пробела)
rundll32 keyboard,disabled - клавиатуру.
Правда если написать
rundll32 mouse,enabled то ничего не подключиться :)только после перезагрузки



slym   (2002-02-06 18:09) [3]

blockinput(true) - три пальца и разблокирует
Мой выход: притваряйся скринсейвером -
SystemParametersInfo(SPI_ScreenSaverRuning,true,GetCurrentThread,0)
три пальца гасит, а перед этим гасищъ мыщъ...




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.027 c
14-22845          Olgerd                2002-02-25 12:09  2002.04.08  
Эмуляция сетки


14-22831          VID                   2002-02-28 20:33  2002.04.08  
Посто интересно


14-22803          evgeg                 2002-02-26 08:23  2002.04.08  
Надоела безосновательная реклама NET


1-22619           Potemkin              2002-03-27 17:03  2002.04.08  
Вопрос по Image


3-22530           Sergey-ZZZ            2002-03-04 19:12  2002.04.08  
FastReport245