Anzahl der Nachkommastellen von Double ermitteln

[himitsu]

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

[AndyDF]

Zitat von himitsu:

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

Danke. So ähnlich habe ich jetzt auch meine Lösung - die für meinen Fall zumindest erstmal reicht.
Allerdings ist dein Ansatz mit TrimRight() deutlich eleganter als meine Schleife.