N个组件放在一个窗口里，Align:=alLeft；怎样让这些组件按照指定的顺序排列呢？

Question

见题

Answer 1

楼主，你说的指定顺序，是不是按规则排列？可以先按SHIFT选择所有的组件，然后点右键->position->align....>可以自己选择适合的进行排列，分别为水平也垂直方向中。

Answer 2

我的意思是，举例说明
在一个panel中，有同样的edit N个，每个edit的text内容不同（从数据库中读出），所有edit的Align都设为latop，我希望他按照我数据库中的顺序排列，可实际上，它是乱排，怎么办？

Answer 3

这个是动态建立的例子：
procedure TForm1.Button1Click(Sender: TObject);
var edit:array [1..5] of Tedit;
     i:integer;
begin
for i:=1 to 5 do
begin
edit[i]:=Tedit.Create(self);
edit[i].Left:=edit[1].Width*i;//距离左边的距离
.....//可以设置edit的其他属性
edit[i].Parent:=panel1;
end;在D7+WINXP下测试通过end;