Acceder a Metodo comun a varios componentes

[neg14]

Buenas

El caso es que tengo varios Componentes del mismo tipo a los que he denominado de la forma:

TComponent1
TComponent2
TComponent3
.......
TComponent40

Supongamos que al pulsar un boton accedemos a un metodo donde cambiamos una propiedad del los componentes accediendo a un metodo
que possen

void __fastcall TForm1::Button1Click(TObject *Sender)
{

ModificarPropiedades();
}


void ModificarPropiedades()
{

TComponent1->Modificar();
TComponent2->Modificar();
TComponent3->Modificar();
........................ .....
TComponent40->Modificar();
}


Mi pregunta es: Es posible Acceder al metodo de los componentes sin tener que realizar la tediosa operacion de ir uno a uno.

Espero Haberme Explicado Bien

Gracias OtraVez.

[ivancp]

Una alternativa es almacenar los componentes en un array, vector o lista (si son del mismo tipo de dato claro).

Código: Seleccionar todo

int totalComponentes = 40;
arrayComponentes[0] = TComponent1 ;
arrayComponentes[1] = TComponent2 ;
arrayComponentes[2] = TComponent3 ;
.......
arrayComponentes[40] = TComponent40 ;

Luego la funcion sería algo asi:

Código: Seleccionar todo

void ModificarPropiedades()
{
    for(int i = 0;i < totalComponentes;i++)
    {
        arrayComponentes[i]->Modificar();
    }
}