TStringList.Add

Parameter

(const S: String): Integer;

Beschreibung

Die Funktion Add ermöglicht das Hinzufügen von Strings in die String-Liste über den String S. Liegt eine sortierte Liste vor, dann wird der String entsprechend der Sortierreihenfolge eingefügt. Handelt es sich um eine nicht sortierte Liste, dann werden der String S an das Ende der Liste angehängt. Die Funktion Add liefert hierbei die Position des Eintrages zurück, wobei der erste Eintrag den Index 0 hat.

Hinweis

Add löst eine entsprechende EListError-Exception aus und setzt den Wert Duplicates auf dupError, sobald der String S bereits in einer sortierten Liste vorhanden ist.

Wird versucht ein Duplikat hinzuzufügen, dann gibt die Funktion Add den Index des vorhandenen Eintrags zurück, sofern Duplicates den Wert dupIgnore hat.

Beispiel

procedure Test_Add;
var
  Index: Integer;
  TestObj : TStringList;
begin
  TestObj := TStringList.Create;
  try
    Index := TestObj.Add('Animals');
    if Index < 0 
      then raise ('Test_Add Fehler')
      else showmessage(TestObj.DelimitedText);
  finally
    TestObj.free;
  end;
end;