Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.768 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: Rechtecke hintereinander zeichnen

  Alt 14. Apr 2006, 19:25
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

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
Klaus
  Mit Zitat antworten Zitat