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

1. int totalComponentes = 40;


2. arrayComponentes[0] = TComponent1 ;


3. arrayComponentes[1] = TComponent2 ;


4. arrayComponentes[2] = TComponent3 ;


5. .......


6. arrayComponentes[40] = TComponent40 ;

Luego la funcion sería algo asi:

Código: Seleccionar todo

1. void ModificarPropiedades()


2. {


3.     for(int i = 0;i < totalComponentes;i++)


4.     {


5.         arrayComponentes[i]->Modificar();


6.     }


7. }