如何定义一个动态数组(在线等待)

Question

通常我定义一个数组时都把行和列都定好了 如:  a1: array[1..5,1.100]of string; 但我如果行和列预先我不知道, 我该如何定义

Answer 1

var
  A : array of array of string;
  I, j ,s: Integer;
begin
  j:=10;s:=20;
  SetLength(A, j);
  for I := Low(A) to High(A) do
    SetLength(A[I], s);
  end;
...如果要定义array[1..10,1..20]of string 则j=9,s=19
注意：用setlength定义的数组是从0开始的，即定义的数组为array[0..9,1..19]of string

Answer 2

var
  arr: array of Integer;
begin
  SetLength(arr, 50);
....
end;