Dreidimensionales Array darstellen.

[Muellermilchtrinker]

Delphi-Quellcode:

    for x := 1 to 5 do
    begin
      for y := 1 to 5 do
      begin
        for z := 1 to 5 do
        begin
          glTranslatef(x/10,y/10,z/10);
          glBegin(GL_QUADS);
            Cube(0);
          glEnd;
        end;
      end;
    end;

Gibt leider nicht das Ergebnis. Ich glaub ich hab irgendwo in der Routine ein Problem.