Forum: Programmieren allgemein
by himitsu,
13. Sep 2018
Für die Funktionen aus den etwas neueren Helpern gibt es auch entsprechende "alte" Pascalfunktionen, die zufällig oftmals gleich/ähnlich heißen.
Die prozeduale Syntax sähe z.B. so aus.
EinStringMitMöglichstWenigenNachkommastellen := TrimRight(TrimRight(FloatToStrF(MyDouble, ffFixed, 15, 18), ), );
AnzahlDerNachkommastellen := Pos(FormatSettings.DecimalSeparator,...
Forum: Programmieren allgemein
by himitsu,
13. Sep 2018
Und nun nur noch ein paar böse Stringmisshandlungen, als schlechte Beispiele für eine einzeilige Lösung.
EinStringMitMöglichstWenigenNachkommastellen := MyDouble.ToString(ffFixed, 15, 18).TrimRight().TrimRight();
AnzahlDerNachkommastellen := ReverseString(MyDouble.ToString(ffFixed, 15, 18).TrimRight()).IndexOf(FormatSettings.DecimalSeparator); // Reverse fehlt leider im StringHelper