二維數組

一、

　　小結：(1)、ii[x][y] ：其中x表示 哪一行，y表示 哪一列

　　　　　(2)、動態非矩陣 二維數組 ==> 仍是 少用(或者不用)爲好...

二、測試代碼：

procedure TForm1.Button3Click(Sender: TObject);
var ii3 :array[0..1, 0..2] of Integer;
begin
  Memo1.Lines.Add('');
  Memo1.Lines.Add('靜態矩陣 二維數組 :');

  Memo1.Lines.Add(IntToStr(Integer(@ii3[0,0])));
  Memo1.Lines.Add(IntToStr(Integer(@ii3[0][1])));
  Memo1.Lines.Add(IntToStr(Integer(@ii3[0][2])));

  Memo1.Lines.Add(IntToStr(Integer(@ii3[1][0])));
  Memo1.Lines.Add(IntToStr(Integer(@ii3[1][1])));
  Memo1.Lines.Add(IntToStr(Integer(@ii3[1][2])));
end;

procedure TForm1.Button4Click(Sender: TObject);
var ii4 :array of array of Integer;
begin
  Memo1.Lines.Add('');
  Memo1.Lines.Add('動態矩陣 二維數組 :');
  SetLength(ii4, 2, 3);

  Memo1.Lines.Add(IntToStr(Integer(@ii4[0, 0])));
  Memo1.Lines.Add(IntToStr(Integer(@ii4[0][1])));
  Memo1.Lines.Add(IntToStr(Integer(@ii4[0][2])));

  Memo1.Lines.Add(IntToStr(Integer(@ii4[1][0])));
  Memo1.Lines.Add(IntToStr(Integer(@ii4[1][1])));
  Memo1.Lines.Add(IntToStr(Integer(@ii4[1][2])));
end;

procedure TForm1.Button5Click(Sender: TObject);
var ii5 :array of array of Integer;
begin
  Memo1.Lines.Add('');
  Memo1.Lines.Add('動態非矩陣 二維數組 :');
  
  SetLength(ii5, 2);
  SetLength(ii5[0], 3);
  Memo1.Lines.Add(IntToStr(Integer(@ii5[0,0])));
  Memo1.Lines.Add(IntToStr(Integer(@ii5[0][1])));
  Memo1.Lines.Add(IntToStr(Integer(@ii5[0][2])));
  Memo1.Lines.Add(IntToStr(Integer(@ii5[1][0])));

  Memo1.Lines.Add('');
  SetLength(ii5[1], 4);
  Memo1.Lines.Add(IntToStr(Integer(@ii5[1][0])));
  Memo1.Lines.Add(IntToStr(Integer(@ii5[1][1])));
  Memo1.Lines.Add(IntToStr(Integer(@ii5[1][2])));
end;

　　2.一、輸出：

靜態矩陣 二維數組 :
1635692
1635696
1635700
1635704
1635708
1635712

動態矩陣 二維數組 :
4728508
4728512
4728516
4728532
4728536
4728540

動態非矩陣 二維數組 :
4728508
4728512
4728516
0

4728572
4728576
4728580

 

三、