Snake im Grid

[Jonas Shinaniganz]

Huhu :]

hab ein kleines Snake gebaut allerdings tickt der Timer (Spielgeschwindigkeit) auf verschiedenen PC's deutlich unterschiedlich, was mach ich da falsch?



grüße

Edit: Delphi XE, Win 7 64 Bit -> Dev Sys

[roboter202]

Timer schaffen häufig, besonders bei kleinen Intervallen, nie die Angegeben Zeit. So schaft ein Timer mit einem Intervall von 1-2 ms meist nie mehr als 14ms.

Du könntest versuchen das zu berücksichtigen wenn die Schlange berechnest "Timebased Movement" oder du baust dir einen Idle Handler in dem du dann die sleep Methode aufrufst.

Delphi-Quellcode:

procedure TForm1.IdleHandler(Sender: TObject; var Done: Boolean);
begin

//Code der alle 4 ms ausgeführt werden soll.
sleep(4);
done := false;
end;

den musst du dann nur mit Application.OnIdle := IdleHandler; setzen.

Gruß roboter202