endoftheweek功能（日期函数）在Delphi

功能：

函数的EndOfTheWeek（const值：TDateTime）：TDateTime；



一、TDateTime日期时间型表达式。



返回值：返回的参数指定的TDateTime日期值周的最后一天的最后一刻。



单位属于：DateUtils。



实例：

程序tform1.button1click（发件人：TObject）；

Var MyEndWeek：TDateTime；

开始

MyEndWeek：= endoftheweek（现在）；

被（DateTimeToStr（MyEndWeek））；

结束；



运行结果：

2014-1-12 23:59:59