Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Format Extended mit Nullen

    Delphi
    by Uwe Raabe, 9. Aug 2023
  Geht zumindest etwas schlanker.
  
  function FormatFloat2(const AValue: Extended; const ADigits, ADecimals: Byte; const AFormatSettings: TFormatSettings): string;
  begin
  var Fmt := string.Create('0', ADigits);
  var L := Fmt.Length - 3;
  while L > 1 do begin
  Insert(',', Fmt, L);
  Dec(L, 3);
  end;
• Forum: Object-Pascal / Delphi-Language

  AW: Format Extended mit Nullen

    Delphi
    by Uwe Raabe, 9. Aug 2023
  Die Tausendertrenner bekommst du mit n statt f, aber die führenden Nullen setzt Format nur bei ganzen Zahlen ein (d).
  
  Alternativ kannst du das gewünschte Ergebnis aber mit FormatFloat erreichen: FormatFloat('0,000,000.000', VALUE, TFormatSettings.Create);
  
  
  Ich würde auch empfehlen, das TFormatSettings.Create nicht bei jedem Aufruf zu machen, da das jedes mal einen Haufen API-Aufrufe...