float in int umwandeln

[ksh]

manchmal scheitert man an den einfachsten sachen :wall:

also, versuche eigentlich nur, einen float getrennt in Vor- und Nachkommastellen auszugeben. z.B. ein Gehalt.
bisher mache ich das so:
Eurobetrag: einfach runden
Centbetrag:

Delphi-Quellcode:

Betrag*100-(RoundTo(Betrag],0)*100)

Leider bekomme ich dann blöde Zahlen durch das Runden. Habe schon verzweifelt danach gesucht, eine Castfunktion zu finden. Habe auch nichts gefunden, dass ich einen float in einen int umwandeln kann...

schon mal vielen dank für eure Hilfe!

[mkinzler]

Delphi-Quellcode:

KommaTeil := (Betrag*100-Trunc(Betrag)*100)/100);

[JasonDX]

Die Nachkommastellen einer Zahl gibts einfach mit Frac :)

greetz
Mike

[ksh]

also ich habe jetzt beides probiert. wenn ich es an der Stelle auswerte, dann habe ich auch nur den gewünschten Betrag.
lasse das dann in eine AccessDB schreiben - und da gibt er mir dann immer noch den fehler aus. also dann gibts solche zahlen wie 96,000000000000000043!!!

[mkinzler]

Wir rundest du? In deinem Fall darfst du eigentlich nicht Runden, da du den Nachkommateil extra behandelst. Du mußt die Nachkommastellen einfach abscheneiden mit

Delphi-Quellcode:

Trunc( Betrag);

[ksh]

also, es funktioniert definitiv. schreibe dann den Betrag in die DB mit

Delphi-Quellcode:

ADOQuery1.FieldByName('ARCent').asString := floattoStr(Betrag);

und da haut es mir immer diesen Fehler mit rein. wie muss/ kann ich das anderweitig übergeben?

[mkinzler]

Was steht in Betrag: Ursprünlicher Wert? Nur ganzteiliger Wert?

[ksh]

also wenn ich das mit diesem Frac mache, dann steht da z.B. 96,0 drin

[Klaus01]

weil dein Betrag ein real Wert hat.
Wenn Du Betrag und Nachkommastellen getrennt
behandelst kannst Du auch für Betrag und Nachkommastellen
einen Integerwert nehmen.

Grüße
Klaus

[ksh]

danke! stand irgendwie auf dem schlauch! :-D