Es ist original das Bitmap aus dem Shooter-Demo (128x64) und der Intervall ist auch 33 wie in dem Demo.
Delphi-Quellcode:
procedure TScrollBackground.DoMove(MoveCount: Integer);
begin
inherited DoMove(MoveCount);
Y := Y + MoveCount*(66/1000)*FSpeed;
end;
Nehme ich hier 750 geht es einigermaßen. Aber ich habe noch ein anderes Problem mit der Animation, aber das könnte den gleichen Grund haben. Die Explosionen sind so schnell bei mir. Egal was ich da bei AnimiationSpeed angebe, es ändert sich nichts. Aber dazu mache ich eventuell ein extra Thread auf.