EraNames在哪里进入Delphi XE5？

发布时间：2020-12-15 04:07:12 所属栏目：大数据来源：网络整理

导读：单元SysUtils(System.SysUtils)不再具有EraNames或FormatSettings.EraNames.什么是它的替代品,它去了哪里？即： for I := Low(SysUtils.EraNames) to High(SysUtils.EraNames) do begin .. end; 解决方法我正在回答我自己的问题,因为我觉得这可能对某人有

单元SysUtils(System.SysUtils)不再具有EraNames或FormatSettings.EraNames.什么是它的替代品,它去了哪里？

即：

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

解决方法

我正在回答我自己的问题,因为我觉得这可能对某人有所帮助.

使用FormatSettings.EraInfo [x] .EraName和EraInfo记录的其他属性.

FormatSettings现在包含一个EraInfo记录数组.

for循环可以写成：

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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!