日期:2014-05-17  浏览次数:20895 次

日期相减如何计算??请看
'2007-9-7 '- '2007-9-1 ':是6天
'2007-8-7 '- '2007-9-1 ':是1个月6天
'2006-8-7 '- '2007-9-1 ':是1年1个月6天
'2007-8-20 '- '2007-9-1 ':是18天

------解决方案--------------------
用日期直接相减就可以了
例:
procedure TForm1.Button1Click(Sender: TObject);
var
date1, date2: TDate;
begin
date1 := strtodate( '2003-5-20 ');
date2 := strtodate( '2003-5-21 ');
Caption := floattostr(date2 - date1);
end;
------解决方案--------------------
//昨天
select sysdate - 1 from dual ;
//明天
select sysdate + 1 from dual ;
------解决方案--------------------
可以看一下CowNewSQL,它是一个成熟的跨数据库SQL翻译器。
http://www.cownew.com/download/