Разница дат

[Ver0nica]

у меня есть поле в базе данных access (дата установки)в формате число.месяц.год мне нужно отнять из сегодняшней даты,дату установки и результате получить количество лет,т.е. допустим сегодня 30.05.2009-12.04.2000=9 как это реализовать в delphi?заранее спасибо.

[Evgeniy26]

var 
  CountDay: Double;
  _Date: TDate;
begin
  _Date := Date;
  CountDay := _Date - StrToDate('29.05.2009');