[avis_rara]

Добрый день, не хотелось создавать новую тему, но не нашел ничего общего с моим вопросом.
У меня есть много элементов Shape. И при определенных условиях мне нужно им всем менять цвета. Но для каждого прописывать отдельно это очень долго и не красиво....
как обращаться к ним?

Код:

if {условие1} then
begin
  for j:=1 to 50 do
  begin
    Shape[j].Brush.Color:= clMoneyGreen; // ну это ест-но не работает
  end
else
begin
  for j:=1 to 50 do
  begin
   Shape[j].Brush.Color:= clLime;
  end;
end;

Как такое организовать?