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

← →
.: Joiro :. © (2002-06-16 18:36) [0]

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

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

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

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

← →
MBo © (2002-06-16 18:51) [1]

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

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

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

Обращение к нескольким елементам сразу. Как? Найти похожие ветки