Ich an deiner Stelle würde eine Prozedur schreiben, der du als Parameter den Mittelpunkt übergibst und die dann mit diesem Mittelpunkt ein
Rad malt. Das dürft ja nicht so viel Arbeit sein, Copy&Paste halt. Danach würde folgender Code nämlich reichen:
Delphi-Quellcode:
for i := 300 to 900 do begin //oder was für Zahlen halt auch immer
MaleRad(i);
MaleRad(i - 200); // Der Abstand zwischen deinen Rädern
Warte(10);
end;