Logo Questions Linux Laravel Mysql Ubuntu Git Menu
 

Where did EraNames go in Delphi XE5?

The unit SysUtils (System.SysUtils) no longer has an EraNames or FormatSettings.EraNames. What is its replacement and where did it go?

i.e:

 for I := Low(SysUtils.EraNames) to High(SysUtils.EraNames) do
    begin
      ..
    end;
like image 240
Warren P Avatar asked Oct 22 '13 01:10

Warren P


1 Answers

I'm answering my own question because I thought this might help someone.

Use FormatSettings.EraInfo[x].EraName and other properties of the EraInfo record.

The FormatSettings now holds an Array of EraInfo Records.

The for loop could be written:

   for I := Low(FormatSettings.EraInfo) to High(FormatSettings.EraInfo) do
   begin
     ...
   end;
like image 182
Warren P Avatar answered Nov 09 '22 12:11

Warren P