|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
20.03.2018, 07:32 | #1 |
Регистрация: 09.11.2017
Сообщений: 9
|
Дельфи. Случайное появление на форме компонентов Shape (Image)
Помогите пожалуйста! У меня на форме есть несколько компонентов Shape. Можно сделать так что бы они появлялись рандомно при нажатии на кнопку, если можно то как??? И можно ли сделать то же самое с Image?
|
20.03.2018, 12:01 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
можно.
выставлять случайному компоненту свойство Visible в true - чтобы отобразить компонент на форме, или в false - чтобы спрятать. если заранее неизвестно какое количество нужный компонент на форме, то я бы 1) в событии FormCreate создал список всех нужных компонент. (для этого можно использовать или коллекцию или банальный динамический массив) и перебор компонент на форме. 2) при нажатии на кнопку получал случайное число и показывал компонент с таким номером. Все остальные - прятал. если что-то непонятно - задавайте уточняющие вопросы, я могу набросать пример кода... |
20.03.2018, 12:22 | #3 |
Регистрация: 09.11.2017
Сообщений: 9
|
Набросайте пожалуйста код. Не понимаю как все это реализовать
|
20.03.2018, 12:31 | #4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
|
20.03.2018, 13:09 | #5 |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
Примерно так
Код:
|
20.03.2018, 13:24 | #6 |
Регистрация: 09.11.2017
Сообщений: 9
|
не хочет загружать мой файл, слишком тяжелый
вообщем у меня там есть 2 блока питания с красными индикаторами(Shape). я нажимаю на кнопку "внести неисправность блоку" и мне нужно чтобы красный индикатор( неисправности) загорался не на конкретном блоке, а на случайном Последний раз редактировалось Palamida; 20.03.2018 в 13:34. |
20.03.2018, 13:34 | #7 |
Регистрация: 09.11.2017
Сообщений: 9
|
спасибо большое, сейчас попробую)))
|
20.03.2018, 13:45 | #8 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
во-первых, я говорил про ТЕСТОВЫЙ пример, с одной формой, а не полный большой проект с кучей всего разного и кучей форм.
во-вторых, неужели, если в архив запаковать только *.pas, *.res, *.dfm получается очень большой архив? нет, я имел в виду совсем другой. На форме уже есть куча shape'ов, нужно зажечь один из них. |
20.03.2018, 13:56 | #9 |
Регистрация: 09.11.2017
Сообщений: 9
|
я не очень хорошо шарю во всем этом, в запаковке файлов имею ввиду. и в тестовых примерах тожее((
|
20.03.2018, 14:24 | #10 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
я имел в виду: ss1.png код такой: Код:
исходники проекта: RandomShapeExample_sources.rar |
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Появление и исчезновение фигур на форме в Лазарусе | Mihail90 | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 24.01.2018 09:45 |
Случайное появление вопросов теста | Афанасий[vedma] | Общие вопросы Delphi | 5 | 27.01.2012 10:30 |
Появление картинок на форме. | Loadgame | Помощь студентам | 3 | 15.11.2011 23:30 |
Дельфи 7. Image | ne4eHUce | Общие вопросы Delphi | 3 | 12.04.2011 12:39 |
Pascal цикл с Shape.Left and Shape.Top | BanzoO | Помощь студентам | 1 | 13.12.2009 21:47 |