+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ماهي الطريقة التي يمكن من خلالها تحديد عدد ايام السنة 365 او 366 (/showthread.php?tid=6991)
ماهي الطريقة التي يمكن من خلالها تحديد عدد ايام السنة 365 او 366 - salmaanga - 12-05-2015
احتاج لمعرفة عدد ايام السنة حتى اتمكن من تحديد تاريخ نهاية عقد السائق دون خطأ
ماهي الطريقة التي يمكن من خلالها تحديد عدد ايام السنة 365 او 366 - S.FATEH - 12-05-2015
السلام عليكم باستخدام الوحدة DateUtils
PHP كود :
uses DateUtils;
ShowMessage('Days in 2000 = ' + IntToStr(DaysInAYear(2000)));
كما يمكنك معرفة ان كانت السنة كبيسة ام لا السنة الكبيسة عدد ايامها 366
PHP كود :
uses SysUtils;
if IsLeapYear(2000) then
ShowMessage('2000 was a leap year')
else
ShowMessage('2000 was not a leap year');