![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Я понимаю, что вопрос дурацкий, но как задать смещение точки на форме при помощи стрелок. В Pascal Это задавалось при помощи процедуры readkey, а вDelphi как?
|
#2
|
||||
|
||||
![]() события OnKeyDown, OnKeyPress/ А там смотри, какая клавиша нажата и двигай точку.
Нет повести печальнее на свете, чем повесть о заклиневшем Resete. ![]() |
#3
|
||||
|
||||
![]() Код:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin case Key of VK_LEFT: {влево}; VK_RIGHT: {вправо}; VK_UP: {вверх}; VK_DOWN: {вниз}; end; end; |
#4
|
|||
|
|||
![]() Можно также через код клавиши :
Цитата:
|
#5
|
|||
|
|||
![]() В общем если тебе нужно быстрая оброботка сообщений клавы, то ты можешь подключить directInput и не мучатся. Слава богу статей на эту тему хватает.
Очень пригодилось при разработке игры. |
#6
|
||||
|
||||
![]() RUS Hacker
точно? я вот как-то через ShowMessage в событии KeyPress (или KeyDown, не помню уж) определял, какой Key нажат когда тыкал стрелочки, никакого ShowMessage не происходило! вот подучусь программированию и создам искусственный интеллект! |
#7
|
||||
|
||||
![]() Цитата:
--------------------------------------------- Программирование - не профессия, а стиль жизни |
#8
|
|||
|
|||
![]() Дело скорее всего не в фокусе. Событие OnKeyPress не срабатывает на нажатие стрелочек. Читайте же, наконец, справку!
|
#9
|
||||
|
||||
![]() Цитата:
--------------------------------------------- Программирование - не профессия, а стиль жизни |