delphi中有控件数组吗？

Question

Btn:array[0..10] of TButton;

Answer 1

用上面老兄的定义后，
假设你用的控件名为button0..button10,设置tag属性为0..10，使它们具有相同的单击事件，然后在程序初始化中添加以下代码：  Btn[0]:=button0;  
  Btn[1]:=button1;
  ...
  Btn[10]:=button10;
事件处理中，把tag 作为VB中的index来处理；
procedure TForm1.BtnClick(Sender:TObject);
begin
  case TButton(Sender).tag of
  0:  ;  //button0事件处理;
  ..     //中间省略
  10:  ; //button10事件处理
  end;
end;

Answer 2

可以将控件放入TList对象中，这样管理起来更方便一些，而且是动态扩展的，不需要写死。