Código Delphi [-] for I := 0 to FMain.ComponentCount - 1 do begin //destruye los componentes creados if FMain.Components[i] is TFrame1 then TFrame1(FMain.Components[i]).Destroy; //
for I := 0 to FMain.ComponentCount - 1 do begin //destruye los componentes creados if FMain.Components[i] is TFrame1 then TFrame1(FMain.Components[i]).Destroy; //