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.