dynamisch erzeugte objekte ansprechen

[KoRn117]

hilfe ein problem

mit diesen code erzeuge ich shapes und dem namen Shape0, Shape1,Shape2,...

Delphi-Quellcode:

for reihen:=0 to AICs-1 do
begin
  for i := 1 to 8 do//ALEDs do
    begin
    // SHAPE ERZEUGEN
    ShapeX := TShape.Create(form1);
    ShapeX.Name :='Shape'+inttostr(AnzahlShapes+1); // plus eins weil nur wenn es 8 leds sind dann nur eine 7 darin steht
    ShapeX.Parent := form1;
    // und INITALISIEREN
    shapex.Width := 16;
    shapex.Height := 16;
    shapex.Top := (i*16);
    shapex.Left := 179+(reihen*16);
    shapex.Shape := stCircle;
    shapex.Brush.Color := clMaroon;
    //shapex.FreeOnRelease;
    inc(AnzahlShapes);
  end; // ende der for 1 to ALEDs
end; // for reihen 1 to AICs

und ich will sie in einer anderen procedure ansprechen, einzeln.

aber ich weiß nicht wie das geht ist mein erstes projekt mit dyn. erzeugten objekten.

hatte es versucht mit
ShapeX.Shape0.brush.color
und
Shape0.brush.color

aber es geht nicht - helft mir biiiitte

korn117