如何在 delphi 中定義 String 型別的 2D 陣列

procedure : tobject);

vararr:array of array of string;

beginsetlength(arr,2,3);

arr[1,2]:='this is a test';

setlength(arr,0,0);

setlength(arr,4,5);

showmessage(arr[1,2]);

end;宣告二維陣列的方式是使用型別陣列的陣列，這與人們的思維方式非常接近。 同樣，你可以將乙個三維陣列宣告為型別陣列的陣列。

setlength 函式仍然用於調整二維陣列的大小，第乙個引數是陣列的名稱，第二個引數是最接近陣列名稱的維度的大小，第三個引數是遠離陣列名稱的維度的大小，依此類推。

雙重鍊表。

二維陣列。 data: array[0..2,0..2] of integer;靜態的。

data: array of array of integer;動態。

這應該使用 struct 陣列來完成。

type tuseinfo=reocrd

usname: string[20];

uspsw: string[20];

end;var

userlist: array[1..10] of tuserinfo;

在 delphi（物件帕斯卡語言）中，array 關鍵字用於陣列定義。

如果需要定義二維陣列，可以採用以下定義：

1. 靜態陣列的定義。

靜態陣列定義，通常在確定陣列元素數時使用。 它按以下形式定義：

示例：type

定義 2D 陣列型別。

tmultiarr = array[1..3,1..3] of string;

varmultiarr: tmultiarr;

定義行 12 x 列 12 的整數陣列。

intarr: array[1..12] of array[1..12] of integer;

定義 rows5*columns5 的字串陣列。

strarr: array[1..5,1..5] of string;

2. 動態陣列的定義。

當陣列中的元素數不確定時，通常使用動態陣列，其定義形式如下：

samarr: array of array of integer;定義乙個二維陣列，陣列的元素是不確定的。

type tmessagegrid = array of array of string;定義乙個二維陣列型別，陣列元素是不確定的。

var msgs: tmessagegrid;宣告乙個二維陣列型別的變數。

二維動態陣列中的元素數可以通過setlenth動態指定，如下圖所示

procedure : tobject);

type tmultiarr = array of array of string;

vara: tmultiarr;

i, j: integer;

s: string;

beginsetlength(a, 10);

for i := low(a) to high(a) do

beginsetlength(a[i], i);

for j := low(a[i]) to high(a[i]) do

a[i, j] := inttostr(i) +',' + inttostr(j) +' ';

end;for i := low(a) to high(a) do

begins := '';

for j := low(a[i]) to high(a[i]) do

s := s + ' ' + a[i, j];

end;end;

**執行截圖：

選擇以下兩種表單之一，例如：

amatrix : array[1..10] of array[1..50] of real;

bmatrix : array[1..10, 1..50] of real;