إخوتي
يحزنني ما يقوم به المستخدم من عدم الخروج من البرنامج من زر حروج لأنه يقوم بوظائف كثيرة عندي في البرنامج منها مثلا إعادة دقة الشاشة إلى ماكانت عليه وتشغيل ملف صوتي والخروج بالضغط على (x) الموجودة في نافذة الأكسس
والسؤال هو هل نستطيع وضع هذه الأكواد عند الخروج من البرنامج سواء بالضغط على زر خروج أو بالضغط على( إكس) كما هو موضح بالصورة ؟
أرجو الإفادة
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
في حدث ور الأمر ضع الأمر التالي:
DoCmd.Quit
أخي الكريم
يبدو أنك لم تطلع على الأكواد المكتوبة في زر الأمر خروج الموجود في النموذج ولم يصل إليك مطلبي بعد
على العموم في زر خروج كود لظهور رسالة تأكيد الخروج وتسأل المستخدم هل تريد الخروج وبها زر ok & cancel فلو ضغط على أوك سينفذ الأمر quit وإلا فلا
والمطلوب تنفيذ كل ما سبق (كود زر الأمر خروج) إذا ضغط المستخدم على (x) الموجودة في أعلى نافذة الأكسس والمشار إليها في الصورة
هل نستطيع عمل ذلك؟ ........... وإذا كان لا يمكن فكيف أقوم بعدم تنشيط علامة إكس أو إغلاق من نافذة أكسس ؟فلا يكون لها تأثير حتى يضطر المستخدم للخروج من خلال الزر خروج
أين عباقرة الأكسس؟
تم تعديل هذه المشاركة بواسطة mas123 في 8 سبتمبر 2007 في 23:52
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
السلام عليكم
إليك طلبك ولكن من بعد نسخ ال Module بالطبع لن تترك الزر متروك ليضغط عليه المستخدم
بل إنسخ هذا الكود وضعه في حدث on load form في أول نموذج يظهر عند فتح البرنامج
HideAccessCloseButton
وأتمنى أن أكون قدمت الإفادة
وشكراُ
تم تعديل هذه المشاركة بواسطة osman terek في 9 سبتمبر 2007 في 01:03
نعم أخي الكريم يمكن ذلك من خلال الكود التالي
Private Sub Form_Close() أكتب هنا ما تريد فعله End Sub
تحياتي
تم تعديل هذه المشاركة بواسطة الفارس القديم في 9 سبتمبر 2007 في 01:45
اخي mas123
لم أقراء المشاركة بشكل جيد معذرة
اقتباسوأتمنى أن أكون قدمت الإفادة
أي فائدة قدمت أخي osman terek
لا والله إلا مثال في قمة الروعة ولم يمر علي من قبل
الله يعطيك الصحة
مواضيع ذات صلة
عدم تفعيل زر اغلاق قاعدة البيانات
التحكم في عدم تفعيل او اظهار واخفاء زر اغلاق قاعدة البيانات
بارك الله فيك أخي osman tarek
ولكن
* عمل هذا الكود على إخفاء الثلاثة أزرار الموجودة أعلى نافذة الأكسس وأنا أريد إخفاء الإغلاق فقط
* وضع الكود في حث عند الفتح يجعلنا لا نحتاج للزر الموجود بالنموذج
((((((((للأسف ياجماعة لاحظت في لهجة بعض الإخوة بعد تعليقي على بعض الردود لهم بطريقة .....ولكن...... أنهم يغضبون مني ويفهموني خطأ على أني أنتقص من عملهم **** لا والله بل هذا دليل على شدة إعجابي بهذه الأعمال وزيادة مني في أن يكون المثال كاملا بإذن الله*****فاللهم وفق الجميع إلى ما فيه خيري الدنيا والآخرة ....وإلى عدم إساءة فهم مقصدي إن كنت لا أحسن التعبير.)))))))
ظهر رد الأخت زهرة أثناء تعديلي للرد
مرحبا بالأخت زهرة منذ فترة لم أقرأ مشاركات لك .... أرجو أن يكون الحال كما هو مرام والحمد لله
شكرا على توجيهك لصفحات رائعة وأمثلة أروع
ولكن ألا نستطيع عمل المطلوب الأول ؟
على حد علمي ... ليس هناك مستحيل في البرمجة بإذن الله وخاصة على زهرة
وأتذكر تعليقا لك أعجبني ( ما أبقاش زهرة إن ما جبت خبرها)
مثال على تحدي النفس والخروج بأقصى الطاقات الممكنة ... هكذا أفعل
شكرا لك
تم تعديل هذه المشاركة بواسطة mas123 في 9 سبتمبر 2007 في 09:46
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
تفضل اخي الكريم محمد
ملفك بعد التعديل
يوجد طريقتين لعدم تفعيل رز اغلاق قاعدة البيانات X اما بواسطة الماكرو او من خلال عند حدث التحميل
الحمدلله اخي قد وصلت إلى ما تريد
أما بالنسبة للزر الذي في النموذج بالطبع لا نحتاج إليه كما قلت من البداية
اقتباسبالطبع لن تترك الزر متروك ليضغط عليه المستخدم
واما بالنسبة لجعل زر الإغلاق فقط مخفي فقد قدمت هذا المشرفة زهرة
وبارك الله بكم جميعاُ
يبدو أن الأخت زهرة لم تقرأ هذا التعديل
اقتباسظهر رد الأخت زهرة أثناء تعديلي للردمرحبا بالأخت زهرة منذ فترة لم أقرأ مشاركات لك .... أرجو أن يكون الحال كما هو مرام والحمد لله
شكرا على توجيهك لصفحات رائعة وأمثلة أروع
ولكن ألا نستطيع عمل المطلوب الأول ؟
على حد علمي ... ليس هناك مستحيل في البرمجة بإذن الله وخاصة على زهرة
وأتذكر تعليقا لك أعجبني ( ما أبقاش زهرة إن ما جبت خبرها)
مثال على تحدي النفس والخروج بأقصى الطاقات الممكنة ... هكذا أفعل
شكرا لك
يسعدني الوصل لحل المطلوب الأول إن كان ممكن
محمد صالح
شكرا للجميع على المشاركة والمرور
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
إخوتي الكرام
بالتدقيق في الموضوع وجدت المستخدم يمكنه الخروج من البرنامج بالضغط على ALT+F4 فكيف يمكننا إيقاف هذه العملية حتى يستلزم الخروج الضغط على زر خروج ؟
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
تفضل اخي محمد صالح
الملف بعد التعديل
لعدم تمكين مفتاحي ALT+F4 نحتاج الى وضع هذين الكودين في حدث عند فتح النموذج وفي حدث عند الضغط على مفتاحي ALT+F4
كود عند فتح النموذج
Private Sub Form_Open(Cancel As Integer) Me.KeyPreview = True End Sub
كود عدم التمكين عند الضغط على مفتاحي ALT+F4
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case 18, 115 KeyCode = 0 End Select End Sub
شكرا للأخت زهرة ..... عوده حميدة
حيث أن 18 هذا كود alt
و115 كود F4
ويمكننا الاستغناء عن الكود الأول بضبط خصائص النموذج إلى
مفتاح العرض التمهيدي ----- نعم
ولكن هل المطلوب الأول مستحيل ؟!
تم تعديل هذه المشاركة بواسطة mas123 في 10 سبتمبر 2007 في 17:30
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
الأخ الفاضل - الأخوة الكرام
كل عام وانتم بخير
هذا على حد علمى لما هو مطلوب فى البرنامج (( بعد إذن الأستاذة / زهرة ))
وإذا لم يكن بالضبط المطلوب أرجو من الأخ الكريم وضع المطلوب على هيئة
1 -
2-
3 -
وله جزيل الشكر
اخيكم
محمد جلال
م / محمد جلال
اخي الفاضل محمد صالح
صدقني بالله انني لم افهم منك قولك ( المطلوب الأول ) في مشاركتك
فماذا تريد بالضبط ان يتم في البرنامج
وتأكد انه لا يوجد شيء مستحيل فجميع الأكواد نستطيع ان نشكلها ونكيفها على كيفنا مثل العجينه .
ما اريده منك ان تشرح لي ما هو المطلوب ؟
اذا كنت تريد وضع اكواد خاصة عند النقر على زر X الموجود في نافذة برنامج الأكسيس فما هي الأكواد المطلوب وضعها
لأن زر الخروج X من نافذة برنامج الأكسيس هو خاص بدوال الـ API وليس من خصائص الأكسيس مثل ما هو موجود في النموذج ( زر الإغلاق )
لهذا سيكون التعامل معه صعب قليلا ولكن سنحاول ان نصل اليه بأي طريقه .
لهذا قمنا بوضع حل نهائي لزر الخروج X الموجود في نافذة الأكسيس وذلك بعدم تمكينه حيث يتم اجبار المستخدم للخروج من البرنامج من خلال زر الأمر خروج الموجود في النموذج .
اذا كان لديك فكره معينه تريد تطبيقها فأبلغنا بها وسأقوم بتنفيذها برمجيا فلا يوجد شيء مستحيل او لا يمكن تحقيقه فقد شاب رأسي من كثرة الأكواد البرمجية .
المطلوب الأول مشار إليه في المشاركة الأولى
اقتباسوالسؤال هو هل نستطيع وضع هذه الأكواد عند الخروج من البرنامج سواء بالضغط على زر خروج أو بالضغط على( إكس) كما هو موضح بالصورة ؟أرجو الإفادة
ومشار إليه في المشاركة الثالثة
اقتباسوالمطلوب تنفيذ كل ما سبق (كود زر الأمر خروج) إذا ضغط المستخدم على (x) الموجودة في أعلى نافذة الأكسس والمشار إليها في الصورة
وبتوضيح أكثر
هل ممكن وضع الكود الموجود في زر الأمر خروج (رسالة تأكيد الخروج) عند الضغط على زر إغلاق نافذة الأكسس في حال تنشيطها وتظهر الرسالة فإذا ضغط المستخدم على ok ينفذ الأمر quit وإذا ضغط cancel لا يخرج من التطبيق
وبالنسبة لبرنامجي فما يمكن تطبيقه على كود الرسالة أستطيع تغيير الأكواد لحدمة برنامجي مثل العودة بدقة الشاشة لماكانت عليه وتشغيل ملف صوتي عند الخروج وهكذا
فإن كان ممكنا أرجو استعمال كود رسالة الخروج والموجود في زر الأمر خروج
أتمنى أن أكون قد أوضحت
التغير هو القانون الدائم للحياة.ودوام الحال من المحال
فلماذا لا نتغير بإرادتنا إلى ما نريد؟ قبل أن تغيرنا الحياة مجبرين إلى ما لا نريد؟
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
