delphi里两个日期如何做比较？

Question

delphi里两个日期如何做比较？

Answer 1

使用DateUtils单元里的CompareDateTime函数

Answer 2

function CompareDateTime(const A, B: TDateTime): TValueRelationship;
function SameDateTime(const A, B: TDateTime): Boolean;
function CompareDate(const A, B: TDateTime): TValueRelationship;
function SameDate(const A, B: TDateTime): Boolean;
function CompareTime(const A, B: TDateTime): TValueRelationship;
function SameTime(const A, B: TDateTime): Boolean;

Answer 3

delphi 一般用TDateTime来存储日期,实际上也是一个Double类型的值,整数部分表示日期,小数部分表示时间.
所以两个日期直接相减即可判断大小.