title: How to define a TFormatSettings constant (Delphi 10)
body: <p>I'm just trying to convert a Delphi 2007 application to Delphi 10. IN the 2007 version of the software I use a constant of TFormatSettings. Since the TFormatSettings type changed somewhere in between I came across the following problem:
  How do I define a TFormatSettings constant? I tried the following:</p>
  
  <pre><code>  XML_FormatSettings : TFormatSettings = (
      CurrencyString:            '€';
      CurrencyFormat:            3;
      CurrencyDecimals:          2;
      DateSeparator:             '-';
      TimeSeparator:             ':';
      ListSeparator:             ';';
      ShortDateFormat:           'yyyy-MM-dd';
      LongDateFormat:            'dddd, d. MMMM yyyy';
      TimeAMString:              '';
      TimePMString:              '';
      ShortTimeFormat:           'hh:nn:ss';
      LongTimeFormat:            'hh:nn:ss';
      ShortMonthNames:           ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec');
      LongMonthNames:            ('January', 'February', 'March', 'April', 'May', 'June', 'July', 'Augut', 'September', 'October', 'November', 'December');
      ShortDayNames:             ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat');
      LongDayNames:              ('Sunday', 'Monday', 'Tuesday', 'Wednesday', 'Thursday', 'Friday', 'Saturday');
      EraInfo:                   (
        EraName:   '';               // &lt;= Error here
        EraOffset: 0;
        EraStart:  0;
        EraEnd:    0;);
      ThousandSeparator:         ',';
      DecimalSeparator:          '.';
      TwoDigitYearCenturyWindow: 0;
      NegCurrFormat:             8;
      NormalizedLocaleName:      '';);
  </code></pre>
  
  <p>This gives the following error: Undeclared identifier: 'EraName'</p>
  
  <p>I tried several other approaches but did not find a solution. Is it possible at all to define a constant of TFormatSettings? How do you handle a record type defined and used in a record type when declaring a constant?</p>