求一断关于时间相减的代码，太菜了，请指教

Question

打个比方   
var s1,s2:tdatetime;
s1:=strtodatetime('2004-4-23 18:36:11');
s2:=strtodatetime('2004-4-25 9:12:35');
如何编写代码把计算出他们之间相差多少天，多少个小时，多少分钟等呢？
直接相加减肯定不行，早上试了一个早上，还是没有成功，很急，望指教。

Answer 1

uses DateUtils;DaysBetween ,HoursBetween,MinutesBetween

Answer 2

同意楼上，另外可以用SQL语句实现
select Datediff(mi,s1,s2) as Mini //mi:分钟差 hh:小时：dd：天
呵，到SQL上查询一下Datediff的用法吧

Answer 3

var
  y1,m1,d1,h1,mi1,s1,ms1,y2,m2,d2,h2,mi2,s2,ms2: word;
begin
  decodedatetime(s1,y1,m1,d1,h1,mi1,s1,ms1);
  decodedatetime(s2,y2,m2,d2,h2,mi2,s2,ms2);
end;
  y2-y1为他们的年度差，其他以此类推