noch was zu: "Nach 20/30 starts aus der IDE speicher voll"

[mytbo]

Zitat von schorsch666:

vllt. hat ja jemand nen kommentar uebrig...

Variante 1, so:

Delphi-Quellcode:

function CreateAndFillStringList: TStringList;
begin
  Result := TStringList.Create;
  Result.Add('...');
end;

begin
  var sl: TStringList := CreateAndFillStringList;
  try
    sl.Add('more');
    ShowMessage(sl.Text);
  finally
    sl.Free;
  end;

Nicht empfohlene Lösung:

Delphi-Quellcode:

uses
  mormot.core.data;

var
  sl: TStringList;
begin
  with TAutoFree.One(sl, CreateAndFillStringList) do
    ShowMessage(sl.Text);
end;

Bis bald...
Thomas