|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
12.08.2008, 18:29 | #1 |
Регистрация: 12.08.2008
Сообщений: 3
|
управление в игре - Скачал GLScene для Делфи, создал актера, камеру.
Скачал GLScene для Делфи, создал актера, камеру...
пытался написать управление к актёру, но не получаеться код приблезительно такой: ... var x,z,actot: intsger; begin if chr(Key) = 'A' then begin Form1.GLActor1 := z-10; if chr(Key) = 'S' then begin Form1.GLActor1 := x-10; if chr(Key) = 'W' then begin Form1.GLActor1 := x+10; if chr(Key) = 'D' then begin Form1.GLActor1 := z+10; end; end; end; end; end; end; end. Прописал его не помню в какой прецедуре, скомпилировал, и выдало кучу ошибок, может чтото не так прописал, КТО МОЖЕТ ПОМОГИТЕ!!!!! Может вообще управление на по другому написать? PS(Не в силах создать курсор в игре, поможете? а также я выбрал звук для ходьбы, поможете его в игру вставить? ЗАРАНЕЕ БЛАГОДАРЕН!!!!!!!!!!!!! |
12.08.2008, 19:12 | #2 |
Участник клуба
Регистрация: 29.01.2008
Сообщений: 1,039
|
Код:
Последний раз редактировалось Манжосов Денис :); 12.08.2008 в 19:18. |
13.08.2008, 23:07 | #3 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
GLActor1.x:=x+10;
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
14.08.2008, 08:55 | #4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ниразу не угадали господа
Form1.GLActor1.Position.x := Form1.GLActor1.Position.x+10;
I'm learning to live...
|
08.05.2012, 16:13 | #5 |
Пользователь
Регистрация: 28.05.2011
Сообщений: 99
|
1)Подключаем в uses keyboard
2)Ставим на форму Cadencer 3)Двойной клик на каденсере 4)пишем if IsKeyDown(кнопка) then GLActor1.Position.X := GLActor1.Position.X+10;
OS - [||-----------------------------------------------] забил, дойдя до драйвера памяти
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
помогите найти дрова на веб - камеру | Artem25 | Свободное общение | 0 | 05.06.2008 07:54 |
Подключился-создал компонент. | SunKnight | Работа с сетью в Delphi | 8 | 15.05.2008 21:09 |