Показать сообщение отдельно
  #1  
Старый 20.04.2010, 18:10
beavi5 beavi5 вне форума
Прохожий
 
Регистрация: 13.04.2010
Сообщения: 49
Репутация: 12
По умолчанию cнятие выделения с кнопки

суть программы : при нажатии на про6ел кнопка должна двигаеться ввниз
код :
Код:
procedure TForm4.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key = vk_space  then
button1.top:= button1.top+10;
end;
end.

про6лема: при запуске приложения кнопка автоматически выделяется и при нажатии на про6ел нажимается кнопка ,а не о6ра6атывается процедура formKeyDown

вопрос: как это исправить? как снять выделение с кнопки так, что6ы она была вполне ра6отоспосо6ной? так сказать что6ы активной 6ыла форма а не кнопки расположенные на ней.
Ответить с цитированием