Auf- oder Abrunden mit Delphi

[smart]

Hi Alle,

wie kan man größere Zahlen mit Delphi auf- oder - abruden?

Viele Grüße
Heike

[Whatever]

Delphi-Quellcode:

round(x: Real)

[Luckie]

Such mal im Forum nach "runden". Ich glaube round macht einige Probleme. Interessant wären für dich eventuell noch die Funktionen ceil und floor.

[smart]

Was mache ich da falsch:

Delphi-Quellcode:

Edit2.Text := IntToStr(round(StrToInt(Edit1.Text)));

das klappt so nicht :cry:

[fkerber]

Hi!

Gibt es denn eine Fehlermeldung?
Oder was funktioniert nicht?


Liebe Grüße,
Frederic

[mkinzler]

Oder Trunc(), Ceil(), RoundTo(), Floor(), ...

[stahli]

Hast Du einen ungültigen "Wert" im Edit (z.B. Leertext)?
Dann probiere mal:

Delphi-Quellcode:

Edit2.Text := IntToStr(round(StrToIntDef(Edit1.Text, 0)));

[Luckie]

Was will man bei einem Integer runden? :roll:

Ich vermute mal die Fehlermeldung lautet, dass die Datentype nicht passen. Es wird ein Real erwartet, aber die Funktion bekommt ein Integer.

[smart]

Zitat:

Zitat von mkinzler (Beitrag 1050604)

Oder Trunc(), Ceil(), RoundTo(), Floor(), ...

muss da nicht was in USES setehen?

[stahli]

@ Luckie: ich Dödel!