[jplj]

¿ Roman, la forma correcta de hacerlo seria esta ?

Código Delphi [-]

  Lista: TList;


var
   Obj: TClaseObjetosDeLaLista;

begin
   
   Obj:= Lista.Items[i];
   Obj.Free;
   Lista.Delete(i);
   Lista.Capacity := Lista.Count - 1;