أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
مالك ماريه Eslam Abdullah-- لا تميز خلال هذه الفترة YasserKhalil مع أكاديمية الصقر اخفي أكوادك وعيش حياتك EvilClippy VBA Project Unviewable Protection اكسيل اسئله واجابات


اعلان هنا
ألعاب فلاش أون لاين
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



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





إلغاء زر الإغلاق في أي فورم

السلام عليكم ورحمة الله وبركاته إخواني وأحبابي في الله أقدم لكم طريقة لكيفية إلغاء زر الإغلاق في أي فورم موجود لديك .. ..



02-09-2017 07:59 صباحا
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 

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

إخواني وأحبابي في الله

أقدم لكم طريقة لكيفية إلغاء زر الإغلاق في أي فورم موجود لديك .. 
قم بوضع الكود التالي في موديول عادي
Option Explicit

Public Declare Function GetSystemMenu Lib "user32.dll" (ByVal hwnd As Long, ByVal bRevert As Long) As Long
Private Declare Function DrawMenuBar Lib "user32.dll" (ByVal hwnd As Long) As Long
Private Declare Function DeleteMenu Lib "user32.dll" (ByVal hwnd As Long, ByVal nPosition As Long, ByVal uflags As Long) As Long
Private Declare Function GetForegroundWindow Lib "user32.dll" () As Long

Sub DisableCloseBox()
    Const MF_BYCOMMAND  As Long = &H0&
    Const SC_CLOSE      As Long = &HF060
    Const SC_MAXIMIZE   As Long = &HF030
    Const SC_MINIMIZE   As Long = &HF020
    Const SC_RESTORE    As Long = &HF120

    Dim hMenu           As Long
    Dim hwnd            As Long
    Dim ret             As Long

    hwnd = GetForegroundWindow()
    hMenu = GetSystemMenu(hwnd, 0&)

    ret = DeleteMenu(hMenu, SC_CLOSE, MF_BYCOMMAND)
    ret = DrawMenuBar(hwnd)
End Sub


الآن انتقل للفورم المطلوب إلغاء زر الإغلاق فيه ، وضع الكود التالي في حدث تنشيط الفورم
Private Sub UserForm_Activate()
    DisableCloseBox
End Sub


بالطبع بعد ما قمت بإلغاء زر الإغلاق تحتاج إلى إنشاء زر أمر لإغلاق الفورم من خلاله ، لذا قم بإنشاء زر أمر CommandButton1 على سبيل المثال وضع الكود التالي فيه
Private Sub CommandButton1_Click()
    Unload Me
End Sub


المهم في الموضوع أنه يمكنك استخدام الكود في أي فورم تستخدمه داخل المشروع الخاص بك
أرجو أن يكون الموضوع مفيد لكم ، ولا تنسونا بدعوة بظهر الغيب

لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب

أخوكم في الله / ياسر خليل أبو البراء

أثارت هذه المشاركة إعجاب: ashraf_hertlion، الصقر،





04-09-2017 11:17 مساء
مشاهدة مشاركة منفردة [1]
ناصر سعيد
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 9
المشاركات : 165
الجنس : ذكر
تاريخ الميلاد : 1-1-1985
الدعوات : 1
يتابعهم : 0
يتابعونه : 3
قوة السمعة : 215
الاعجاب : 8
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
جزاك الله خيرا وبارك فيك استاذ ياسر خليل




توقيع :ناصر سعيد
جزاكم الله خيرا



05-09-2017 01:11 صباحا
مشاهدة مشاركة منفردة [2]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
وجزيت خيراً بمثل ما دعوت لي وزيادة ، ومشكور على مرورك العطر بالموضوع





05-09-2017 11:45 صباحا
مشاهدة مشاركة منفردة [3]
محمد الدسوقى
menu_open
خبير
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 22-08-2017
رقم العضوية : 47
المشاركات : 639
الجنس : ذكر
تاريخ الميلاد : 14-10-1973
الدعوات : 55
يتابعهم : 9
يتابعونه : 534
قوة السمعة : 6873
الاعجاب : 246
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
بارك الله فيك وجزاك الله خيراً  أستاذ ياسر ابو البراء





05-09-2017 11:45 صباحا
مشاهدة مشاركة منفردة [4]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
مشكور على المرور العطر أخي الحبيب محمد الدسوقي





05-01-2019 10:24 صباحا
مشاهدة مشاركة منفردة [5]
manola_mr
menu_open
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 16-11-2018
رقم العضوية : 9154
المشاركات : 124
الجنس : أنثى
يتابعهم : 0
يتابعونه : 1
قوة السمعة : 132
الاعجاب : 5
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
جزاك الله خيرا





18-01-2019 08:23 صباحا
مشاهدة مشاركة منفردة [6]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
وجزيت خيراً بمثل ما دعوت لي أخي الفاضل





01-04-2019 09:36 مساء
مشاهدة مشاركة منفردة [7]
fouadkbm
menu_open
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 07-05-2018
رقم العضوية : 6145
المشاركات : 40
الجنس : ذكر
تاريخ الميلاد : 26-10-1965
يتابعهم : 0
يتابعونه : 0
قوة السمعة : 24
الاعجاب : 6
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
جميل منك ياجميل





07-04-2019 03:12 مساء
مشاهدة مشاركة منفردة [8]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم

بارك الله فيك أخي الكريم






24-08-2019 08:51 صباحا
مشاهدة مشاركة منفردة [9]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
تم تحديث الملف ليتناسب مع ويندوز 32 بت و64 بت ...

أثارت هذه المشاركة إعجاب: محمود ابو الدهب،




24-08-2019 09:29 صباحا
مشاهدة مشاركة منفردة [10]
محمود ابو الدهب
menu_open
مشرف على لغات برمجة والاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 14
المشاركات : 1238
الدولة : مصر
الجنس : ذكر
تاريخ الميلاد : 4-7-1990
الدعوات : 59
يتابعهم : 6
يتابعونه : 212
قوة السمعة : 4092
الاعجاب : 476
موقعي : زيارة موقعي
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
بارك الله فيك استاذ ياسر خليل وجعلك الله زخرا لكل محتاج

أثارت هذه المشاركة إعجاب: الصقر، YasserKhalil،


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

تحياتى وتقدير للجميع  محمود ابوالدهب


24-08-2019 10:44 صباحا
مشاهدة مشاركة منفردة [11]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 7274
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 19
يتابعهم : 0
يتابعونه : 411
قوة السمعة : 20906
الاعجاب : 1481
 offline 
look/images/icons/i1.gif إلغاء زر الإغلاق في أي فورم
تسلم أخي الحبيب محمود ومشكور على كلماتك الطيبة

أثارت هذه المشاركة إعجاب: محمود ابو الدهب،






الكلمات الدلالية
إلغاء ، الإغلاق ، فورم ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 07:45 مساء

أعلن هنا
أعلن هنا
أعلن هنا