Как заблокировать вводDelphi , ОС и Железо , КлавишиКак заблокировать ввод
Вот недокументированная функция из User32.dll, которая блокирует ввод (мышь, клавиатуру кроме Ctrl+Alt+Del). При нажатии Ctrl+Alt+Del все разблокируется :-(
Передаем параметры в стек вручную через push, иначе что-то глючит: 1 - заблокировать
Программный код на Delphi, использующий функцию Функция Пример кода:
Для использования этого кода обычно вызываются эти процедуры в начале и конце программы, чтобы блокировать и разблокировать ввод, когда это необходимо. Однако, пожалуйста, обратите внимание, что есть более современные и безопасные способы достижения этой функциональности в современных версиях Delphi. Например, можно использовать.unit Обновленный код:
Этот код использует функцию Статья рассказывает о недокументированной функции из User32.dll, которая позволяет заблокировать ввод с помощью процедуры BlockInput, а также предлагает примеры кода на языке Pascal для реализации этой функции. Комментарии и вопросы:: 2012-01-15 18:57:19 :: re:Как заблокировать вводпользователь: Dennis. Ничерта не работает. Клава и мышь, как работали, так и продолжают, при старте приложение не выдаёт никаких ошибок. :: 2012-05-10 17:49:50 :: re:Как заблокировать вводпользователь: kan. Это для старых виндов Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.
|
||||||||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |