Dezimalkomma anstatt Dezimalpunkt

[Sprint]

Wofür StringReplace wenn es FloatToStr gibt???

Delphi-Quellcode:

var
  Ergebnis: Double;
begin

  Ergebnis := 1234567.89;
  DecimalSeparator := ',';  // DecimalSeparator ist eine Variable die sich in der Unit SysUtils befindet
  ShowMessage(FloatToStr(Ergebnis));

end;

oder

Delphi-Quellcode:

var
  Ergebnis: Double;
  FS: TFormatSettings;
begin

  Ergebnis := 1234567.89;
  FS.DecimalSeparator := ',';
  ShowMessage(FloatToStr(Ergebnis, FS));

end;