delphi 时间比较函数(需引用单元)

yygyyygy1233

于 2023-05-03 17:57:29 发布

阅读量1.3k

点赞数 2

分类专栏： Delhi 文章标签： java 开发语言

本文链接：https://blog.youkuaiyun.com/yygyyygy1233/article/details/130475353

版权

引用单元：system.dateutils
delphi 时间比较函数
CompareDateTime() //比较两个时间是否相同
CompareDate() //比较两个时间的日期是否相同
CompareTime() //比较两个时间的时分秒是否相同
SameDateTime() //比较两个时间是否相同
SameDate() //比较两个时间的日期部分是否相同
SameTime() //比较两个时间的时分秒是否相同

前3个函数的返回值是-1,0,1

前者 < 后者返回 -1

前者 = 后者返回 0

前者 > 后者返回 1

后3个函数的返回值是True,False

program Project1;
 
{
   $APPTYPE CONSOLE}
 
uses
  SysUtils,DateUtils;
 
var
  date1,date2:TDateTime;
  r1,r2,r3:Integer;
  b1,b2,b3:Boolean;
begin
   date1:= StrToDateTime(