如何比较dd/mm/yyyy格式的两个日期？

Question

我有两个文件，想比较你的编译日期以便将来更新。

假设新文件的日期：20/09/2019，旧文件的日期：19/09/2019。如何比较这两个相同格式的日期 (dd/mm/yyyy)？

var
 UpDate, OldDate: string;
begin
  UpDate := '20/09/2019';
  OldDate := DateToStr(FileDateToDateTime(FileAge(IncludeTrailingBackslash(ExtractFilePath(Application.ExeName)) + 'test.exe'))) // 19/09/2019

  if UpDate > OldDate then
  begin
    // Do something
  end;
end;

Answer 1

您可以通过调用 DateUtils.CompareDate().

直接处理 TDateTime 值，而不是操作字符串

var  OldDate, UpDate : TDateTime;
begin
  OldDate := EncodeDate(2019, 9, 20);
  UpDate := FileDateToDateTime(FileAge(IncludeTrailingBackslash(ExtractFilePath(Application.ExeName)) + 'test.exe'));
  if CompareDate(OldDate, UpDate) = LessThanValue  Then
  begin
    // Do something
  end;
end;

如何比较dd/mm/yyyy格式的两个日期？

How to compare two dates of dd/mm/yyyy format?

delphi

date

delphi-10.3-rio