if Key = VK_F1 then

← →
New555 (2010-06-25 22:47) [0]

ругается Incompatible type. Что не так?

← →
turbouser © (2010-06-25 22:53) [1]

это в онкейпресс? тогда ясно:)))
сделай Ord(Key) = VK_F1

← →
New555 (2010-06-25 22:58) [2]

Спасибо. Теперь все компилируется, но появилась другая проблема.
Онкейпресс на нажатие символьной кнопки реагирует, а на нажатие f1, f2 и прочих не хочет.

← →
turbouser © (2010-06-25 22:59) [3]

> New555 (25.06.10 22:58) [2]

Ord(Key) in [VK_F1, VK_F2, VK_F3]

← →
New555 (2010-06-25 23:02) [4]

Это понятно. Я про то, что при нажатии f1 процедура вообще не запускается. Если нажать кнопку 1 или любой символ, то запускается. А если f1, то нет.

← →
turbouser © (2010-06-25 23:04) [5]

> New555 (25.06.10 23:02) [4]

у формы есть свойство keypreview - почитай про него.
ну, и, может и на онкейдаун отработает. не помню.

← →
New555 (2010-06-25 23:11) [6]

Онкейдаун отрабатывает. Спасибо.

← →
Юрий Зотов © (2010-06-26 18:18) [7]

> New555 (25.06.10 22:58) [2]

> Онкейпресс на нажатие символьной кнопки реагирует, а на
> нажатие f1, f2 и прочих не хочет.

Так и должно быть. Событие OnKeyPress проедназначено для клавиш, имеющих ASCII-код. Поэтому у него и праметр типа Char. Поэтому оно и на F1 не срабатывает, и никакие VK_F1 тут не помогут. А пытаться сравнивать ASCII-код СИМВОЛА с виртуальным кодом НЕСИМВОЛЬНОЙ клавиши - это из области юмора. Примерно как сравнивать шкаф с носорогом.

Для несимвольных клавиш (которых нет в ASCII) существует событие OnKeyDown - вот там виртуальные коды вполне работают. Да и символьные клавиши в нем тоже можно обрабатывать, поскольку виртуальный код ASCII-клавиш равен их ASCII коду.

Сорри за возможные опечатки - без очков пишу, забыл их на работе.

← →
Anatoly Podgoretsky © (2010-06-26 19:54) [8]

> ругается Incompatible type. Что не так?

Ты где то указал, какие у тебя типы. Как партизан.

← →
turbouser © (2010-06-26 20:03) [9]

> Anatoly Podgoretsky © (26.06.10 19:54) [8]
>
>
> > ругается Incompatible type. Что не так?
>
> Ты где то указал, какие у тебя типы. Как партизан.
>

Иногда лучше жевать.

← →
Юрий Зотов © (2010-06-26 20:54) [10]

> turbouser © (26.06.10 20:03) [9]

А ведь Анатолий прав. Вы догадались, я тоже догадался - но почему мы должны догадываться? Разве не разумно, задавая вопрос, изложить ситуацию как можно точнее и дать полную информвцию? Разве это не увеличивает шансы на точный и правильный ответ вместо флуда и гадания на кофейной гуще? И, в конце концов, разве элементарная вежливсть не обязывает подумать о тех, кто тебе будет отвечать?

Кстати, о вежливости. Быть несогласным с кем-либо - это совершенно нормально, но несогласие свое Вам следовало бы выразить в иной форме. Тем более, что Анатолий Вам годится если не в деды, то в отцы уж точно.

Да даже если бы это было и не так - разве что-то меняется?

← →
Германн © (2010-06-27 02:35) [11]

> Сорри за возможные опечатки - без очков пишу, забыл их на
> работе.

Вот преимущества моего варианта работы!
Я не могу "забыть очки на работе"!
:)

← →
Германн © (2010-06-27 02:42) [12]

> turbouser © (26.06.10 20:03) [9]
>
>
> > Anatoly Podgoretsky © (26.06.10 19:54) [8]
> >
> >
> > > ругается Incompatible type. Что не так?
> >
> > Ты где то указал, какие у тебя типы. Как партизан.
> >
>
> Иногда лучше жевать.

Иногда лучше промолчать. А то в следующий раз тебя "отметелят по полной программе". Ну это так, на будущее.

← →
turbouser © (2010-06-27 05:17) [13]

> Юрий Зотов © (26.06.10 20:54) [10]

> А ведь Анатолий прав.

Ну конечно! Когда это Анатолий был неправ??

> Кстати, о вежливости.

Очень невежливо напоминать мне о вежливости. Но это так, к слову.

> Да даже если бы это было и не так - разве что-то меняется?

Не меняется. А для Вас?

> Германн © (27.06.10 02:42) [12]

> Иногда лучше промолчать.

Ну так в чем же дело?

> turbouser © (27.06.10 05:17) [13]

Это вместо того, что просто извиниться...

Что ж, дело Ваше. Но жаль. Я о Вас думал лучше. Видимо, и не только я.

> Юрий Зотов © (27.06.10 06:43) [14]

За что я должен по вашему извиниться?
В интернетах все равны. Напомнить чьи это слова?

понимая всю свою ничтожность - смею заметить, что конференция для начинающих. угу. для них самых.

Ответа нет.. Да и не будет, наверное. Трудно принимать свою неправоту. Ну и ладушки.

Устроили помойку

if Key = VK_F1 then Найти похожие ветки