Question

delphi有没有直接获取当前星期几的函数

Answer 1

在 delphi 的 DateUtils 单元文件里，提供了一系列的日期函数，根据指定日期获取是星期几的函数，可以使用 DayOfTheWeek，其函数原型定义如下：

 

●function DayOfTheWeek(const Avalue: TDateTime): Word; 

描述： 

对于给定的TDateTime类型的日期时间，使用 DayOfTheWeek 函数能得到该日期是该星期的 第几天。DayOfTheWeek 函数的返回数值为 1 到 7，其中 1 表示星期一，而 7 表示星期日。 
注意：DayOfTheWeek 是 ISO 8601 标准的（此标准为 星期一是一周的第一天）。对于一周 
的第一天是星期日的标准，如果想获得星期数，请使用 DayOfWeek 函数。

示例代码（获取今天是星期几）：

  ShowMessage(IntToStr(DayOfTheWeek(Now)));