关于EDIT[i]下标的问题

Question

请教高手:现想控制一组EDIT,我想自动转EDIT后面的下标
即:edit1.text,edit2.text,edit3.text,edit4.text,……，我想用EDIT[i]来控制（类似数组这样的），有没有什么方法可以实现？

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
    EditArray:array[1..10]of TEdit;//定义成数组
begin
  for i:=1 to 10 do
    begin
      EditArray[i]:=TEdit.Create(self);
      EditArray[i].ParentWindow:=Form1.Handle;
      EditArray[i].Text:='Edit'+IntToStr(i);
      EditArray[i].Top:=10+i*20;
      EditArray[i].Show;
    end;
end;

Answer 2

Delphi中没有控件数组的。不过可以变通地使用。很多文章有介绍的。http://www.ccw.com.cn/htm/app/aprog/01_6_18_3.asp

Answer 3

谢谢2位，
liangqingzhi(老之) 的代码没看太懂，
alexanda2000(书生活)提供的这个网址的例子变通一下就可以实现了。