delphi4arab منتديات دلفي للعرب
كيف حساب المدة بين تاريخين ، عدد الأيام أو عدد الشهور أوعدد السنوات - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف حساب المدة بين تاريخين ، عدد الأيام أو عدد الشهور أوعدد السنوات (/showthread.php?tid=3683)



كيف حساب المدة بين تاريخين ، عدد الأيام أو عدد الشهور أوعدد السنوات - MOUMEN78 - 10-12-2011

كيف حساب المدة بين تاريخين
أي عدد الأيام أو عدد الشهور أوعدد السنوات
مثالا حساب عمر شخص ما
مع تحياتي


كيف حساب المدة بين تاريخين ، عدد الأيام أو عدد الشهور أوعدد السنوات - abdelali91 - 10-12-2011

تفضل اخي
كود :
function RemainingDays(from, _to: Tdate) : integer; begin Result := Trunc(_to - from); if Result < 0 then Result := 0; end;

للإستخراج
كود :
Label1.Caption:=IntToStr(RemainingDays(DateTimePicker1.Date, DateTimePicker2.Date));

مع العلم اني لست من وضع هذا الكود (للأمانة).... وجدته في المنتدى
http://www.delphi4arab.net/forum/showthread.php?tid=1828