Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
Delphi 12 Athens
|
Re: QuickSort zu schnell für GetTickCount?
25. Nov 2008, 16:10
Du musst die Frequenz ermitteln und die Ausgabe durch die Frequenz teilen. Was Du jetzt hast, ist die Frequenz.
[edit]Beispiel:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var Start, Stopp, Freq: int64;
begin
QueryPerformanceCounter(Start);
sleep(1234);
QueryPerformanceCounter(Stopp);
QueryPerformanceFrequency(Freq);
ShowMessage(Format('Das waren %.2f Sekunden.',[(Stopp - Start) / Freq]));
end;
[/edit]
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|