Einzelnen Beitrag anzeigen

Benutzerbild von Alexander Roth
Alexander Roth

Registriert seit: 17. Mai 2004
Ort: Kenn
574 Beiträge
 
Turbo Delphi für Win32
 
#6

Re: Geschwindigkeit ermitteln und ausgeben

  Alt 29. Dez 2005, 12:02
Egal für welche Sachen du die Geschwindigkeit messen willst, du brauchst erstmal die Zeit.

Da man nur den Zeitunterschied zwischen vorher und nachher messen muss, macht man:
Delphi-Quellcode:
var anfang,delta:longint;
begin
anfang:= gettickcount;
//blabla was du machen willst
delta:=(gettickcount-anfang);
label1.caption:=floattostr( delta/1000) +' s';
Dann weisst du ja sicher wieveil da übertragen wurde und da für konstante Geschwindigkeiten in der Physik gilt:
v= s/t

also
label2.caption:={was auch immer}/delta; Dann hast du alles pro ms

Tschüss
Alexander Roth
Ich bin umgestiegen auf: Lazarus und Ubuntu! Alles OpenSource!

Besuch doch mal: www.roth.us.ms
  Mit Zitat antworten Zitat