Delphi 比较两个日期相差天数

本文整理自网络，侵删。

 
uses DateUtils;

var
t1,t2:TDateTime;
begin
t1:=StrToDate(Edit1.Text);
t2:=StrToDate(Edit2.Text);

Caption:='两日bai期相du差'+IntToStr(DaysBetween(t1,t2))+'天dao';
 

相关阅读 >>

Delphi serial number of an usb flash drive 获取u盘硬件序列号

Delphi 获取指定年月的周、日数 -weeksinayear、weeksinyear、daysinayear、daysinamonth、daysinyear、daysinmonth

Delphi 枚举类型和integer整型之间的互换

Delphi 优盘背景生成器源码

Delphi 使用 {$include} 或 {$i} 指令管理和调用自定义函数

Delphi 完全自定义窗体风格的实现

Delphi获取pid的父进程文件名

Delphi 将字符串转换成 utf8 编码的函数

Delphi concat 字符串函数

Delphi 把窗体上的所有edit清空怎么做

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 比较两个日期相差天数