|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
10.05.2007, 10:31 | #1 |
Пользователь
Регистрация: 02.05.2007
Сообщений: 53
|
Помогите создать змейку!
Вообще-то мне нужна часть игры... Я хочу чтобы змейка двигалась в сторону нажатой клавиши сразу же. Но я не знаю как это написать... Может вы мне поможете? Ах да, можно ли представить ячейку StringGrid в виде рисунка? Заранее спасибо...
|
11.05.2007, 20:53 | #2 |
Пользователь
Регистрация: 18.04.2007
Сообщений: 80
|
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState); begin if chr(Key) = 'A' then Image1.Left:=Image1.Left-5; if (Key=VK_LEFT) then Image1.Left:=Image1.Left-5; if chr(Key) = 'D' then Image1.Left:=Image1.Left+5; if (Key=VK_RIGHT) then Image1.Left:=Image1.Left+5; //Также самое и для W,S, UP, Down, только не Left a Top ето кнопками перемищать картинку. Если тупой ответ извените. Последний раз редактировалось ChukCha; 11.05.2007 в 21:20. |
12.06.2007, 18:35 | #3 |
Регистрация: 05.06.2007
Сообщений: 6
|
Вот интересный исходник, смотри, разбирайся
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
помогите создать Б.Д. | Азамат | Microsoft Office Access | 3 | 15.07.2008 14:00 |
Помогите создать веб-сервис | optus | Общие вопросы по Java, Java SE, Kotlin | 0 | 21.05.2008 15:12 |
Помогите создать САР | Aniona | Фриланс | 2 | 03.12.2007 04:31 |
Помогите создать калькулятор! | kuzmich | Общие вопросы Delphi | 8 | 28.05.2007 20:06 |