Skąd EraNames iść w Delphi XE5?

Question

sysutils jednostka (System.SysUtils) nie ma już EraNames lub FormatSettings.EraNames. Jaka jest jego wymiana i dokąd się udała?

tj:

for I := Low(SysUtils.EraNames) to High(SysUtils.EraNames) do 
    begin 
     .. 
    end; 

Answer 1

mam odpowiedzi na moje własne pytanie, bo myślałem, że to może pomóc komuś.

Zastosowanie FormatSettings.EraInfo[x].EraName i inne właściwości rekordu EraInfo.

W FormatSettings teraz trzyma tablicę EraInfo Records.

Pętla for mogłoby być napisane:

for I := Low(FormatSettings.EraInfo) to High(FormatSettings.EraInfo) do 
    begin 
    ... 
    end;