Visual Basic - Como deshabilito la X del cierre del formulario

Life is soft - evento anual de software empresarial
 
Vista:

Como deshabilito la X del cierre del formulario

Publicado por SalvajeFer (15 intervenciones) el 05/10/2003 06:18:56
COMO desaparezco la X del cierrte del formulario, ya sea MDI Child o principal????
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como deshabilito la X del cierre del formulario

Publicado por Patricio (8 intervenciones) el 06/10/2003 17:35:17
llama a esta funcion desde el load del formulario
Private Sub cmdDeshabilitar_Click()
' Deshabilitar el botón de cerrar el formulario
Dim hMenu As Long
'
hMenu = GetSystemMenu(hWND, 0)
' Deshabilitar el menú cerrar del formulario
Call ModifyMenu(hMenu, SC_CLOSE, MF_BYCOMMAND Or MF_GRAYED, -10, "Close")
'
' Si esta llamada se hace dentro del Form_Load,
' no es necesario redibujar los menús
' Redibujar los menús, para que se muestre deshabilitado
Call DrawMenuBar(hWND)
'
End Sub
en las declaraciones:
Private Declare Function GetSystemMenu Lib "user32" _
(ByVal hWND As Long, ByVal bRevert As Long) As Long
Private Declare Function ModifyMenu Lib "user32" Alias "ModifyMenuA" _
(ByVal hMenu As Long, ByVal nPosition As Long, _
ByVal wFlags As Long, ByVal wIDNewItem As Long, _
ByVal lpString As Any) As Long
Private Declare Function DrawMenuBar Lib "user32" _
(ByVal hWND As Long) As Long

Private Const MF_BYCOMMAND = &H0&
Private Const MF_ENABLED = &H0&
Private Const MF_GRAYED = &H1&
Private Const SC_CLOSE = &HF060&

Espero que te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como deshabilito la X del cierre del formulario

Publicado por Mauro (45 intervenciones) el 06/10/2003 20:02:25
Lo mejor seria que cuando el usuario haga click sobre el boton "X" que corra una secuencia de codigo contame que es lo que queres hacer y depende de lo que necesites te mando un ejemplo a tu correo.
Chau
mauro
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar