delphi5中建立控件数组?

Question

在vb中只要对控件复制、粘贴就行了，delphi5中如何做?
因我想用
for t:= 1 to 100 do
 begin
  image[t].Left:=t*8;
 end; 
不想写成这样
 image1.Left:=8;
 ..
 image100.Left:=800;

Answer 1

补充一下
下种方法我不要，我要静态的，不要动态的
var
  Myimage: array[1..100] of TImage;
  t:integer;
begin
for t:= 1 to 100 do
 begin
   Myimage[t]:=TImage.Create(self);
   Myimage[t].Parent:=Form1;
   Myimage[t].Left:=t*8;
 end; 
end;

Answer 2

例如: 控件为TEdit  共有 3个
你可以把它们的name写成 edit1,edit2,edit3
for t:=1 to 3 do
begin

Answer 3

例如: 控件为TEdit  共有 3个
你可以把它们的name写成 edit1,edit2,edit3
for t:=1 to 3 do
begin
  (FindComponent(edit+inttostr(t)) as TEdit).Left:=t*8;
end;
控件要你先静态设好的

Answer 4

:) sorry 上面一名写错了
  (FindComponent(edit+inttostr(t)) as TEdit).Left:=t*8;
改成
  (FindComponent('edit'+inttostr(t)) as TEdit).Left:=t*8;

Answer 5

IwantFlay(我很爱她!!!!!!!!!!) var
t:integer;
begin
for t:=1 to 3 do
  begin
    edit(t).left:=t*8;
  end;
end;你编译通过了在贴出来好不好

Answer 6

to IwantFlay(我很爱她!!!!!!!!!!) 
我没看到你后面的东东对不起哈该死的网速

Answer 7

var
  t :integer;
begin
  for t := 1 to 100 do
    (FindComponent('image'+IntToStr(t)) as TImage).Left:=t*8;
end;