Zeit messen

Tante · Beiträge: 41

Hallo!

Ich möchte messen, wie viele Millisekunden (ca) eine bestimmte Prozedur dauert. Ich hab's auch schon x-mal gemacht, aber jetzt habe ich den Befehl vergessen. Und meine Delphi Hilfe bringt mich auch nicht weiter.

Kann mir wer helfen??
Also sowas in der Form:

markieren

Quelltext

1:
2:
3:
4:

t1:=Zeitmessung;
....
t2:=Zeitmessung;
vergangene_Zeit:=t2-t1;

Wie war noch mal der richtige Befehl??? :oops:

smiegel · Verfasst: Do 06.02.03 17:45

Hallo,

dazu kannst Du die Funktion GetTickCount benutzen.

markieren

Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

var ticks:DWord;

  ...
  ticks:=GetTickCount;
  ...
  // tue irgend etwas
  ...
  ShowMessage('Ticks: '+IntToStr(GetTickCount-ticks)+' ms');
  ...

_________________
Gruß Smiegel
Ich weiß, daß ich nichts weiß, aber ich weiß mehr als die, die nicht wissen, daß sie nichts wissen. (Sokrates)

Tante · Beiträge: 41

Super, Danke!

mrbug · Beiträge: 44 Win XP,Win 2000,Suse 9.0 D7 Ent. , K3 Ent.

Hallo !

Auch ich möchte GetTickCount benutzen, doch die Hilfe kennt ihn nicht.
Was tun? Was habe ich vergessen?

_________________
HoffentlichbaldkeinAnfängermehrseier

Ehemaliges Mitglied Erhaltene Danke: 1

Es handelt sich dabei um eine Funktion, die vom System zur Verfügung gestellt wird und in der Unit "Windows.pas" deklariert ist. Im Normalfall sollte diese Unit standardmäßig eingebunden werden, so dass es zumindest beim Kompilieren keine Fehler geben dürfte.

Wenn es dir um Erklärungen geht, dann schau mal in die "Win32.hlp", die bei Delphi dabei ist, oder geh direkt zu Microsoft und klick diesen MSDN-Suchlink an: Suche im MSDN

"GETTICKCOUNT".

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme