delphi - 我可以在不丢失以前内容的情况下调整 Delphi 数组的大小吗？

Question

我有一个动态数组。但最初我不知道数组的长度。我可以先将它的长度设置为 1，然后根据需要增加长度，而不会丢失以前存储的数据吗？
我知道我可以使用 TList 完成这样的任务。但我想知道我是否可以用数组来做到这一点？

Answer 1

动态数组可以调整为更大的大小而不会丢失包含的数据。

下面的程序演示了这一点。

program Project7;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
 A : Array of Integer;
 I : Integer;
begin
  for I := 0 to 19 do
  begin
    SetLength(A,I+1);
    A[I] := I;
  end;
  for I := Low(A) to High(A) do
  begin
    writeln(A[I]);
  end;
  readln;
end.