لون الخط في صندوق الرسائل MsgBox

[أبو آدم]

سؤال : هل يمكن تغيير لون الخط في صندوق الرسائل بحيث أختار اللون الذي اريده ؟

الجواب : نعم من الممكن تغيير لون النص في صندوق الرسائل الخاص بك ، وذلك باستخدام لون النظام API's  ، فأولا و آخرا فان صندوق الرسائل ما هو الا نافذة، يمكنك تغيير معلمات اللون فيه .

و لكن كما اسلفت فهو خاص بك ، فلا بد من التأكد من إعادة تعيين القيم الأصلية مباشرة بعد التطبيق وإلا سيتم عرض كل الرسائل من الويندوز حسب الألوان المعدلة.

الكود المرفق سوف يتعرف تلقائيا على أنظمة 32 بت و 64 بت و يتعامل معها على حد سواء.

NA_MsgBox Color.accdb

[kaser906]

ما شاء الله

اليوم استاذنا يثيرينا بأبداعات

شكرا لك

 

[أبو آدم]

حياك الله

بركة الوقت وطلب العلم نعمة عظيمة من الله

شكرا

[النجاشي]

2 ساعات مضت, أبو آدم said:

سؤال : هل يمكن تغيير لون الخط في صندوق الرسائل بحيث أختار اللون الذي اريده ؟

الجواب : نعم من الممكن تغيير لون النص في صندوق الرسائل الخاص بك ، وذلك باستخدام لون النظام API's  ، فأولا و آخرا فان صندوق الرسائل ما هو الا نافذة، يمكنك تغيير معلمات اللون فيه .

و لكن كما اسلفت فهو خاص بك ، فلا بد من التأكد من إعادة تعيين القيم الأصلية مباشرة بعد التطبيق وإلا سيتم عرض كل الرسائل من الويندوز حسب الألوان المعدلة.

الكود المرفق سوف يتعرف تلقائيا على أنظمة 32 بت و 64 بت و يتعامل معها على حد سواء.

NA_MsgBox Color.accdb

جزاك الله كل خير استاذنا القدير ابو ادام روعه الله يبارك فيك 

ياليت تعطينا فكره عن تلوين خلفيه الرسايل بدل ما تكون ابيض  ودنا بلون اخر 

تحياتي اليك

[ابو الآء]

بارك الله فيك معلمنا الجليل

تسلم الايادى يا رب

[sandanet]

من ابداع الى آخر ماشاء الله عليك .. استمر على بركة الله

[ابو فتحى]

 

•  

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

رائع اخى ابو ادم .. بارك الله فيك على هذا الابداع

ممكن نسخة 2003

 

[طاهر الوليدي]

ماشاء الله تسلم افكارك وابدعاتك الله يعطيك العافية

[عبدالله المجرب]

تسلم يدك استاذ ابو ادم 

يكفينا طلتك البهية

نورت المنتدى

ادم الله عليك الصحة والعافية

[أبو آدم]

اقتباس

13 ساعات مضت, عبدالله المجرب said:

سلم يدك استاذ ابو ادم 

يكفينا طلتك البهية

نورت المنتدى

ادم الله عليك الصحة والعافية

حياك الله

اشتقنا لاطلالتكم ايضا

 

[طاهر الوليدي]

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

[أبو آدم]

ارسل مرفق للتطبيق

شكرا

[طاهر الوليدي]

If MsgBox("هل تريد حذف السجل", vbYesNo + vbCritical + vbMsgBoxRight + vbDefaultButton2, "تحذير") = vbNo Then
 Exit Sub
 Else
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdDeleteRecord
Refresh
DoCmd.SetWarnings True
End If

تم تعديل فبراير 15, 2018 بواسطه طاهر الوليدي

[شامل2]

السلام عليكم

شكرا للمعلومة القيمة استاذ