8

EraNamesユニット SysUtils (System.SysUtils) にはまたはがなくなりましたFormatSettings.EraNames。その代替品は何ですか、それはどこに行きましたか?

すなわち:

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

1 に答える 1

11

これは誰かを助けるかもしれないと思ったので、私は自分の質問に答えています。

EraInfo レコードの使用FormatSettings.EraInfo[x].EraNameおよびその他のプロパティ。

FormatSettings は、EraInfo レコードの配列を保持するようになりました。

for ループは次のように記述できます。

   for I := Low(FormatSettings.EraInfo) to High(FormatSettings.EraInfo) do
   begin
     ...
   end;
于 2013-10-22T01:05:08.057 に答える