控件数组是怎么用？

[ppyc]

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

该怎么写代码？

[李_军]

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

[OO_is_just_P]

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;

[ppyc]

那我想要让这些控件按顺序排列怎么做到呢？

在代码里是怎么定位一个控件在屏幕中的位置的？

[OO_is_just_P]

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

[tjff2000]

用控件的align属性。

[ly_liuyang]

Delphi没有控件数组的
foxyy8888(斧头)的做法是变通的处理

通过对Left，Top的处理就可以定位的了