بدست آوردن تفاوت تاریخ میلادی

[hex161]

با سلام خدمت اساتید.
من میخواستم کامپوننت یا دستوری به من معرفی کنید که بتونم تفاوت تاریخ میلادی را بدست بیارم.
مثلا تعداد روزهای بین تاریخ 2009/4/30 تا 2010/4/14 رو پیدا کنم.
خیلی جستجو کردم ولی فقط در مورد تاریخ های شمسی اطلاعات بود.
اما من بدنبال تاریخ میلادی میگردم.
با تشکر

[Felony]

در مورد تاریخ میلادی نیازی به کامپوننت نیست ، کتابخانه DateUtils خود دلفی توابعی برای کار با تاریخ های میلادی ارائه میکنه ، در مورد سوال شما :


var
aDate1, aDate2: TDate;
aResult: Integer;
begin
aDate1:= StrToDate('4/30/2010');
aDate2:= StrToDate('4/14/2009');
aResult:= DaysBetween(aDate1, aDate2);
ShowMessage(IntToStr(aResult));
end;