对象是类的实例,只不是一种数据类型罢了,使用方法与其他类型的数据数组基本上是一样的. var BtnArr:array [0..9] of TButton; index:integer; for index:=low(BtnArr) to high(BtnArr) do begin btnarr[index]:=tbutton.create(self); btnarr[index].parent:=self;//当前窗体或其他容器.... btnarr[index].caption:='button'+inttostr(index); ..... end;var strarr:array of string; index:integer; setlength(strarr,2); strarr[0]:='string 1'; strarr[1]:='string 2'; ....
var
BtnArr:array [0..9] of TButton;
index:integer; for index:=low(BtnArr) to high(BtnArr) do
begin
btnarr[index]:=tbutton.create(self);
btnarr[index].parent:=self;//当前窗体或其他容器....
btnarr[index].caption:='button'+inttostr(index);
.....
end;var
strarr:array of string;
index:integer; setlength(strarr,2);
strarr[0]:='string 1';
strarr[1]:='string 2';
....