Ich hab jetzt einen großen Cube, aber der ist nicht so schön quadratisch, es ist eher ein Quader.
Dann drehe ich noch so:
Das im Render:
Delphi-Quellcode:
glRotatef(RotateX, 1, 0, 0);
glRotatef(RotateY, 0, 1, 0);
glRotatef(RotateZ, 0, 0, 1);
Und dann ein zweiten Timer mit einem Interval von 1s:
Delphi-Quellcode:
procedure TForm1.Timer2Timer(Sender: TObject);
begin
RotateY := RotateY - 0.15;
if RotateY <= 0 then RotateY := RotateY + 360;
RotateX := RotateX - 0.15;
if RotateX <= 0 then RotateX := RotateX + 360;
end;
Doch leider ist die Drehung sehr ruckelig. Wie bekomme ich das flüssiger??? Und wie bekomme ich den Cube sauber quadratisch.