FormatFloat Formatsettings with "." not with ","

WEB TMS WEB Core
11 
procedure ConfigFormatSettings;
var
  FormatSet: TFormatSettings;
begin
  FormatSet                      := TFormatSettings.Create('de-DE');
  FormatSet.DecimalSeparator     := '.';
  FormatSet.ThousandSeparator    := '`';
  FormatSet.CurrencyDecimals     := 2;
  FormatSet.DateSeparator        := '.';
  FormatSet.ShortDateFormat      := 'dd.mm.yyyy';
  FormatSet.LongDateFormat       := 'dd.mm.yyyy';
  FormatSet.TimeSeparator        := ':';
  FormatSet.TimeAMString         := 'AM';
  FormatSet.TimePMString         := 'PM';
  FormatSet.ShortTimeFormat      := 'hh:nn';
  FormatSet.LongTimeFormat       := 'hh:nn:ss';

  System.SysUtils.FormatSettings   := FormatSet;
end;

procedure Tfm_Start.WebFormCreate(Sender: TObject);
begin
  ConfigFormatSettings;

you set this in the create of the first form, if you do it in the project file (dpr) it will not work