|
@@ -1179,6 +1179,7 @@ var
|
|
|
i: SizeInt;
|
|
|
LEnumerator: TEnumerator<T>;
|
|
|
begin
|
|
|
+ Result := nil;
|
|
|
SetLength(Result, ACount);
|
|
|
|
|
|
try
|
|
@@ -1620,6 +1621,7 @@ begin
|
|
|
if (ACount < 0) or (AIndex < 0) or (AIndex + ACount > Count) then
|
|
|
raise EArgumentOutOfRangeException.CreateRes(@SArgumentOutOfRange);
|
|
|
|
|
|
+ LDeleted := nil;
|
|
|
SetLength(LDeleted, ACount);
|
|
|
System.Move(FItems[AIndex], LDeleted[0], ACount * SizeOf(T));
|
|
|
|