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

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

GetKeyboardState [D6, WinXP]


Vlad25 ©   (2004-02-28 15:04:00) 

Как с помощью GetKeyboardState узнать, какая клавиша нажата? Точнее, как разобраться в массиве символов, который выдается этой процедурой?


Gero   (2004-02-29 13:52:00) [1]

> VMcL ©   (29.02.04 13:48) [3]

Да, теперь программа станет работать намного быстрее :)


VMcL   (2004-02-29 13:51:00) [2]

Кстати, если именно по сабджу:

var
 KS: TKeyboardState;
begin
 FillChar(KS, SizeOf(KS), 0);
 GetKeyboardState(KS);
 if KS[VK_CONTROL] and $80 <> 0 then ...
end;


VMcL   (2004-02-29 13:48:00) [3]

>>Gero ©  (28.02.04 21:31) [2]

С точки зрения оптимизации лучше:
if GetKeyState(VK_SomeKey) and $8000 <> 0
))


Gero   (2004-02-28 21:31:00) [4]

if GetKeyState(VK_SomeKey) and $8000 = $8000


MBo   (2004-02-28 15:14:00) [5]

В хелпе все есть


Наверх

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