منتدى فرجيوة للتكنولوجية الرقمية

منتدى فرجيوة للتكنولوجية الرقمية

للتكنولوجية الرقمية
 
الرئيسيةاليوميةمكتبة الصورس .و .جبحـثالأعضاءالمجموعاتالتسجيلدخول
التوقيت
المواضيع الأخيرة
ازرار التصفُّح
 البوابة
 الرئيسية
 قائمة الاعضاء
 البيانات الشخصية
 س .و .ج
 بحـث
التبادل الاعلاني
أفضل 10 أعضاء في هذا الأسبوع
بحـث
 
 

نتائج البحث
 
Rechercher بحث متقدم

شاطر | 
 

 حساب الفرق بين تاريخين بدون أى إضافات

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل 
كاتب الموضوعرسالة
سفيرالسلام
المديرالعام
avatar

الجنس : ذكر
عدد المساهمات : 187
نقاط : 523
تاريخ الميلاد : 12/10/1980
تاريخ التسجيل : 26/01/2011
العمر : 37

مُساهمةموضوع: حساب الفرق بين تاريخين بدون أى إضافات   السبت نوفمبر 01, 2014 2:40 am

اليوم سنحسب الفرق بين تاريخ الميلاد و التاريخ الحالى
بدون إضافات
بدون أكواد لوا
بدون api
فقط الأوتوبلاى + كوب من الشاى + قليل من صفاء الذهن
الرمز:

day = System.GetDate(DATE_FMT_DAY);
month = System.GetDate(DATE_FMT_MONTH);
year = System.GetDate(DATE_FMT_YEAR);

Input.SetText("day", day);
Input.SetText("month", month);
Input.SetText("year", year);

day2 = Input.GetText("day2");
month2 = Input.GetText("month2");
year2 = Input.GetText("year2");

day2 = String.ToNumber(day2);
day = String.ToNumber(day);

month2 = String.ToNumber(month2);
month = String.ToNumber(month);

year2 = String.ToNumber(year2);
year = String.ToNumber(year);


if day2 <=  day then
day3 = day-day2
else
day3 = (day+30)-day2
month = month-1
end
Input.SetText("day3", day3);

if month2 <=  month then
month3 = month-month2
else
month3 = (month+12)-month2
year = year-1
end
Input.SetText("month3", month3);

if year2 <=  year then
year3 = year-year2
Input.SetText("year3", year3);
else
result = Dialog.Message("Notice", "Are you born in future ???", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end
يمكن حذف أول ستة أسطر من الكود الخاص بالزر
حيث أنه مكرر فى كود الصفحة on show
و تعمدت التكرار لتسهيل متابعة الكود خلال الموضوع
معذرة لعدم إختصار الكود لتسهيل التتبع

يمكننا الآن الإستغناء عن الإضافة DateDiff إلى الأبد
الملف المفتوح مرفق

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://ferdjioua-9.mam9.com
 
حساب الفرق بين تاريخين بدون أى إضافات
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتدى فرجيوة للتكنولوجية الرقمية :: منتدى برامج الكمبيوتر :: منتدى الشروحات و الدروس-
انتقل الى: