Auf- oder Abrunden mit Delphi

**mkinzler**

Ja nennt man auch Runden. Das kann man durch Verschieben des Wertebereiches erzielen:

Zahl := Round( Zahl / 100) * 100;

**smart**

Aber nennt man das denn noch runden?

Runden kenne ich nur für Nachkommastellen. Und funktioniert das überhaupt mit round?

Wie das funktioniert bin ich noch am testen. Kaufmännisch braucht man z.B. 12345 -> 13000.

**himitsu**

**mkinzler**

Hier würde ich eher 12000 erwarten

**smart**

Hier würde ich eher 12000 erwarten

Ok, das habe ich mich jetzt verhauen. Sorry.

**himitsu**

Zitat von OH:

Anmerkung: Die Funktionsweise von Round/RoundTo kann mit der Prozedur Set8087CW oder der Funktion SetRoundMode gesteuert werden.

beep

**mkinzler**

Mit Ceil() würde es auch gehen:

Ceil( 12345 / 1000) * 1000 sollte 13000 ergeben

**himitsu**

Oder mit Trunc Trunc((12345 + 999) / 1000) * 1000

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.858 Beiträge Delphi 11 Alexandria	#21 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:16 Ja nennt man auch Runden. Das kann man durch Verschieben des Wertebereiches erzielen: Zahl := Round( Zahl / 100) * 100; Markus Kinzler Geändert von mkinzler (19. Sep 2010 um 19:21 Uhr) Grund: Stuss korrigiert
	Zitat

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.033 Beiträge Delphi 12 Athens	#23 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:20 Math.RoundTo Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. my Delphi wish list : BugReports/FeatureRequests
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.858 Beiträge Delphi 11 Alexandria	#24 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:22 Hier würde ich eher 12000 erwarten Markus Kinzler
	Zitat

smart Registriert seit: 19. Dez 2004 Ort: Bochum 1.266 Beiträge Delphi 2007 Professional	#25 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:23 Zitat von mkinzler: Hier würde ich eher 12000 erwarten Ok, das habe ich mich jetzt verhauen. Sorry. Heike Kretschmann Viele Grüße aus Bochum kaum denkt man alles ist fertig, da fängt man wieder von Vorn an.
	Zitat

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.033 Beiträge Delphi 12 Athens	#26 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:24 Zitat von OH: Anmerkung: Die Funktionsweise von Round/RoundTo kann mit der Prozedur Set8087CW oder der Funktion SetRoundMode gesteuert werden. beep Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. my Delphi wish list : BugReports/FeatureRequests
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.858 Beiträge Delphi 11 Alexandria	#27 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:26 Mit Ceil() würde es auch gehen: Ceil( 12345 / 1000) * 1000 sollte 13000 ergeben Markus Kinzler
	Zitat

himitsu Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.033 Beiträge Delphi 12 Athens	#28 AW: Auf- oder Abrunden mit Delphi 19. Sep 2010, 19:30 Oder mit Trunc Trunc((12345 + 999) / 1000) * 1000 Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. my Delphi wish list : BugReports/FeatureRequests
	Zitat