Delphi/Lazarus: Kommazahlen aufrunden, abrunden und normal runden
Tipp von Delphianer | Letztes Update am 28.06.2021 | Erstellt am 24.06.2013
In diesem Tipp möchte ich euch zeigen, wie ihr mit Delphi oder Lazarus Komma-Zahlen wie eine Extended, Float oder Real-Zahl runden könnt.
Dabei besteht die Möglichkeit, Zahlen abzurunden, aufzurunden oder normal bzw. kaufmännisch zu runden.
Übersicht: Sowohl Lazarus als auch Delphi stellen die folgenden Funktionen zur Verfügung:
- Round: normales/kaufmännisches Runden
- Trunc: Nachkommastellen werden abgeschnitten (=abrunden)
- Ceil: aufrunden (enthalten in Math)
- Floor: abrunden (enthalten in Math)
- Int: macht aus einer Kommazahl einen Integer-Wert (=abrunden)
- Frac: schneidet alles ab, was vor dem Komma steht bzw ersetzt den ganzzahligen Teil der Zahl durch 0
Beispiel: In diesem Beispiel zeige ich, welche Ergebnisse mit den einzelnen Funktionen zu erwarten sind.
Aufruf Ergebnis Aufruf Ergebnis round(7.2) 7 round(7.8) 8 trunc(7.2) 7 trunc(7.8) 7 ceil(7.2) 8 ceil(7.8) 8 floor(7.2) 7 floor(7.8) 7 int(7.2) 7 int(7.8) 7 frac(7.2) 0.2 frac(7.8) 0.8
Hinweis: Für die Funktionen Ceil() und Floor() muss die Unit "Math" zum uses-Abschnitt hinzugefügt werden, Round(), Trunc(), Int() und Frac() sind in der Unit "System" enthalten, die in der Regel schon unter "uses" steht.
Über den Autor
Der Autor hat keine Kurzbeschreibung seines Profils angegeben.
Profil anzeigen
Ähnliche Themen
Delphi/Lazarus: 3 Wege um eine Zahl auf X Nachkommastellen zu runden
Tutorial | 0 Kommentare
Delphi/Lazarus: Funktion um Zahl auf beliebige Position vor oder nach Dezimalzeichen zu runden
Tutorial | 0 Kommentare
Delphi/Lazarus: Nur Zahlen im Edit-Feld erlauben
Tipp | 0 Kommentare
Steuererklärung: Aufrunden oder Abrunden?
Frage | 1 Antwort
Delphi/Lazarus: Zahl auf die nächsten 10, 100 oder 1000 runden
Frage | 1 Antwort
Delphi/Lazarus: Link zu einer Website in einer Anwendung setzen
Tutorial | 0 Kommentare
Wichtiger Hinweis
Bitte beachten Sie: Die Beiträge auf askingbox.de sind Beiträge von Nutzern und sollen keine professionelle Beratung ersetzen. Sie werden nicht von Unabhängigen geprüft und spiegeln nicht zwingend die Meinung von askingbox.de wieder. Mehr erfahren.
Jetzt mitmachen
Stellen Sie Ihre eigene Frage oder schreiben Sie Ihren eigenen Artikel auf askingbox.de. So gehts.
Round und RoundTo in Delphi verwenden das symmetrische / Banker's Runden und nicht das kaufmännische!
Wie das bei Lazarus ist, kann ich aber nicht sagen...
12.12.2021 um 13:51