Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
Delphi 12 Athens
|
AW: Anzahl der Nachkommastellen von Double ermitteln
13. Sep 2018, 13:48
Und nun nur noch ein paar böse Stringmisshandlungen, als schlechte Beispiele für eine einzeilige Lösung.
Delphi-Quellcode:
EinStringMitMöglichstWenigenNachkommastellen := MyDouble.ToString(ffFixed, 15, 18).TrimRight([0]).TrimRight([FormatSettings.DecimalSeparator]);
AnzahlDerNachkommastellen := ReverseString(MyDouble.ToString(ffFixed, 15, 18).TrimRight([0])).IndexOf(FormatSettings.DecimalSeparator); // Reverse fehlt leider im StringHelper
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
|