Форум: "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.017 c
1-22715           Di_wind               2002-03-26 21:07  2002.04.08  
Динамическое создание.


1-22618           VictorT               2002-03-27 16:29  2002.04.08  
Список файлов в конкретной папке (без вложеных)


1-22712           $Hic0                 2002-03-26 16:24  2002.04.08  
Непонятно отчего ошибка раз... неясно почему она не обрабатывается :(


3-22542           Cyber                 2002-03-15 07:48  2002.04.08  
Backup в Interbase


1-22684           lipskiy               2002-03-24 23:23  2002.04.08  
TThread: Что значит ошибка