TList als Rückgabeparameter [erledigt]

[omata]

Folgendes ist sinnvoller...

Delphi-Quellcode:

procedure TfmMain.SaveList(Lst: TList);
begin
  New(Pointer);
  try
    for i := 0 to Zähler - 1 do
    begin
      Pointer^.Variable := Fülle mit irgendwas
      ...
      Lst.Add(Pointer);
    end;
  except
    Dispose(Pointer);
  end;
end;

procedure TfmMain.Aufruf;
var List:TList;
begin
  List:=TList.Create;
  try
    SaveList(List);
  finally
    List.Free;
  end;
end;