Delphi QuickSort zu schnell für GetTickCount?

Thema durchsuchen

Ansicht

Themen-Optionen

QuickSort zu schnell für GetTickCount?

Ein Thema von Forlan · begonnen am 25. Nov 2008 · letzter Beitrag vom 25. Nov 2008

Vorheriger Beitrag

Nächster Beitrag

DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.556 Beiträge

Delphi 11 Alexandria

#11

Re: QuickSort zu schnell für GetTickCount?

25. Nov 2008, 15:10

Du musst die Frequenz ermitteln und die Ausgabe durch die Frequenz teilen. Was Du jetzt hast, ist die Frequenz.

[edit]Beispiel:

markieren

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