Irgendwie hab ich das Gefühl, dass das Ganze bei dir 'n ziemliches Flickwerk ist.
Daher nochmal der Tipp: Geh dein Projekt und dein Vorhaben nochmal analytisch durch. Denn wenn du nicht weißt, warum und weshalb etwas geht oder nicht geht, dann weil dir selbst nicht klar ist, was da überhaupt passiert. Und da kommt man dahin, wo wir jetzt sind: Unklare Fragestellung durch unklare Problemformulierung, weil du scheinbar selbst den Überblick irgendwie über das Projekt verloren hast. Oder?
1)
for b := 0 to high(Kreis) do
Warum 0 to ... und nicht Low(Kreis) to ...?
2)
Delphi-Quellcode:
With Kreis [b] do
begin
Left := Kreis [b].x;
Top := Kreis [b].y;
end;
Wo wird Width und Height gesetzt?