Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Низкоуровневое программирование > Win Api
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.06.2008, 12:23   #1
Yuran
Форумчанин
 
Регистрация: 18.02.2008
Сообщений: 198
По умолчанию Отключение мышки

Как програмно отключить а потом включить мышку ????
Yuran вне форума Ответить с цитированием
Старый 23.06.2008, 12:32   #2
NikLik
Форумчанин
 
Аватар для NikLik
 
Регистрация: 22.11.2007
Сообщений: 224
По умолчанию

а если вместе с ней отключить ещё и клаву?)
делаешь так
добавляешь в программу в любом месте строку
procedure BlockInput; external 'user32.dll';
потом встявляешь эту процедуру:
Код:
procedure tform1.block(isblock:boolean);
begin
if isblock then begin
blocked:=true;
  asm
push 1
call BlockInput
end
end
else begin
blocked:=false;
asm
push 0
call BlockInput
end;
end;
end;
block(true)--блокирует мышку и клаву, отключается всё это дело с помощью нажатия ctrl+alt+del либо block(false);
но
если делать block(true) каждые, например, 80 милисекунд, и при этом ещё и завершать taskmgr, то юзверю не будет спасения)
P.S. работает только под виндой
ЛИБО
setcursorpos(0,0) каждые 10 милисекунд

Последний раз редактировалось NikLik; 23.06.2008 в 12:34.
NikLik вне форума Ответить с цитированием
Старый 23.06.2008, 13:08   #3
Yuran
Форумчанин
 
Регистрация: 18.02.2008
Сообщений: 198
По умолчанию

Спасибо. То что нужно!
Yuran вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Имитация клика мышки на экране CRASH009 Общие вопросы Delphi 6 18.08.2008 21:38
Проблема с нажатием кнопки мышки Zeraim Общие вопросы Delphi 2 23.05.2008 18:33
колЁсико мышки Experementator Общие вопросы Delphi 3 05.05.2008 16:31
Перемещение мышки с Image1 на форму Rusl92 Общие вопросы Delphi 1 27.04.2008 22:46