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