كيف أضع رسالة تظهر للبرنامج عند أغلاقة من أدارة المهام

إذا كان الإغلاق عن طريق نافذة مدير المهام ( وبالتحديد من تبويب Applications وليس Processes ) ، فهذا هو الكود :

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Dim Responce As Integer
If UnloadMode = 3 Then
Responce = MsgBox("Do you want to end the program?", vbYesNo)
If Responce = 7 Then Cancel = True
End If
End Sub

هنا وضعنا الكود في الحدث عندما يريد المستخدم أن يغلق النافذة وهو حدث QueryUnload ويحوي هذا الحدث متغيرين

الأول هو المتغير Cancel وفي حال احتوائه على قيمة أكبر من الصفر، فإنه يمنع إغلاق النافذة، وTrue هي قيمة أكبر من الصفر وFalse تساوي الصفر فإذا كتبنا Cancel = True فإننا بذلك نمنع إغلاق النافذة

أما المتغير الثاني فهو UnloadMode وهو يحدد الطريقة التي تم إغلاق النافذة بها، ويضع لها رقماً، فالرقم 0 يعني أن النافذة تم إغلاقها من الـSystem Menu أي من إشارة الإغلاق الموجودة في أعلى النافذة، والرقم 1 يعني أن النافذة أغلقت برمجياً بالأمر Unload ، والرقم 2 يعني أن المستخدم قرر إغلاق Windows ، والرقم 3 يعني أن المستخدم اختار إغلاق البرنامج من مدير المهام Task Manager ، والرقم 4 يعني أن النافذة الأم أغلقت في النافذة متعددة الوثائق MDI .

والحمد لله رب العالمين

منقول من كتاب (إلى القمة مع فيجوال بيسك) للكاتب جمال عمارة بتصرّف.

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

جزاكم الله خير أخواني Abboodd و المبرمج أحمد

على الرد وبارك الله فيكم

طيب كيف أمنع غلق البرنامج من إدارة المهام وتجيني رسالة خطأ مثل برامج النظام

أثابكم الله وغفر لكم

اقتباس

طيب كيف أمنع غلق البرنامج من إدارة المهام وتجيني رسالة خطأ مثل برامج النظام

مثل ماذا؟ أعطني مثالاً من فضلك

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

أخي Abboodd

مثل برنامج CSRSS.exe

لأنه ملف نظام تظهر الرسالة التالية

This is critical system Process. Task Manager cannot end this process.

أثابك الله

thank uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuu

لا أظن انه يمكنك ان تمنع إغلاق برنامجك

وبالنسبة لCSRSS.exe

فهي من الحالات الخاصة عند الـtask manager

مثل ما قال الأخ "حامل المفكرة" لا يمكن منعه من الإغلاق، ولكن هناك طرق كثيرة لمنع ظهوره في مدير المهام أو لمنع ظهور مدير المهام أصلاً.

غير تسمية ملف البرنامج إلى csrss.exe أو smss.exe ، وجرب إغلاقها من مدير المهام ( لن تستطيع )