SpeedButtony w petli

Witam
Chcialbym zrobic np cos takiego
SpeedButton1->Font->Color = clRed;
SpeedButton2->Font->Color = clBlue;
SpeedButton3->Font->Color = clBlack;
ale w petli;

Chodzi mi o to jak mozna iterowac SpeedButtony.
Probowalem wrzucic to do tablicy dynamicznej ale wyplul mi błąd,ze nie ma konstruktora domyslnego
TSpeedButton *STab = new TSpeedButton[10];

Przy czym da sie zrobic to dla pojedynczego elementu np
TSpeedButton *STab = new TSpeedButton(this);

oczywiście można to zrobić. mając powiedzmy 10 speeed buttonów (nazwanych SpeedButton1..10), np tak:

for (int i=0;i<10;i++){ 
dynamic_cast<TSpeedButton*>(Form1->FindComponent("SpeedButton"+IntToStr(i+1)))->Font->Color = clBlue;
}

Super!
Wielkie dzieki czarownik za pomoc [browar] dokladnie o to mi chodzilo :-)