Weekday 曜日

Weekday関数は指定された日付の曜日を返します。
Delphiでは DayOfWeek 関数を使用します。
DelphiでもVBと同じく 1が日曜日で 7が土曜日です。

■ DayOfWeekの使用例 
procedure TForm1.Button1Click(Sender: TObject);  
var
  w : integer;
begin
  w :=  DayOfWeek(Now);
  case  w of
    1   : ShowMessage('SUN');
    2   : ShowMessage('MON');
    3   : ShowMessage('TUE');
    4   : ShowMessage('WED');
    5   : ShowMessage('THU');
    6   : ShowMessage('FRI');
  else
    ShowMessage('SAT');
  end;
end;

関連項目
Date 日付
Now 日付／時刻