关于控件数组请教

[shinebei]

比如Form上有二十个以上的Edit控件，能不能像VB那样针对控件设置数组，就像
edit(1),edit(2),....,edit(n)，这样的话，操作、取值都很方便，不知道delphi里面能不能这样操作，若能该如何实现。

[eastroc]

就是这样。

[renzhm]

var
ArrayEdit:array of TEdit;//定义文本框数组
-----------------------------------------------
var
i,n:integer;
begin
n:=0;
for i:=0 to componentcount-1 do
begin
if components[i] is TEdit then
n:=n+1;
end;
end;
--------------------------------------
setlength(ArrayEdit,n);//给数组赋长度
---------------------------------------
你可以使用ArrayEdit[n]啦,//n:与taborder的顺序对应