delphi - SysUtils.LongDayNames 未声明的标识符

Question

我对delphi非常陌生，我尝试了以下代码

procedure TForm1.Button1Click(Sender: TObject);
var
  myDate : TDateTime;
  day    : string;

begin
  myDate := EncodeDate(2002, 12, 31);

  day := LongDayNames[DayOfWeek(myDate)];

  ShowMessage('Christmas day 2002 is on a '+day);
end;

我已System.SysUtils在Uses部分中声明，但我仍然收到错误未声明的标识符。

我正在使用德尔福 XE3 17.0

Answer 1

在 XE2 LongDayNames 移动到 TFormatSettings。 http://docwiki.embarcadero.com/Libraries/XE2/en/System.SysUtils.TFormatSettings。

所以你可以使用：

day := FormatSettings.LongDayNames[DayOfWeek(myDate)];

FormatSettings 是一个非线程安全的全局变量。

如何使用它，你可以在这里看到