本文整理自网络,侵删。
uses DateUtils;
vart1,t2:TDateTime;begint1:=StrToDate(Edit1.Text);t2:=StrToDate(Edit2.Text);
Caption:='两日bai期相du差'+IntToStr(DaysBetween(t1,t2))+'天dao';
相关阅读 >>
关于公历与农历换算和时间处理的单元 calendar.pas
更多相关阅读请进入《Delphi》频道 >>
本文整理自网络,侵删。
uses DateUtils;
vart1,t2:TDateTime;begint1:=StrToDate(Edit1.Text);t2:=StrToDate(Edit2.Text);
Caption:='两日bai期相du差'+IntToStr(DaysBetween(t1,t2))+'天dao';
相关阅读 >>
关于公历与农历换算和时间处理的单元 calendar.pas
更多相关阅读请进入《Delphi》频道 >>
管理员已关闭评论功能...