delphi4arab منتديات دلفي للعرب

إخوتي السلام عليكم و رحمة الله و بركاته
هل يمكن استخراج السنة و الشهر و اليوم نتيجة طرح تاريخين ، بحيث عندما تكون نتيجة الشهر 13 و نتيجة اليوم 35 و نتيجة السنة 0 مثلا ، فيرد النتيجة الأخيرة كما يلي : 1 سنة - 2 شهر - 5 أيام
و جزاكم الله خيرا .

السلام عليكم
اليك رابط موضوعين سيفيدانك ان شاء الله
http://delphi4arab.net/forum/showthread....7%D1%ED%CE
او
http://delphi4arab.net/forum/showthread....7%D1%ED%CE

ان لم تجد ما تبحث عنه استعمل ميزة البحث السريع لتحصل على
http://delphi4arab.net/forum/search.php?...0656&pp=25

الأخ bassem_43 جزاك الله خيرا على الرد و المعلومة
أما فيما يخص سؤالي فهو كيف نرجع 13 شهر مثلا و 35 يوم إلى 1سنة و 2 شهر و 05 ايام هذا هو المقصود و جزاكم الله خيرا

السلام عليكم أخي hamzabenz و جزاكم الله خيرا
لو تفصلتم بشرح هذا الإجراء :

PHP كود :
procedure daysToDate(days: Integer; out day, month, year: Integer);
var
  january1st: TDateTime;
  targetDate: TDateTime;
begin
  january1st := StartOfTheYear(Now());
  targetDate := IncDay(january1st, days);

  day := DayOfTheMonth(targetDate) - 1;
  month := MonthOfTheYear(targetDate) - 1;
  year := YearOf(targetDate) - YearOf(january1st);
end; 

السلام عليكم

لقد قمت بعمل برنامج صغير شرحت فيه العملية التي تريد ان تقوم بها أتمنى ان تصل لك الفكرة بشكل واضح

الشرح في الصورتين المرفقتين

بالتوفيق

أخي hamzabenz بارك الله فيك على هده الإجابة الكافية
و نسأل الله تبارك و تعالى أن يجعل هذا العمل في ميزان حسناتك يوم القيامة و السلام عليكم

عبد الله

bassem_43

عبد الله

عبد الله

hamzabenz

عبد الله