Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/delphi/9.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Delphi SysUtils.LongDayNames未声明的标识符_Delphi_Delphi Xe3 - Fatal编程技术网

Delphi SysUtils.LongDayNames未声明的标识符

Delphi SysUtils.LongDayNames未声明的标识符,delphi,delphi-xe3,Delphi,Delphi Xe3,我对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 '+da

我对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;
我已经在
Uses
部分声明了
System.SysUtils
,但仍然得到了未声明标识符的错误


我在XE2 LongDayNames中使用Delphi XE3 17.0

,并将其移动到了TFormatSettings。

因此,您可以使用:

day := FormatSettings.LongDayNames[DayOfWeek(myDate)];
FormatSettings不是线程安全的全局变量


如何使用它您可以在XE2 LongDayNames中看到移动到TFormatSettings的预期设置。

因此,您可以使用:

day := FormatSettings.LongDayNames[DayOfWeek(myDate)];
FormatSettings不是线程安全的全局变量


如何使用它您可以看到

我的代码分散在
{$IFDEF DELPHI15}
指令中。DELPHI15是在哪里定义的?它的值是多少?这里我可以找到一个DELPHI15实现的示例,但可能不同于INC-to-INC。Delphi Jedi也使用DELPHIxx定义,因此您可以使用包含文件。我的代码分散在
{$IFDEF DELPHI15}
指令中。DELPHI15是在哪里定义的,它的值是多少?只有VERxxx是官方的,这里我可以找到一个使用DELPHI15实现的示例,但可能会因INC而异。Delphi Jedi也使用DELPHIxx定义,因此您可以使用该包含文件