غیر فعال کردن دکمه ی close فرم

[ameysams]

با سلا م خدمت دوستان عزیزدر vb.net چگونه میتوان دکمه ی close فرم را غیر فعال کرد.
با تشکر

 

[saeedsmk]

سلام
خوب هستيد ببنيد اين كد هات كمك تون ميكنه

http://forum.persiantools.com/t39088.html

اميدوارم كمك كنه

 

[saeedsmk]

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

Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As IntPtr, ByVal nPosition As Integer, ByVal wFlags As Long) As IntPtr
Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As IntPtr, ByVal bRevert As Boolean) As IntPtr
Private Declare Function GetMenuItemCount Lib "user32" (ByVal hMenu As IntPtr) As Integer
Private Declare Function DrawMenuBar Lib "user32" (ByVal hwnd As IntPtr) As Boolean

Private Const MF_BYPOSITION = &H400
Private Const MF_REMOVE = &H1000
Private Const MF_DISABLED = &H2

اين ساب رو تين باعث حذف دكمه بستن هر پنجره اي ميشود

Public Sub DisableCloseButton(ByVal hwnd As IntPtr)
	Dim hMenu As IntPtr
	Dim menuItemCount As Integer
	hMenu = GetSystemMenu(hwnd, False)
	menuItemCount = GetMenuItemCount(hMenu)
	Call RemoveMenu(hMenu, menuItemCount - 1, MF_DISABLED Or MF_BYPOSITION)
	Call RemoveMenu(hMenu, menuItemCount - 2, MF_DISABLED Or MF_BYPOSITION)
	Call DrawMenuBar(hwnd)
End Sub

حال مثلا براي پاك كردن دكمه يك فرم اين ساب رو تين رو صدا ميزنيم

DisableCloseButton(Me.Handle

)
و براي خروج از كد زير استفاده ميكنيم

Application.Exit()

اميدوارم كمك كنه

 

[PersianAmir]

سلام

خب شما یک راه دیگه هم دارید.

در event مربوط به closing فرم این کد را بنویس:

e.Cancel = True

از پاسخ مدیر انجمن نیز ممنون هستیم.


موفق باشید

 

[aliabdolmalak1]

سلان
دوستان خواهشا یکی کمک کنه من یک نرم افزار دارم که گزینه ماکسیمایزش غیر فعال هستش و گزینه مینیمایزش فقط فعال هست چطور میتونم اونو فعال کنم این نزم افزار مربوط به گیم نت هستش ممنون میشم کسی کمک کنه