المساعد الشخصي الرقمي

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


وليد شوكلاته
01-01-2020, 07:36 AM
السلام عليكم ورحمة الله وبركاته
:abc_138: اليوم حضرتلكم ملف مفتوح للتاريخ الهجرى مصمم باحترافية ويمكنكم تطويره :abc_138:
:abc_052:هذه صور الملف اولا:abc_052:
https://2.top4top.net/p_1461nwmbi1.jpg
:abc_050:وهذه صورة ديالوج للاعدادات لان التاريخ الهجرى ليس ثابت:abc_050:
https://5.top4top.net/p_14618grxr1.jpg
:abc_052::abc_052::abc_052:
اعتقد انه لم يطرح من قبل ملفات مفتوحة للتاريخ الهجرى ويمكنكم ايضا اظهار
التاريخين معا الهجرى والميلادى وباللغة العربية لكلاهما تصفحوا الملف 70%
من الاكواد فى Global Function والباقى فى الازرار والصفحة والديالوج
الملف يحتفظ بالاعدادات التى تختارها حتى لو قفلت الجهاز وكلنا نعرف ان الشهور
الهجرية تختلف من بلد لاخر كما نرى فى اعدادات البرنامج لذلك لو التاريخ
مش مظبوط فى شهر من الاشهر بتقدر تظبطه من اعدادات البرنامج كما فى
الصورة التى بالاعلى لاأطيل عليكم اترككم مع التحميل من الرابط التالى

https://up.top4top.net/downloadf-1461zp2g71-zip.html

:abc_138:تمنياتى للجميع بالتوفيق:abc_138:

عبد الهادي بهاب
01-01-2020, 11:00 AM
السلام عليكم ورحمة الله وبركاته
انزال جميل جدا ........... يعجبني التعامل مع الملفات المفتوحة
و هو ايضا نشر للعلم .......و هوجهد لا يحسنه الكثير
و كنت و مازال اقول ... تعملنا هنا و علمونا بدون مقابل ... ونحن على خطاهم
و هو شكر بالعمل فضلا عن لقول
و قليل من عبادي الشكور

عبد الهادي بهاب
01-01-2020, 11:19 AM
للاستئناس

http://www.abc4web.net/vb/showthread.php?t=28649

http://www.abc4web.net/vb/showthread.php?t=24614

http://www.abc4web.net/vb/showthread.php?t=33160

http://www.abc4web.net/vb/showthread.php?t=38217

http://www.abc4web.net/vb/showthread.php?t=28683

عبد الهادي بهاب
01-01-2020, 11:25 AM
لماذا يتغير يوم الاربعاء ؟؟

وليد شوكلاته
01-01-2020, 11:41 AM
السلام عليكم ورحمة الله وبركاته
انزال جميل جدا ........... يعجبني التعامل مع الملفات المفتوحة
و هو ايضا نشر للعلم .......و هوجهد لا يحسنه الكثير
و كنت و مازال اقول ... تعملنا هنا و علمونا بدون مقابل ... ونحن على خطاهم
و هو شكر بالعمل فضلا عن لقول
و قليل من عبادي الشكور

وعليكم السلام ورحمة الله وبركاته


مرورك الأروع اخى igli ليس يوم الاربعاء هو مايتغير ولكن لو نظرت
على التاريخ الهجرى فى الويندوز ستجد combobox اسفل التاريخ
وبه نفس النتائج مثل الانبوت الذى فى برنامجنا انظر هذه الصورة
https://5.top4top.net/p_1461asu951.jpg

هذا لان الشهور الهجرية لاتتوافق فى كل الدول ممكن فى الجزائر اليوم 5
وممكن فى مصر اليوم 6 وفى السعودية اليوم 4 وهكذا فلذلك عملت البرنامج
ليكون التحكم للمستخدم ان لم يكن التاريخ مضبوط تقبل خالص تحياتى

سامى الغزالى
01-01-2020, 11:41 AM
شكرا و بارك الله فيك

وليد شوكلاته
01-01-2020, 11:52 AM
شكرا و بارك الله فيك

وفيك بارك الله
نورت الموضوع اخى الحبيب

عبد الهادي بهاب
01-01-2020, 12:54 PM
وعليكم السلام ورحمة الله وبركاته




جميل جدا ............ الحمد لله
ممكن اختصار لكل الاكواد الموجودة في الملف
---------------
نمسحها كلها و نضع بدلا منها كود في on show

Hijer = {"ãÍÑã" ,"ÕÝÑ" ,"ÑÈíÚ ÇáÃæá" ,"ÑÈíÚ ÇáËÇäì" ,"ÌãÇÏì ÇáÃæá" ,"ÌãÇÏì ÇáËÇäì" ,"ÑÌÈ" ,"ÔÚÈÇä" ,"ÑãÖÇä" ,"ÔæÇá" ,"Ðæ ÇáÞÚÏÉ" ,"Ðì ÇáÍÌÉ"};

os.setlocale("Arabic")
s = os.date("%x");
d= String.Mid(s,1,2);
mo= String.Mid(s,4,2);
m = Hijer[String.ToNumber(mo)];
y= String.Mid(s,7,4);
Paragraph.SetText("Paragraph1", os.date("%A").." ".. d.." "..m.." "..y);


الملف المفتوح
https://up.top4top.net/downloadf-14614z2jb1-rar.html

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

وليد شوكلاته
01-01-2020, 01:50 PM
جميل جدا ............ الحمد لله
ممكن اختصار لكل الاكواد الموجودة في الملف
---------------
نمسحها كلها و نضع بدلا منها كود في on show

hijer = {"ãÍÑã" ,"ÕÝÑ" ,"ÑÈíÚ ÇáÃæá" ,"ÑÈíÚ ÇáËÇäì" ,"ÌãÇÏì ÇáÃæá" ,"ÌãÇÏì ÇáËÇäì" ,"ÑÌÈ" ,"ÔÚÈÇä" ,"ÑãÖÇä" ,"ÔæÇá" ,"Ðæ ÇáÞÚÏÉ" ,"Ðì ÇáÍÌÉ"};

os.setlocale("arabic")
s = os.date("%x");
d= string.mid(s,1,2);
mo= string.mid(s,4,2);
m = hijer[string.tonumber(mo)];
y= string.mid(s,7,4);
paragraph.settext("paragraph1", os.date("%a").." ".. D.." "..m.." "..y);


الملف المفتوح
https://up.top4top.net/downloadf-14614z2jb1-rar.html

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

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

عبد الهادي بهاب
01-01-2020, 02:55 PM
السلام عليكم ورحمة الله وبركاته

هذا ما حدث معنا .......و لما وضع الكود الاستاذ ثامر مختصرابسطر واحد قررت ان اعتزل الاوتوبلاي و ابيع المكسرات ....و الحمد لله

وليد شوكلاته
01-01-2020, 03:12 PM
السلام عليكم ورحمة الله وبركاته

هذا ما حدث معنا .......و لما وضع الكود الاستاذ ثامر مختصرابسطر واحد قررت ان اعتزل الاوتوبلاي و ابيع المكسرات ....و الحمد لله

ههههههههههههههههههه لا انت كلمتك الشهيرة هبيع كاكاو مش مكسرات

عبد الهادي بهاب
01-01-2020, 05:05 PM
ههههههههههههههههههه لا انت كلمتك الشهيرة هبيع كاكاو مش مكسرات

كنت اريد استعملها ثم فكرت في انها غير مستعملة .لكنك متابع جدا جدا هههههههه
:abc_022::abc_022:

باكلي
11-01-2020, 12:48 AM
شكرا و بارك الله فيك :abc_051: