كيف حساب المدة التي تكون بين تاريخين

[اسلام]

السلام عليكم و رحمة الله و بركاته
كيف حساب المدة التي تكون بين تاريخين مثلا:من 12/11/2011 إلى 10/10/ 2012 و يظهر النتيجة كما يلي
...سنوات و...شهر و ...يوم
ثم يقوم إذا احتجت لذلك بقسمة النتيجة على إثنان و يظهر النتيجة بالسنوات و الشهر و اليوم .
شكرا مسبقا

[hmidadz]

في هدا الكود يعطيك عدد الايام و يمكنك عمال الطرح على النتيجة
بالتوفيق

كود :

uses DateUtils; var Date1, Date2 : TDateTime; Diff : Extended; Day1, Month1, year1 : Word; day2, Month2, year2 : Word; begin Date1 := EncodeDate(Year1, Month1, Day1); Date2 := EncodeDate(year2, Month2, Day2); Diff := DaysBetween(Date2, Date1); end;

[محمد عبد العزيز]

إستخراج الفرق بين تاريخين
http://www.delphi4arab.net/forum/showthr...p?tid=2806
التعامل مع التواريخ (الدالة التي يغفل عنها الكثير)
http://www.delphi4arab.net/forum/showthr...p?tid=2810
كيف استخرج فارق التوقيت بين وقتي في دلفي
http://www.delphi4arab.net/forum/showthr...p?tid=7981

مكرر، يغلق