Zitat von
mimi:
Der Timer.Interval steht auf 10 um die CPU nicht zu überlassten bzw. auf 100% zu bringen. schalte ich sie auf 1 ist sie auf 100% 2 Würde auch noch gehen, aber 10 reicht voll aus.
Abgesehn davon das bei 1 eh fals gemessen würde.
TTimer arbeitet mit mit der selben Teit wie GetTickCount und dieses Zeit läuft nur "aktuell" in 10ms-Schritten und mißt dacher nur bei größeren Intervallen genau.
also einfach beim Spielstart die Zeit merken.
Start1 := Now; (TDateTime)
oder für "halbwegs genaue" (Kurzzeit)Messungen
Start2 := GetTickCount; (LongWord)
und die aktuelle Dauer/Zeit
Jetzt1 := Now - Start1; (Jetzt1 in Millisekunden)
Jetzt2 := GetTickCount - Start2; (Jetzt2 als TDateTime in Tagen+Zeit)