Code :

1 2 3 4 5

for i := 0 to 2 do begin     Rectangle(100+i*100, 200, 200+i*100, 100);     Rectangle(100+i*100, 300, 200+i*100, 200);     Rectangle(100+i*100, 400, 200+i*100, 300);     end;

Diese Schleife zeichnet einen 2D-Würfel mit 3 Quadraten. Wenn ich i um 1 erhöhe, zeichnet Delphi an der Seite 1 Reihe Quadrate mehr. Aber nach unten soll auch eine Reihe Quadrate entstehen. Hab probiert, die y-Werte (200,300,400) um i*100 zu erhöhen, aber das schlug fehl. Wie drücke ich das aus?

Zitat von HarryXVI

Diese Schleife zeichnet einen 2D-Würfel mit 3 Quadraten.

Ähm, was ist denn ein 2D-Würfel? Wie sieht denn das Bild aus, das rauskommt? Und was sollte rauskommen?

http://www.bilder-hochladen.net/files/7k6o-b.jpg

da sollen nun rechts und unten weiterer Quadratreihen drankommen. ich möchte eine Zahl eingeben (z.B.4) die dann einen Würfel mit Kantenlänge 4 Quadrate zeichnet. Um den allgemeinen kümmere ich mich. Wie kriege ich unten weitere Quadrate dran? An der Seite funktionierts.

Hallo,

das ist aber trotzdem kein Würfel Egal, das Problem könnte man vermutlich so lösen (keine Garantie, da ich mit Delphi nichts am Hut habe):

Code Delphi:

1 2 3 4 5

for i := 0 to n-1 do begin     for j := 0 to n-1 do begin       Rectangle(100+i*100, 200+j*100, 200+i*100, 100+j*100);     end; end;

n soll dabei die eingegebene Zahl sein.

Grüße,
Matthias

funktioniert, danke für deine hilfe.