InsertRange(Index: Integer; Collection: ICollection);
Index. Индекс позиции, в которую необходимо добавить коллекцию;
Collection. Коллекция элементов, которую необходимо добавить в массив.
Метод InsertRange осуществляет вставку коллекции элементов в заданную позицию.
Sub UserProc;
Var
StrL, StrL1: IStringList;
i: Integer;
Begin
StrL := New StringList.Create;
StrL1 := New StringList.Create;
For i := 0 To Math.RandBetweenI(50, 100) Do
StrL.Add("Number " + Math.RandBetweenI(0, 100).ToString);
End For;
For i := 0 To Math.RandBetweenI(50, 100) Do
StrL1.Add("Number " + Math.RandBetweenI(100, 200).ToString);
End For;
StrL.InsertRange(Double.FloorInt(StrL.Count / 2), StrL1 As ICollection);
End Sub UserProc;
После выполнения примера будут сгенерированы два динамических массива строк и значения второго будут вставлены в середину первого массива.
См. также: