Mit QueryPerformanceFrequency und QueryPerformanceCounter ist es ja möglich, in hoher Auflösung die Prozesse zu messen.
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
a, b, c: Int64;
begin
QueryPerformanceFrequency(a);
QueryPerformanceCounter(b);
//Befehlesfolge deren Zeitdauer bestimmt werden soll
QueryPerformanceCounter(c);
Caption := IntToStr((c - b) * 1000 div a); //Ausgabe in ms
end;
Da mir aber nur diese Variante bekannt ist, würde es mich interessieren, ob man auch die Zeit mit Angaben nach dem Komma machen kann. Oft sind nämlich die Ergebnisse bei mir 0ms. Ich verstehe nämlich noch nicht ganz, wie diese Rechnung mit div a funktioniert. Ich weiß nur, das a, in dem Fall hier, die Anzahl der "Ticks" pro ms sind. *shrug*