如何计算日期(80分)

Y

yc-zhj

Unregistered / Unconfirmed
GUEST, unregistred user!
我有一个收房租的问题,收钱的时间间隔有:一个月,一个季度,半年,一年,现在我有
一个问题想问各位大虾,比如:用户上次交钱是:2002/12/04 ,那半年后是几几年,几月几号
了?各位大虾有什么好的方法,希望告之,不胜感激
 
select DATEADD(mm,6,'2002/12/04')
 
用DateTimePicker1
begin
DateTimePicker1.DateTime:=DateTimePicker1.DateTime+120;
end;
此时DateTimePicker1显示的是120天后的日期
 
放两个时间控件,一个作为现在交的日期,将它放入到数据据中,下次打开时为上次交费时间!
另一个时间控件你自己去选择,想要哪天都可以,然后选择某天后将两个日期相减得到的天数
,用天数再去计算该收多少Money!!!!!!!!
代码你自己写吧…………
 
根据日期条件,[:)][:)]可以借助数据库的函数
 
太简单了
如果 d 是一个日期变量 d:=StrToDate('2002/12/04')
那么 d+182 就是半年(182天后的日期
不信用 showmessage(datetostr(d+182)) 试一下
 
IncMonth 在SysUtils
其它诸多时间工具在DateUtils
 
Sql 完全可以用 dateAdd
 
date+n
date:某日期
n:天数
返回值:n天后的日期
 
天呀!这也叫问题?
一个月,一个季度,半年,一年全部换算成几个月
Delphi里面有一个函数 IncMonth(const Date:TDateTime;NumberOfMonths:Integer):TDateTime
var
date1:TDate;
begin
date1=IncMonth(StrToDateTime('2002-11-11'),6);
ShowMessage(DateTimeToStr(date1));//date1为半年(6个月)后的日期!2002-11-11为日期
end;
 
顶部