زيادة مدة باليوم لتاريخ معين

[alouma]

السلام عليكم
لدي مشروع يحوي المعلومات التالية:
- تاريخ التسليم المؤقت (تاريخ)
- مدة الضمان (بالأيام)
- تاريخ التسليم النهائي (تاريخ)

حيث تاريخ التسليم النهائي يكون بزيادة مدة الضمان لتاريخ التسليم المؤقت

فكيف يمكن أن أقوم باحتساب تاريخ التسليم النهاي انطلاقاً من تاريخ التسليم المؤقت وهذا بزيادة مدة الضمان
مع تغيير لون محتوى DBEdit عند انقضاء المدة
وشكراً

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

السلام عليكم

ليكن D متغير من نوع TDateTime لاضافة N يوم يكفي كتابة

كود :

D:= D + N ;

أو

كود :

Inc(D,N);