السلام عليكم احبتي في الله
بحثت كثيرا في الانترنت عن طريقة منع المستخدم من اغلاق الفورم بالضغط على مفتاح Alt+F4
===========================
فوجدت كود متداول على المواقع يقوم بالمهمة ولكن يكتب في حدث الـ key_down لكل الأدوات الموجودة على الفورم .. وهذا مرهق جدا
==========================
هل من كود لمنع اغلاق الفورم بالت اف4
كود :
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
End Sub
انظر للكود ضمن حدث الاغلاق
تفضل اخي الكريم
كود :
Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
End Sub
وعليكم السلام ورحمة الله وبركاته
أخوي اتبع الخطوات التاليه
في بداية الامر عرف متغير تحت كلمة Public Class مباشرة من نوع Boolean وسمه اي اسم وليكن KeyClose
في حدث FormLoad للفورم ضع هذا الكود
وفي حدث FormClosing للفورم ضع هذا الكود
PHP كود :
IF KeyClose = False Then
e.Cancel = True
End IF
وفي زر الإغلاق ضع هذا الكود
-------------------------------------------------------
من الممكن ان يدور في ذهنك ماذا فعلنا ؟!
الإجابة
في بداية الامر قمنا بتعريف متغير من نوع منطقي يا نعم يا لا
حتى نستفيد منه اننا نعرف هل ضغط على زر إغلاق أو قفلتها بطريقة غير مناسبة مثل Alt+F4
ومن ثم قمنا جعلنا عندما يفتح الفورم يضع قيمتها تساوي False إي ( لا )
ومن ثم قلنا له إذا تم إعطاء للفورم امر أغلاق بإي طريقه ما ( وهو حدث FormClosing ) تحقق من متغير KeyClose في حال كان المتغير قيمته [False] قم بعملية إلغاء الأمر الإغلاق خلاف هذا يقوم بإغلاق الفورم طبيعي
ومن ثم قمنا بجعل متغير KeyClose تساوي ( True ) إي ( نعم ) في زر إغلاق حتى إذا ذهب للحدث FormClosing ورئ متغير KeyClose لا تساوي [False] يقوم بإغلاق الفورم طبيعي
-------------------------------------------------------
بالتوفيق
سامحني اخي سعود ما رئيت مشاركتك
شكرا للاخ Easy4ever
اخونا tarek رزقه وفير
في الغالب احتاج طريقة لعمل البرنامج فابحث وابحث وفي الاخير لا اجد سوى حيلة تلبي نصف المطلوب.
شكرا لكم
طريقة الاستاذ سعود والاستاذ على الفولي منعت الاغلاق أصلا .. مش راضي يقفل لا بال close button ولا بالكود Me.close
وشكرا والله على اهتمامكم
طريقة الاستاذ Foreever بعد الضغط مرة واحدة على زر الاغلاق الذي به الكود KeyClose = True
ثم الضغط على Alt+F4 سيتم غلق البرنامج
جربوها
شاكر جدا لاهتمامكم
إقتباس :طريقة الاستاذ Foreever بعد الضغط مرة واحدة على زر الاغلاق الذي به الكود KeyClose = True
ثم الضغط على Alt+F4 سيتم غلق البرنامج
المفروض ان زر الاغلاق بعده يتم اغلاق البرنامج يعني بعد كود
اكتب كود اغلاق الفورم
السلام عليكم...
1. إزالة الأمر "إغلاق" (Close) من قائمة النظام التابعة للنافذة:
* ضع التصريحات التالية في بداية تعريف الـ Class:
كود :
Private Declare Function GetSystemMenu Lib "user32" Alias "GetSystemMenu" (ByVal hwnd As Integer, ByVal bRevert As Integer) As Integer
Private Declare Function RemoveMenu Lib "user32" Alias "RemoveMenu" (ByVal hMenu As Integer, ByVal nPosition As Integer, ByVal wFlags As Integer) As Integer
Private Const MF_BYPOSITION As Integer = &H400
* في الحدث Load التابع للـ Form اكتب الكود التالي لحذف الأمر إغلاق و الفاصل الذي قبله من قائمة النظام الخاصة بالنافذة. الكود سيؤدي أيضاً إلى تعطيل زر إغلاق النافذة:
كود :
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim hSysMenu As Integer
hSysMenu = GetSystemMenu(Me.Handle, 0)
RemoveMenu(hSysMenu, 6, MF_BYPOSITION)
RemoveMenu(hSysMenu, 5, MF_BYPOSITION)
End Sub
* اضبط الخاصية
KeyPreview للـ Form على
True.
* اكتب الكود التالي في الحدث
KeyDown للـ Form:
كود :
Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
If e.Alt And e.KeyCode = Keys.F4 Then
e.Handled = True
End If
End Sub
* ملاحظة: قائمة النظام (System Menu) للنافذة هي القائمة التي تظهر عند النقر على رمز النافذة بالزر الأيسر، أو بالنقر على شريط عنوان النافذة بالزر الأيمن.
3. نرجو الاستفادة و السلام.
ما شاء الله تبارك الله
حلوة قوي الفكرة دي يا اخ ناجي
طيب لي سؤال هل من الممكن بدل ان اجعله غير ممكن ان اجعله يقوم بدور اخر غير الاغلاق
بمعني اجعلة ممكن لاكن لا يغلق الفورم بل ينفذ دالة اخري