Delphi判断是否为周末？今天是周几？

Delphi中的DayOfTheWeek返回今天是周几，返回值是整数，从1到7，分别表示周一，到周日，周六是6，周日是7。

判断今天是否是周末

uses System.DateUtils;  //需要引用的单元

  if DayOfTheWeek(Date) in [6, 7] then // 
    ShowMessage('周末了，好好休息！');