Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как заблокировать клавиатуру и мышь? [D5, Win95/98]


JAndrey ©   (2002-01-31 01:15:00) 

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


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

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


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

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


Pat   (2002-01-31 01:58:00) [3]

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

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



Наверх

Титульная страница Поиск, карта сайта Написать письмо