ما هي طريقة حساب الفرق بين تاريخين بحيت عدد أيام الاشهر 30

[format82]

اخي الكريم هل جربت الكود السابق ؟
هذا الكود يقوم بما تريده

كود :

Edit3.Text := IntToStr(DaysBetween(StrToDate(Edit1.Text), StrToDate(Edit2.Text)));