problem mit selbst erstellter Komponente

[Delphi-Noobie]

Oki das klapp zwar:

Code:

var z:array of Tcontrol;
    bb:Tshape;
begin
setlength(z,4);
z[0]:=shape1;
z[1]:=shape2;
bb:=Tshape.Create(self);
bb.Parent:=self;
bb.SetBounds(200,30,50,20);
bb.Show;
z[2]:=bb;
bb:=Tshape.Create(self);
bb.Parent:=self;
bb.SetBounds(250,30,50,20);
bb.Show;
z[3]:=bb;
end;

Aber geht das nicht, dass man einfach nur bb eingeben kann und er dann ebend alle bb's durchgeht, ohne jedes einzeln ins array einzutragen?