|
Registriert seit: 15. Mär 2007
3.908 Beiträge
Delphi 12 Athens
|
AW: Runden ohne nachfolgende Nullen
10. Mär 2017, 17:16
Ich möchte keine festen Nachkommastellen, sondern die nachfolgenden Nullen löschen.
Das geht ja wie gesagt als String-Schleife, von hinten nach vorne, alles was Null oder Komma ist Löschen bis was anderes kommt.
Jedenfalls kan ich nicht z.B. im Format() die Stellen VOR der Konvertierung ändern,
sondern ich möchte es automatisch am Ergebnis raushaben.
Oder eben besser das die Nullen gar nicht erst entstehen.
Wenn ich die z.B. die Funktion Format ('%*.*f', [LPre, LPost, 123.456]);
benutze, dann wäre eine Formel für LPost nicht schlecht,
welche wiederung von der Zahl selbst abhängt: also
1.234 --> LPost = 3 (relevante Nachkommas)
1.230 --> LPost = 2 (relevante Nachkommas)
1.200 --> LPost = 1 (relevante Nachkommas)
Wie könnte man LPost aus der FloatZahl berechen ?
Rollo
|