Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.03.2011, 13:28   #1
Arsenx777
Delphi, c++, php
Форумчанин
 
Аватар для Arsenx777
 
Регистрация: 14.03.2011
Сообщений: 288
Вопрос Выстрел!

я хоче написать игру танчики! Мне не понятно как сделать чтобы из танчика вылетали пули! У меня есть изображение танчика помещенный в image , я хочу чтобы при нажатии на пробел из image вылетали маленькие шары (shape) до конца формы, и так каждый раз как я нажимаю пробел!
ПОМОГИТЕ! ЗАРАНЕЕ СПАСИБО!!!!
Мудр тот, кто знает нужное, а не многое.

Arsenx777 вне форума Ответить с цитированием
Старый 31.03.2011, 14:28   #2
Тутонхамон
Пользователь
 
Аватар для Тутонхамон
 
Регистрация: 09.02.2011
Сообщений: 43
Смех

Код:
If {Нажал на Space то} then
 if {танк смотрит вверх то}then
  begin 
   timer1.enabled:=true;
   
   Shape1.visible:=true;
   Shape1.top := Image1.top-Shape1.height;

   vector:=up;//это для таймера чтобы он знал куда направить пулю
 end;
И так для всех направлений.
А в таймере пишешь сам полет пули. (надеюсь с этим ты справишься=).


я когда танчики на паскале делал,
писал примерно так.Работало=)

А что конкретно Вы не можете реализовать?
Тутонхамон вне форума Ответить с цитированием
Старый 31.03.2011, 20:52   #3
Arsenx777
Delphi, c++, php
Форумчанин
 
Аватар для Arsenx777
 
Регистрация: 14.03.2011
Сообщений: 288
По умолчанию

я могу сделать чтобы максимум 100 шапе вылелетало, а как сделать чтобы сколько раз я бы не нажал чтоб и столька шапе вылетало,
Мудр тот, кто знает нужное, а не многое.

Arsenx777 вне форума Ответить с цитированием
Старый 01.04.2011, 08:36   #4
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

1. Динамически создавать шэйп и при удалять его если он достиг цели или
края карты(формы)
2. При создании формы сделать аккумулятор (массив шэйпов bullet array [1..100] of TShape) и сделать их не видимыми. В момент выстрела указать им начальные координаты сделать итый шэйп видимым и в обработчике полёта снаряда проверять если видимый то движение есть, а при достижении цели или края карты опять невидимым. Итак гонять эти шэйпы по кругу

Последний раз редактировалось SERG1980; 01.04.2011 в 08:43.
SERG1980 вне форума Ответить с цитированием
Старый 01.04.2011, 11:22   #5
Arsenx777
Delphi, c++, php
Форумчанин
 
Аватар для Arsenx777
 
Регистрация: 14.03.2011
Сообщений: 288
По умолчанию

если можете приведите плиз небольшой приме, я изучаю delphi всего 3 мес. темболее с массивами у меня плохо получается!
Мудр тот, кто знает нужное, а не многое.

Arsenx777 вне форума Ответить с цитированием
Старый 01.04.2011, 13:00   #6
SERG1980
Участник клуба
 
Аватар для SERG1980
 
Регистрация: 28.03.2007
Сообщений: 1,814
По умолчанию

С движением танка сами попробуйте разобраться
Вложения
Тип файла: rar Новая папка.rar (202.0 Кб, 177 просмотров)
SERG1980 вне форума Ответить с цитированием
Старый 01.04.2011, 21:52   #7
Arsenx777
Delphi, c++, php
Форумчанин
 
Аватар для Arsenx777
 
Регистрация: 14.03.2011
Сообщений: 288
По умолчанию

все! спасибо большое! очень прикольно получилось
Мудр тот, кто знает нужное, а не многое.

Arsenx777 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
при клике на форму должен происходить выстрел (звук) wolf950 Помощь студентам 2 25.11.2008 15:51