Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Разное
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.03.2012, 13:12
mrandrew1990 mrandrew1990 вне форума
Прохожий
 
Регистрация: 08.05.2011
Сообщения: 6
Репутация: 10
Печаль Счетчик элементов массива (для модели толпы)

Здравствуйте, господа программисты! Нужна ваша помощь... Очень интересует один вопрос. Имеется массив, он отображается на форме и представляет собой сетку, каждый объект которой является "квадратом", закрашиваемым в тот или иной цвет... Т.е. программа представляет собой что-то аналогичное модели паникующей толпы, хотя далекой от нее, в плане реалистичности, но все же... Имеется массив 50*50 - сетка, в верху один выход (красный квадрат), а также квадратики зеленого цвета (как бы люди), которые расположены случайным образом и двигаются к выходу... Так вот, хочу сделать такую вещь, когда человек (зеленый квадратик) задерживается в одной позиции (допустим, если прошло 3 шага и более), то он как бы погибает - закрашивается в другой цвет (допустим, в синий) и остается этот квадрат на том самом месте (будучи уже синим) и не двигается.... И это как бы ко всем применимо чтобы было, чтобы в конце завершения шагов, можно было увидеть сколько клеток синих осталось, т.е. сколько людей погибло... Ну думаю суть идеи понятна... Просто, что-то никак не могу догнать, как это реализовать, счетчик как замудрить ... Помогите пожалуйста... Ниже исходник прилагается.
Вложения
Тип файла: rar Программа.rar (555.8 Кбайт, 2 просмотров)
Ответить с цитированием
 


Delphi Sources

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

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 15:31.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025