الموضوع السابق   الموضوع التالي 

مكونات التاريخ الهجري

Procedure: DecodeCorrespondingHijriDate

الغرض
الحصول على رقم اليوم و الشهر و السنة للتاريخ الهجري المقابل لتاريخ ميلادي معين.


الصيغة

procedure DecodeCorrespondingHijriDate(ADate: TDate; var AYear, AMonth, ADay: Word);


الوسائط (Parameters)

ADate أي تاريخ ميلادي مقبول
AYear بارامتر متغير (var) حيث سيحفظ رقم السنة.
AMonth بارامتر متغير (var) حيث سيحفظ رقم الشهر.
ADay بارامتر متغير (var) حيث سيحفظ رقم اليوم.

الشرح
تقوم هذه الدالة بتفكيك التاريخ الهجري المقابل للتاريخ الميلادي المحدد في البارامتر ADate، حيث يتم تخزين رقم اليوم و الشهر و السنة في البارامترات المتغيرة الثلاثة (ADay و AMonth و AYear على التوالي).


 أعلى الصفحة
 الموضوع السابق   الموضوع التالي