delphi中有控件数组吗？

[Arcan]

我原来是用VB的，最近才学delphi，不知道delphi中是否有控件数组，如何使用？

[wanwangzhiwang]

没有！

[coldljy]

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

[我真的是大海]

用上面老兄的定义后，
假设你用的控件名为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;

[superall]

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

[yhec]

直接没有，间接办法多多

[Arcan]

谢谢！

[Arcan]

还得问一句，怎么加分？