Thema: Delphi pyramide zeichnen

Einzelnen Beitrag anzeigen

riddler

Registriert seit: 23. Okt 2005
3 Beiträge
 
#15

Re: pyramide zeichnen

  Alt 23. Okt 2005, 15:18
habs jetzt geschafft
mit 4 variabeln und einer verschachtelten for...do schleife

Delphi-Quellcode:
for y := 0 to 9 do
 begin
  for x := 0 to index do
   begin
    canvas.rectangle( p + x * 40, 10 + y * 20, p + 40 + x * 40, 10 + 20 + y * 20);
   end;
  index := index + 1;
  p := p - 20
 end;


aber auf sowas wär ich glaub ich ohne "denkanstöße" net gekommen

big thx an euch
  Mit Zitat antworten Zitat