TStringList.InsertObject
- Merve Yurdakul
Owned by Merve Yurdakul
Okt. 13, 2017
1 min read
Loading data...
Parameter
(Index: Integer; const S: String; AObject: TObject);
Beschreibung
InsertObject fügt einen String über den Parameter "S" in der angegeben Position mit dem Parameter "Index" in eine Liste hinzu und ordnet dem String ein Objekt über "AObject" zu. Wenn Index 0 ist, wird der String an den Anfang der Liste eingefügt. Ist Index 1, wird der String an der zweiten Position eingefügt usw.
Beispiel
procedure Test_InsertObject; var list : TStringList; begin ErrorText := 'Test_InsertObject'; list := TStringList.create; try list.Add('Hai'); list.Add('Loewe'); TestObj.InsertObject(2,'Another Animallist',list); if (TestObj.IndexOfObject(list) <> 2) then raise ('Test_InsertObject Fehler'); finally list.free; end; end;