二次元の動的配列を使う

(Delphi 4 以降) Delphi 4 で新しく導入された動的配列を二次元で使用する方法です。次元の数だけ array of を記述します。配列を定義する際は SetLength手続き を使用します。

■ 二次元の動的配列を使用する例 
  //動的配列サンプル２
  procedure TForm1.Button2Click(Sender: TObject);
  var
    aryData : array of  array of  integer;
    X,Y     : integer;
    ix,iy   : integer;
  begin
    X   :=  StrToIntDef(Edit1.Text, 0);
    Y   :=  StrToIntDef(Edit2.Text, 0);
    SetLength(aryData, X);
    for   ix    :=    0   to    High(aryData) do  begin
      SetLength(aryData[ix],Y);
      for iy    :=    0   to    High(aryData[ix]) do  begin　　
        aryData[ix][iy]   :=    (ix * 100) + (iy);
        Memo1.Lines.Add(IntToStr(aryData[ix][iy]));
      end;
    end;
  end;