| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Обращение к нескольким елементам сразу. Как? [D6]

.: Joiro :. ©   (2002-06-16 18:36:00) 

Привет знатокам.

Вопрос такой:
Как обратится к всем елементам (например всем Shape) на форме и у всех изменить параметры (например Pen.Color).

Скажем, при нажатии клавиши все Shape меняют краску.

Заранее спасибо.

---

.: Joiro :.   (2002-06-16 18:54:00) [1]

Спасибо. Я думаю список не надо будет делать, так как 99% всех контролов на форме и есть эти самые Shape.

---

MBo   (2002-06-16 18:51:00) [2]

for i:=0 to controlcount-1 do
if controls[i] is TShape then
TShape(controls[i]).Color:=clRed

но лучше, наверно, свой список заводить- быстрее будет

---

Наверх