Feld (Array) von Shapes

[mkinzler]

Delphi-Quellcode:

shapes: Array of Shapes;
i: integer;
...
for i := 0 to Anzahl - 1
    shapes[i] := TShape.Create( <Owner>);
    shapes[i].Parent := <Parent>;
    shapes[i].Left := ...