Hola.
Probá de este modo:
Código:
/* (El ejemplo pone las imágenes de ImageList en los SpeedButton del form) */
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int Inx=0; // indice
for(int i=0; i < ComponentCount - 1; i++)
// si es SpeedButton y hay imágenes para él, poner imágen
if(Components[i]->ClassNameIs("TSpeedButton") && Inx < ImageList1->Count) {
ImageList1->GetBitmap(Inx, ((TSpeedButton*)Components[i])->Glyph);
Inx++; // próxima imágen
}
}
Inx es el índice que dá la posición de la imágen en el ImageList, donde 0 es la primera y Count-1 la última.
Saludos.