请问在delphi中如何实现VB中datediff函数强大功能??????????(请高手解答)

Question

diffdate实现的功能如下:n表示要比较分钟DateDiff("n", "12:00", "13:30")结果返回 90(分钟)。 12:00和 13:30 相差90分钟------------------------------------------------------------d表示要比较天数DateDiff("d", "2003-4-1", "2003-5-3")结果返回 32(天) 。2003-4-1 和 2003-5-3 相差32天---------------------------------------------------------------yyyy表示要比较年DateDiff("yyyy", "2002-4-2 ", "2003-4-5")结果返回 1(年) 。  2002-4-2 和 2003-4-5 相差1年--------------------------------------------------------------------------
请问在delphi中如何这些功能实现？？？？？  请给出详细代码！！感激万分！！！

Answer 1

D6中的DateUtils有许多这方面的函数。
uses DateUtils;DaysBetween(date1, date2)    // 两个日期相差。
IncDay(date1, 3)             // 日期加三日等。自已进去看一看源代码， 还有很多有用的日期操作函数!

Answer 2

Uses 
  DateUtils;
然后把光标定在上面， 按Ctrl+Enter或用Ctrl+鼠标点击