求算法或API，急

[xiaohuan]

有没有这样的API：给定日期，想得到是星期几

有现成的函数也行

[xiaohuan]

UP

[esu]

DayOfWeek 函数

[esu]

function WeekDay(const CuDate: TDateTime): string;
begin
Result := '星期' + Copy('日一二三四五六', DayOfWeek(CuDate) * 2 + 1, 2);
end;