Hallo ich habe volgenes Problem:
Ich möchte viele rechtecke mit einem kleinen abstand hintereinander zeichnen
ohne die zeile "canvas.RoundRect(50,400,70,420,10,10);"
erneut schreiben zu müssen und die Kordinaten zu ändern.
Wie geht das?? Ihr könnt auch ein bild ruterladen wo zu sehen ist wie ich es meine.
Danke; Gruß John

damit man einen Befehl nicht immer wieder schreiben muß
kann man ihn in einer Schleife wiederholen .

Schleifen gibt es
while do
repeat until
und for to do

So ungefähr sollte es mit for to do gehen

markieren

Delphi-Quellcode:

for i:=0 to (screen.width div (rectBreite+Abstand)) do
  canvas.RoundRect(50+(i*(rectbreite+abstand)),400,50+(i*(rectbreite+abstand))+rectBreite,420,10,10);

Grüße
Klaus