TStringList.Clear

Beschreibung

Mit Clear löschen Sie alle Strings aus der Liste. Dabei werden auch alle Referenzen auf verbundene Objekte entfernt. Die Objekte selbst werden aber nicht freigegeben.

procedure Test_Clear;
var
  TestObj : TStringList;
begin
  TestObj := TStringList.Create;
  try
    TestObj.Add('Feldhase');
    TestObj.Add('Schildkröte');
    TestObj.Clear();
    if TestObj.Count > 0 
      then raise ('Test_Clear Fehler')
      else showmessage(TestObj.DelimitedText);
  finally
    TestObj.free;
  end;
end;