Timer mit Auflösung 1ms

[Basilikum]

Zitat von zarquon:

Allerdings habe ich mir dazu schon überlegt, den genauen ms-wert auch aus dem Timer zu ermitteln, entweder durch einen gut gewählten Intervall-Wert oder durch eine selbstkalibrierung (Ich warte mit der Systemuhr genau 1s und schaue, wieviele Events der Timer geliefert hat)

die "genauste" Zeit, die Deine PC-Hardware liefern kann, erhältst Du per API QueryPerformanceFrequency / QueryPerformanceCounter.

Beispiel:

Delphi-Quellcode:

Var
  Freq,
  PerfCount                       : Int64;
Begin
  QueryPerformanceFrequency(Freq); // Ticks per Sekunde

  For X:=1 TO 10000 Do Begin
    QueryPerformanceCounter(PerfCount);

    WriteLn(FormatFloat('0.0',PerfCount / Freq * 1000)); // * 1000 => Millisekunden
  end;
end;