[بورمله]

السلام عليكم ورحمة الله وبركاته



هذا مثال عن زيادة عدد من الايام لتاريخ معيين
وهو يغنيك عن الدالة

كود PHP:

nbjour:=3*365-(StrToInt(Edit7.Text )*365- StrToInt(Edit6.Text )*30);
Date1 :=EncodeDate(y,m,d);
Date1 := Date1 + NbJour;
decodedate(date1,aa,mm,jj);
date2:=encodedate(aa,mm,jj);
edit11.Text:=datetostr(date2);