![]() |
Rechtecke hintereinander zeichnen
Liste der Anhänge anzeigen (Anzahl: 1)
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 |
Re: Rechtecke hintereinander zeichnen
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:
Grüße
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); Klaus |
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:09 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz