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

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

Блокировка клавиши [D7, XP]


multis ©   (2008-04-27 02:52:00) 

Как заблокировать клавишу Win (или любую другую)?


DrPass   (2008-04-27 16:26:00) [1]


> VirEx ©   (27.04.08 12:57) [5]
> автора за такое - жечь на костре прилюдно

Достаточно просто обжечь пятки зажигалкой


VirEx   (2008-04-27 12:57:00) [2]

автора за такое - жечь на костре прилюдно


AIK   (2008-04-27 12:15:00) [3]


> Можно и попроще типа: EnableWindow(FindWindow('Shell_TrayWnd',
>  nil), false);


упс... эт всю понель, а только кнопку:
EnableWindow(FindWindowEx(StartBtnWnd, 0, 'Button', nil), false);


AIK   (2008-04-27 12:01:00) [4]

Ёжик эт только на панели управления (Shell_TrayWnd) пуск блокирует, а на форме то работает.
Можно и попроще типа: EnableWindow(FindWindow('Shell_TrayWnd', nil), false);
эффективнее всё же будет пост 1


Ёжик   (2008-04-27 09:08:00) [5]

В частности, клавишу "Win" можно заблокировать так:

SetWindowLong(FindWindowEx(
               FindWindow('Shell_TrayWnd', nil),
               0,                              
               'Button',
               nil),
               GWL_ID,
               -1);


Cj   (2008-04-27 04:18:00) [6]

Хуки ставь


Наверх

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