正在检查两个TDateTime变量

Checking two TDateTime variables

本文关键字:两个 TDateTime 变量 检查      更新时间:2023-10-16

我正在使用C++Builder,并有以下问题:

我想检测一个日期/时间是否比另一个日期或时间晚,以及晚了多少。

这是我当前的代码:

TDateTime testFirstDate("11/09/2012");
TDateTime testFirstTime("14:00");
TDateTime testSecondDate("12/09/2012");
TDateTime testSecondTime("16:00");
TDateTime testCombined1 = testFirstDate + testFirstTime;
TDateTime testCombined2 = testSecondDate + testSecondTime;
TDateTime testDateDifference = testSecondDate - testFirstDate;
std::cout << testDateDifference;

在上面的例子中,打印出以下内容:31/12/1899

两个值之间的差值仅为1天。为什么:1899年12月31日正在印刷,而不是类似于:1?

差异为1天22小时。

Delphi和C++Builder中的TDateTime是一个双精度,其中整个部分(小数点左边的部分)存储自1899年12月30日(见下面的注释)以来的天数,小数部分(小数点右边的部分)是时间。

你在减法后看到的1899年是因为你还有不到一整天的时间,因此数字的整个部分都是零,正如我提到的,零日期是1899年12月的基准日期。由于您的日期比基准日期晚1天(当表示为TDateTime时,该日期被解释为1899年12月31日。

22小时的时间部分大约是0.9167(实际上是0.916666666666667),表示一天中的22/24。

Delphi的运行库包含一个名为DateUtils的单元,IIRC也可用于C++Builder(它有一个头文件),其中包含可能对您有所帮助的函数,如DaysBetween,您可能会发现它很有用。这里有C++的使用示例。

至于相等(一个日期在另一个日期之后),可以使用标准的><>=<=!===运算符。我在下面也演示了这一点。

这里有一个快速的例子(在Delphi中,因为我没有在这台机器上安装C++Builder)可以解释:

program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses
  System.SysUtils, DateUtils;
var
  StartDate, EndDate, Diff: TDateTime;
begin
  try
    { TODO -oUser -cConsole Main : Insert code here }
    // Base date, formatted in US date format
    WriteLn('BaseDate: ', FormatDateTime('mm/dd/yyyy hh:nn:ss', 0));
    StartDate := EncodeDateTime(2012, 9, 11, 14, 0, 0, 0);
    EndDate := EncodeDateTime(2012, 9, 12, 16, 0, 0, 0);
    Diff := EndDate - StartDate;
    WriteLn('Diff as String: ', DateToStr(Diff));
    WriteLn('Diff as Double: ', Diff);
    WriteLn('DaysBetween: ', DaysBetween(EndDate, StartDate));
    // Equality
    WriteLn('EndDate after StartDate`, EndDate > StartDate);
    RegEx.Free;
    ReadLn;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.

这会产生以下输出:

BaseDate: 12/30/1899 00:00:00
Diff as String: 12/31/1899
Diff as Double:  1.08333333332848E+0000
DaysBetween: 1
EndDate after StartDate: TRUE

注:基准日期是由Microsoft为COM建立的,出于兼容性原因,Delphi/C++Builder采用了它。

您可以将普通的-+<>===TDateTime一起使用。

因此,为了查看一个日期是否领先于另一个日期,例如,你可以减去它们,看看结果是大于还是小于零。