控件数组是怎么用？

Question

如果要在Delphi中同时放很多个Panel控件。要在程序运行时实现而，不是要手工，该怎么写代码？

Answer 1

一个个创建，
如
panel1 := TPanel.Create(Form1);
Panel1.Parent := Form1;
Panel1.left := 0;
panel1.Top := 0;
...
Panel1.show

Answer 2

var a : Array of TPanel;
..
setLength(a,l);//l:integer;
for i:=0 to l-1 do
Begin
  a[i] := TPanel.Create(self);
  a[i] .Parent := self;
  a[i] .left := 0;
  a[i] .Top := 10+10*i;
  a[i] .caption :='asdfasdf';
end;

Answer 3

  a[i] .left := 0;
  a[i] .Top := 10+10*i;
  就是左对齐，垂直排列。

Answer 4

Delphi没有控件数组的
foxyy8888(斧头)的做法是变通的处理通过对Left，Top的处理就可以定位的了