Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.25;
Скачать: CL | DM;

Вниз

GetKeyboardState   Найти похожие ветки 

 
Vlad25   (2004-02-28 15:04) [0]

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


 
MBo ©   (2004-02-28 15:14) [1]

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


 
Gero ©   (2004-02-28 21:31) [2]

if GetKeyState(VK_SomeKey) and $8000 = $8000


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

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

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


 
VMcL ©   (2004-02-29 13:51) [4]

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

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


 
Gero ©   (2004-02-29 13:52) [5]

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

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



Страницы: 1 вся ветка

Текущий архив: 2004.04.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
1-1081155133
MegaVolt
2004-04-05 12:52
2004.04.25
Простенький архиватор.


1-1081618730
Анатолий Ксюндзский
2004-04-10 21:38
2004.04.25
TNotifyEvent


14-1080843074
Ig
2004-04-01 22:11
2004.04.25
Маленький размер исполняемого файла на Delphi...


1-1081173548
Ш-К
2004-04-05 17:59
2004.04.25
Format and Indent


1-1081120749
Broot
2004-04-05 03:19
2004.04.25
Генерация кривой