odwolanie sie do kilkudziesieciu elementow

Witam.
W jednej formie posiadam 30 elementow TShape (np Shape1,Shape2...).
Chcialem utworzyc petle np (int i=1;i<=30;i++) w ktorej moglbym sie odwolac do tych elementow i pozmieniac ich wlasciowosci (np kolor).
W jaki sposob mam to zrobic?
Dziekuje za pomoc.

Piotrek

Witam.
Proponuje skorzystac z:

for(int i=1; i<30; i++)
{
TComponent* a = FindComponent("Label"+IntToStr(i));
TLabel* b = dynamic_cast<TLabel*> (a);
b->Caption="";
}

PS: Odpowiedz znalazlem na forum. :P