Реакция на нажатие клавиши.

[Vaigard]

Еще один вопрос. Проверка состояния клавиши идет путем

ontimer

a:=getkeystate(keycode);
if a=-128 then ___
if a=1 then ___

Но есть проблема. Требуется, чтобы при нажатии и удержании клавиши на клавиатуре, нажималась и держалась кнопка на форме. А она даже на button.click не реагирует. Может, косяки с проверкой состояния?

[ex.cluz]

Если проект выложите, то попробую помочь. У меня похожая задача стояла в одном проекте, однако там использовались мои собственные кнопки, и проблему я легко обошел (у них есть свойство Down).

Кстати, у формы свойство KeyPreview стоит в true?

[Vaigard]

Да проекта-то нет как такового в настоящее время. Но смысл его - виртуальная клавиатура. И даже дело не в самом проекте, а в принципе действия. Вот строчка кода, который я использую:

if getkeystate(vk_up)<>1 then speedbutton1.Down:=true;

Это для таймер с маленьким(100-500) интервалом. Не нажимается кнопка. Свойство keypreview=true.

[Selestis]

Установите у кнопки GroupIndex:=1 и AllowAllUp:=true. По умолчанию эти кнопки зажать нельзя, надо в радиогруппу добавить вот так.

[Vaigard]

Во, другое дело) Спасибо)