Variablen in Komponentennamen

[Klaus01]

Hallo,
Du hast die Shape schon zur Designzeit erstellt - oder?

Wenn ja könnte das helfen:

Delphi-Quellcode:

for i:=0 to 9 do
  begin
    shape[i]:=TShape(FindComponent('Shape'+IntToStr(52+i)));
  end;

Grüße
Klaus