startoftheweek功能(日期函数)在Delphi

startoftheweek功能(日期函数)在Delphi



功能startoftheweek(const值:TDateTime):TDateTime;



一、日期的表达。



返回值:函数返回开始的第一天(星期一)的一周。



单位:dateutils。



实例:

程序tform1.button1click(发件人:TObject);

无功mystartweek:TDateTime;

开始

mystartweek:= startoftheweek(现在);

被(DateTimeToStr(mystartweek));

结束;



运行结果:{每周的第一天}

2014-1-6