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

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

Получить состояния клавиш Ctrl, Alt, Shift [D6, D7, Win95/98]


Tack ©   (2004-11-22 00:44:00) 

Здавствуйте!

Как получить состояния клавиш Ctrl, Alt, Shift (нажато/ненажато), когда обрабатывается сообщение WM_KEYDOWN?
Передаются ли все эти состояния через WPARAM/LPARAM в каких-нибудь битах? Я в MSDN нашел биты состояния только для клавиши Alt.

Есть какая-нибудь альтернатива функции GetKeyboardState() для этого дела, чтобы побыстрее работало?


Piter   (2004-11-22 15:41:00) [1]

VMcL ©   (22.11.04 7:44) [4]

наверное, так действительно лучше. Мой код - первое что пришло в голову после прочтения справки...


VMcL   (2004-11-22 07:44:00) [2]

>> Piter ©  (22.11.04 00:52) [1]

ИМХО, так лучше:
if GetKeyState(VK_CONTROL) and $8000 <> 0 then
 beep;


Piter   (2004-11-22 01:59:00) [3]

А что, ты не смог найти в справке описания отличий? :)

Тогда вот:

"Remarks

The key status returned from this function changes as a given thread reads key messages from its message queue. The status does not reflect the interrupt-level state associated with the hardware. Use the GetAsyncKeyState function to retrieve that information"


Tack   (2004-11-22 01:05:00) [4]

А чем отличаются GetKeyState и GetAsyncKeyState ?


Piter   (2004-11-22 00:52:00) [5]

Например, для контрола:

if (Word(GetKeyState(VK_CONTROL)) shr 15)=1 then
 beep;


Наверх

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