![]() |
Frequenz aus Timer-Intervall berechnen
Hallo,
für viele wahrscheinlich das einfachste der Welt, ich verzweifele aber gerade daran. Möchte aus dem Intervall eines Timers die Frequenz(in Hz) berechnen. Habe mir folgendes ausgedacht: Label62.Caption:=floattostr(1 div (Timer3.Interval div 1000))+' Hz'; Rein mathematisch stimmt diese Rechnung, nur mit den Variablentypen scheint etwas faus zu sein, da ich immer div. by Zero erhalte. Was habe ich vergessen? |
Re: Frequenz aus Timer-Intervall berechnen
Div gibt dir den ganzzahligen Rest.
Du müsstest das / benutzen. |
Re: Frequenz aus Timer-Intervall berechnen
Hallo,
deswegen kann trotzdem ein div by Ziro auftreten.
Delphi-Quellcode:
Gruß Fuchtel
If Timer3.Interval <> 0 then
Label62.Caption:=floattostr(1 / (Timer3.Interval / 1000))+' Hz' else Label62.Caption:='0 Hz'; |
Re: Frequenz aus Timer-Intervall berechnen
Zitat:
MOD gitb den ganzzahligen Rest @win_tho: Benutze mal / statt div |
Re: Frequenz aus Timer-Intervall berechnen
Mit / geht es so, wie ich wollte. Muss jetzt nur noch was zum runden einbauen.
In meinem Fall hat jeder Timer mindestens einen Intervall von 100, daher ist die Gefahr von div zero nicht so groß. Aber trotzdem danke für den Tipp. Gleich für die Zukunft merken :) |
Re: Frequenz aus Timer-Intervall berechnen
wollte jetzt mit roundto() auf 2 Nachkommastellen runden. Er gibt aber immer nur "0 Hz" aus. Was ist falsch?
Delphi-Quellcode:
Label62.Caption:=floattostr(roundto(1 / (Timer3.Interval / 1000),2))+' Hz';
|
Re: Frequenz aus Timer-Intervall berechnen
Nimm mal "-2"...
Gruß Hawkeye |
Re: Frequenz aus Timer-Intervall berechnen
Hallo,
denn Du willst ja die Nachkommastellen runden :
Delphi-Quellcode:
Gruß Fuchtel
Label62.Caption:=floattostr(roundto(1 / (Timer3.Interval / 1000), -2))+' Hz';
|
Re: Frequenz aus Timer-Intervall berechnen
Zitat:
Der Wert, der in Intervall steht IST die Frequenz !!! (Das muss nichts berechnet werden) Gruß Matthias |
Re: Frequenz aus Timer-Intervall berechnen
Zitat:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:14 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