Главная страница
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.026 c
8-1084255400
Akron
2004-05-11 10:03
2004.07.25
Добавление ani курсора в RC и использование его в EXE


9-1080627452
Goida
2004-03-30 10:17
2004.07.25
Пересечение луча и "какой-то" фигуры...


8-1084256134
Akron
2004-05-11 10:15
2004.07.25
Работа с MS Agent


3-1088514199
Sonnik
2004-06-29 17:03
2004.07.25
Пользовательский интерфейс.


1-1089451041
CyberS
2004-07-10 13:17
2004.07.25
SaveToStream