Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Laufzeitmessung (https://www.delphipraxis.net/24091-laufzeitmessung.html)

Schneider-Huetter 15. Jun 2004 10:40


Laufzeitmessung
 
Kennt jemand eine Möglichkeit, wie man die Laufzeit eines Programms (oder einer Funktion/Prozedur) sinnvoll messen kann? Dies wäre ganz nützlich um z.B festzustellen ob eine bei Delphi mitgelieferte oder die selber programmierte Routine schneller ist.

MfG Schneider-Huetter

Steve 15. Jun 2004 10:45

Re: Laufzeitmessung
 
Ich denke, GetTickCount ist hinreichend genau.. am Anfang und am Ende aufrufen, die Differenz ist die benötigte Dauer in ms :)

Gruß
Stephan

Chewie 15. Jun 2004 16:04

Re: Laufzeitmessung
 
Für eine recht genaue Messung eignet sich MSDN-Library durchsuchenQueryPerformanceCounter.

Schneider-Huetter 17. Jun 2004 11:14

Re: Laufzeitmessung
 
Dankeschön :-D

Gruß Schneider-Huetter

glkgereon 19. Jun 2004 11:24

Re: Laufzeitmessung
 
ich habs gemacht mit

Delphi-Quellcode:
var
start, stop:TDateTime;
dauer:integer;

Begin
start:=time;

//deine procedure

stop:=time;
dauer:=millisecondsbetween(start, stop);
end;
fand ich sehr paktisch...


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:19 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz