Vector de componentes

[ecfisa]

Hola odiseeus.

Podes acceder por el método FindComponent, por ejemplo:

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

/* Forma 1 (recomendada) */
TEdit *e2 = static_cast<TEdit*>(FindComponent("Edit2"));
  e2->Text = "Texto 2";
  e2->Color = clMoneyGreen;

/* Forma 2 */
TEdit *e1 = ((TEdit*)FindComponent("Edit1"));
  e1->Text = "Texto 2";
  e1->Color = clSkyBlue;

/* a una propiedad */
((TEdit*)FindComponent("Edit3"))->Cursor = crHandPoint;
}

Saludos.