+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف احسب الفرق بين تاريخين بالاشهر ؟ (/showthread.php?tid=8133)
كيف احسب الفرق بين تاريخين بالاشهر ؟ - bouazza8 - 10-09-2016
السلام عليكم
ممكن كود الفرق بين تاريخين بالاشهر هكدا
الفرق بين 23/01/2016 و 05/03/2013
يكون الناتج 3 اشهر
اي ان حتى لو كان يوم واحد من الشهر يحسب شهر كامل
RE: كيف احسب الفرق بين تاريخين بالاشهر ؟ - ramiparadox - 12-09-2016
uses dateutils; //
Edit2.Text:=floattostr(DaysBetween(DateTimePicker1.Date,DateTimePicker2.Date));
Edit3.Text:=floattostr(YearsBetween(DateTimePicker1.Date,DateTimePicker2.Date)) ;
dtcalc.zip (الحجم : 3.85 ك ب / التحميلات : 41)
date
RE: كيف احسب الفرق بين تاريخين بالاشهر ؟ - Mr.DOS - 13-09-2016
سلام عليكم
ولله احترت كيف اجيبك ؟ وضح اكثر
اولا ما تريد فعله غير عملي او بالاحري غير منطقي
كيف الفرق بين التاريخين اعلاه يساوي 3 اشهر
بغض النضر عن السنة بين 2016 و 2013 ..
RE: كيف احسب الفرق بين تاريخين بالاشهر ؟ - wadoud - 15-09-2016
السلام عليكم
الاخ يريد والله اعلم فقط اظهار الشهر , يعني حساب عدد الاشهر التي مضت بالرجوع الى الفرق بين تارخين.
اظن انه اخطأ في كتابة التاريخ وضع 2013 بدل 2016.
علينا صياغة السؤال جيدا حتى نسهل على المجيب و السؤال الجيد والمفصل هو نصف الجواب.
والله هو الموفق.
RE: كيف احسب الفرق بين تاريخين بالاشهر ؟ - لؤي - 16-09-2016
السلام عليكم
PHP كود :
var
d1,m1,y1: word;
d2,m2,y2: word; result:integer;
Myfirstdate,Myseconddate: TDateTime;
begin
Myfirstdate:=EncodeDate(2000,09,16);
Myseconddate:=Now;
decodedate(Myfirstdate,y1,m1,d1);
decodedate(Myseconddate,y2,m2,d2);
result:=(m2-m1)+(y2-y1)*12;
ShowMessage('diffmonth = '+IntToStr(result));
end;
RE: كيف احسب الفرق بين تاريخين بالاشهر ؟ - bouazza8 - 19-09-2016
(13-09-2016, 04:34 PM)Mr.DOS كتب : ولله احترت كيف اجيبك ؟ وضح اكثر
السلام عليكم
اسف اخي السنة نفسها أي 2016
المنح العائلية تحسب بالاشهر اي حتى لو عمل الشخص 6 ايام او قل او اكثر تحسب شهر
اي لو عمل [size=small] 23/01/2016 و 05/03/2016[/size]
[size=small]تحسب له 3 اشهر[/size]
(16-09-2016, 08:08 AM)لؤي كتب : السلام عليكمالسلام عليكم
اخي الفرق بين
01/08/2016 و 30/09/2016
المفروض 2 شهر ليس 1 شهر كما يظهر من الكود
RE: كيف احسب الفرق بين تاريخين بالاشهر ؟ - محمد عبد العزيز - 20-09-2016
السلام عليكم
يكفي التعديل
كود :
result:=1+(m2-m1)+(y2-y1)*12;