Hola odiseeus.
Una forma puede ser:
Código:
...
TObjectList *ObjLst = new TObjectList;
void __fastcall TForm1::CrearEdits(int Cant)
{
for(int i=0;i < 10; i++) {
TEdit *TE = new TEdit(this);
TE->Left = 8;
TE->Top = i*30+20;
TE->Name = "Edit"+IntToStr(i+1);
TE->Parent = this;
ObjLst->Add(TE);
}
}
void __fastcall TForm1::btnCrearClick(TObject *Sender)
{
CrearEdits(10);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btnLiberarClick(TObject *Sender)
{
ObjLst->Free();
}
...
Saludos.