delphi 判断当前时间是不是在规定的时间段

var

CurrTime:string;

CurrTime := FormatDateTime('HHMM',Now);

if (CurrTime >= '0800') and (CurrTime < '1200') then

begin

//在设定的8点到12点这个时间段

end

else

begin

//不在设定的8点到12点这个时间段

end;

在 delphi 的 DateUtils 单元文件里，提供了一系列的日期函数，根据指定日期获取是星期几的函数，可以使用 DayOfTheWeek，其函数原型定义如下：

●function DayOfTheWeek(const Avalue: TDateTime): Word; 

描述：

对于给定的TDateTime类型的日期时间，使用 DayOfTheWeek 函数能得到该日期是该星期的 第几天。DayOfTheWeek 函数的返回数值为 1 到 7，其中 1 表示星期一，而 7 表示星期日。 

注意：DayOfTheWeek 是 ISO 8601 标准的（此标准为 星期一是一周的第一天）。对于一周 

的第一天是星期日的标准，如果想获得星期数，请使用 DayOfWeek 函数。

示例代码（获取今天是星期几）：

  ShowMessage(IntToStr(DayOfTheWeek(Now)));

用copy（）函数：比如date:=2013-06-08;

newdate:=copy(date,3,2);

newdate:=newdate+copy(date,6,2);

newdate:=newdate+copy(date,9,2);

当然咯，如果你是取今天的时间，直接用formatdatetime('YYMMDD',now);

以上就是关于delphi 判断当前时间是不是在规定的时间段全部的内容，包括:delphi 判断当前时间是不是在规定的时间段、delphi有没有直接获取当前星期几的函数、delphi 截取 日期等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！