Stopuhr/Laufzeit

[huefte]

Hallo Zusammen

bin eigentlich noch ein anfänger, hoffe aber dass ihr mir helfen könnt! In der Schule nehmen wir Sortier-Algorithmen ducrh. Als Zusatz will ich nun in mein Programm, das 4 Algorithmen umfasst, eine Funktion einbauen, die anzeigt wie lange das Sortieren gedauert hat! Beispielsweise in einem Edit-Feld ausgedruckt wird, oder ein Label sichtbar wird, in dem die Zeit steht.

Vielen Dank für eure Hilfe

[jfheins]

Nimm eine Variable Zeit, mach vor dem algo ein Zeit := Gettickcount; und am ende sowas wie showmessage (inttostr(GettickCount - zeit));
(in ms)

[huefte]

Sowas hab ich schon versucht!

Mein COde sieht jetzt so aus

Code:

Zeit:=GettickCount;
Quick(links,rechts);
Endzeit:=(GettickCount-Zeit);
Showmessage(IntToStr(Endzeit)+'ms');

Er zeigt mir "0 ms" an.... !?!

[jfheins]

Vieleicht hast du zuwenige Sachen zum Sortieren ???

[huefte]

es sind nur 10. ich machs dann halt mal mit 100!

[huefte]

ist immer noch bei 0 ms! habs jetzt mal mit 100 versucht

[jfheins]

tztztz ... um gute Erfebisse zu bekommen, solltest du das schon so mit min. 10.000 machen ...

Dann erkennst du auch Unterschiede in den Zeiten der versch. Sortieralgos ...

[huefte]

auch bei 100000 immer noch 0!

[jfheins]

:shock: Und er sortiert auch ????

Dann mach ma:

Delphi-Quellcode:

queryperformancecounter (anfang);
// ...
queryperformancecounter (ende);
queryperformancefrequency (frq);
zeit = (ende - anfang) / frq;

[whiteshark]

probier es mal so:

Delphi-Quellcode:

var summe, von, bis:integer;
begin
von:=gettickcount;
quick (..);//deine Sortierfunktion
bis:=gettickcount;
summe:=bis-von;
LabelZeit:=strtoint(summe)+ 'ms'.
end;

wir haben das zur Zeit auch in der Schule ;-)

[Nils_13]

Wenn es nur um die Zeit dabei geht ist es doch einfach!

*mist*

[huefte]

Jetzt gehts endlich! Danke für deine Hilfe. Hatte einen doofen fehler gemacht! für 10.000 braucht er nun 1125ms! Ist das viel?

[malo]

Zitat:

Zitat von Nils_13

Wenn es nur um die Zeit dabei geht ist es doch einfach!

Falls ja: Timer -> wenn aktiviert -> addiere eine zahl (z.B. 1 Sekunde) ins editfeld pro Sekunde per Timer -> fertig

Müsste der Timer nicht entsprechend langsamer / ungenauer sein, als die GetTickCount-Function, und außerdem entsprechend mehr ressourcen verbrauchen? Ein Timer kann imho keine wirklich genauen Ergebnisse liefern (besonders, wenn es auf einzelne millisekunden ankommt). ;)

[whiteshark]

naja, es ist normal!
Die Zeit hängt von deiner Rechenleistung ab. Mit "gettickcount" sagt dir, wielange dein Rechner schon an ist.

[malo]

Zitat:

Zitat von huefte

Jetzt gehts endlich! Danke für deine Hilfe. Hatte einen doofen fehler gemacht!

Welcher Fehler war das denn? Wenn jemand mal das gleiche Problem hat, wird ihn die Lösung des Problem sicher interessieren :)

//edit: Wegen der Frage "ist das viel": Du musst imho alle Sortier-algos auf deinem PC einzeln messen und vergleichen. Und vorher am besten ALLE Programme schließen, die du nicht brauchst und die meisten Prozesse beenden, die nebenher laufen, sonst werden deine Ergebnise verfälscht (weil ein Programm dann z.B. kurzzeitig ein wenig mehr Rechenleistung braucht, als sonst...). ;)

[Nils_13]

gut.

[huefte]

ja ich hatte vergessen das Array zu ändern. Anfängerfehler halt *schaem*

okay. danke für eure hilfe!