常规参数
文章标题：
权重：
文章摘要：
function WeekofYear(Date: TDate): integer; varFirstDay, FirstWeekEnd, NowWeekEnd: TDate;Year, Month, Day: word;beginDecodeDate(Date, Year, Month, Day);FirstDay := EncodeDate(Year, 1, 1);FirstWeekEnd := FirstDay + 7 - DayofWeek(FirstDay);NowWeekEnd :
关键字：
知道 如何 日期 给出 FirstDay Date Year FirstWeekEnd
管理密码: