Clone: IStringList;
Метод Clone создает копию массива.
Sub Main;
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;
StrL1:=StrL.Clone;
StrL1.Clear;
End Sub Main;
После выполнения примера в массиве «StrL1» будет содержаться копия массива «StrL».
См. также: