Allgemeine Frage zu Listen.

[Sir Rufo]

Minimalst sollte es so aussehen

Delphi-Quellcode:

TFoo = class
public
  destructor Destroy; override;
end;

destructor TFoo.Destroy;
begin
  inherited;
end;

procedure Test;
var
  LList : TObjectList<TFoo>;
begin
  LList := TObjectList<TFoo>.Create;
  try
    LList.Add( TFoo.Create );
  finally
    FreeAndNil( LList );
  end;
end;
end;