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

Вниз

Клавиатура   Найти похожие ветки 

 
enreas_   (2004-07-08 22:07) [0]

Уважаемые Мастера!
Скажите, почему не работает код обработки
нажатых кнопок клавы
if (key=VK_F1) and (key=$30) then
показ окна?
Если можно, покажите правильный пример!
Зараннее спасибо!


 
KilkennyCat ©   (2004-07-08 22:10) [1]

Потому что Key принимает значение только одной клавиши. Чтобы обработать несколько, вроде GetKeyboardState
если 30 - это что-то тиа аль шифт ктрл - то это проверяется в  свойстве TShiftState события онкейдаун.


 
YurikGL ©   (2004-07-08 22:17) [2]

Может на форме keypreview надо в true поставить?


 
Palladin ©   (2004-07-08 22:19) [3]


> YurikGL ©   (08.07.04 22:17)

А может вдуматся в if (key=VK_F1) and (key=$30) then и согласится с  KilkennyCat ©   (08.07.04 22:10)


 
KilkennyCat ©   (2004-07-08 22:19) [4]


> YurikGL ©   (08.07.04 22:17) [2]


бесполезно. условие невыполнимо, так как один и тот же Key сравнивается два раза.


 
Palladin ©   (2004-07-08 22:20) [5]

Вообще удивительно как можно предполагать что одна переменная может принимать в одно и тоже время два значения... у персонажа тут проблема с логикой...


 
KilkennyCat ©   (2004-07-08 22:25) [6]


> Palladin ©   (08.07.04 22:20) [5]


или хорошо с чувством юмора, если VK_F1 = $30 :) (не помню, честно говоря, код эфок).


 
YurikGL ©   (2004-07-08 22:33) [7]


> Palladin ©   (08.07.04 22:19) [3]

:) Честно скажу, - не вдумывался. Просто ошибка стандартная, когда нажимаешь клавишу, а ее нажатие не обрабатывается.



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

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

Наверх




Память: 0.48 MB
Время: 0.021 c
14-1088733250
Думкин
2004-07-02 05:54
2004.07.25
С днем рождения! 2 июля.


14-1088169388
Jeer
2004-06-25 17:16
2004.07.25
Пятничный блуд:))


3-1088485681
1
2004-06-29 09:08
2004.07.25
Каскадные изменения


3-1088971224
Max Zyuzin
2004-07-05 00:00
2004.07.25
BDE и Referential Integrity


1-1089478690
Delphi5.01
2004-07-10 20:58
2004.07.25
Prostoi vopros po povodu FileStream, CopyFrom! :-)