+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ (/showthread.php?tid=4633)
ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - M_Mori2010 - 12-10-2012
السلام عليكم ورحمة الله وبركاته ...
ماهي طريقة أخذ التاريخ من Edit1 ووضعه في Edit2 واضافة 365 يوم له حيث ان Edit1 هي عبارة عن تاريخ اليوم ...؟
شكراً لكم
ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - Lam.Abdeldjalil - 12-10-2012
و عليكم السلام و رحمة الله وبركاته
كود :
Edit1.Text:=DateToStr(StrToDate(Edit1.Text)+365);ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - محمد عبد العزيز - 13-10-2012
السلام عليكم ورحمة الله
إقتباس :اضافة سنة لهُ...واضافة 365 يوم لهانتبه السنة ليست 365 يوم
اكتب مثلا التاريخ 01/01/2012 النتيجة 31/12/2012
استخدم IncYear من الوحدة DateUtils
كود :
Edit1.Text:=DateToStr(IncYear(StrToDate(Edit1.Text)));ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - M_Mori2010 - 13-10-2012
صحيح اخي جزاك الله كل خير
ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - عبد الهادي - 10-04-2013
نشكركم على هذه المعلومة
كيف يمكن اجراء الفرق بين تاريخين ؟
ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - m.rabee - 14-04-2013
السلام عليكم
إذا كنت تقصد المقارنة بين تاريخين
كود :
CompareDate(dtp1.Date,IncDay(dtp1.Date,2);سوف تكون النتيجة (-1)
لان القيمة الثانية أكير من القيمة الاولى لو قمت بعكس القيم
سوف تحصل على النتيجة (1)
لو كانت القيم متساوية سوف تحصل على النتيجة (0)
ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - عبد الهادي - 15-04-2013
جزاك الله خيرا اخي الاستاذ الكريم m.rabee
لكن لو اردت معرفة الايام بين تاريخين اثنين مثلا في برنامج مؤقت كيف يكون البرنامج
وفقك الله
ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - m.rabee - 16-04-2013
السلام عليكم
يمكنك استخدام
كود :
DaysBetweenكود :
Edt1.Text := inttostr(DaysBetween(dtp1.Date,dtp2.Date));ماهي طريقة أخذ التاريخ من Edit واضافة سنة لهُ - عبد الهادي - 16-04-2013
جزاك الله خيرا استاذنا الكريم و جعل مبذولكم محصولكم يوم توفيتكم ثوابكم