2 StringListen try finally richtig anwenden

[TRomano]

Delphi-Quellcode:

var
  SL1, SL2: TStringList;
begin
  SL1 := TStringList.Create;
  SL2 := TStringList.Create;
  try
    // tue irgendetwas
   finally
    FreeAndNil(SL1);
    FreeAndNil(SL2);
  end;

Wohl dann eher so (Erzeugung der Klassen außerhalb von try ... finally ... end). Über FreeAndNil() wollen wir hier nicht diskutieren ...