Programación General > Visual Basic 6.0 e inferiores

 Ayuda

(1/2) > >>

gervb:
Hola a todos, alguien sabe como sacar el boton cerrar del formulario sin que desaparesca el icono del formulario.
Gracias de antemano.

abelsql3000:
Elige el formulario y En la Ventana de Propiedades,  Establece la Propiedad CONTROLBOX a FALSE
Espero que con ello logres lo que deseas
Atte Abel de Lima,Peru[/size] :lol:

Epa:
Buenas.

Hasta donde se, no se puede.

Lo que puedes hacer es invalidar ese boton de la siguiente forma:


--- Código: Text --- Private Sub Form_Unload(Cancel As Integer)  Cancel = 1End Sub  
Y luego pones un boton o un menu para cerrar:


--- Código: Text --- Private Sub Command1_Click()  EndEnd Sub  
Espero se util.

Saludos

Toph:

--- Cita de: "gervb" ---Hola a todos, alguien sabe como sacar el boton cerrar del formulario sin que desaparesca el icono del formulario.
Gracias de antemano.
--- Fin de la cita ---
Hola gervb  :hola: a continuacion te dejo la rutina que sirve para deshabilitar el boton cerrar del formulario sin que desaparezca de este

--- Código: Text ---Option Explicit ' Para deshabilitar el menú cerrar (controlbox) de un formularioPrivate Declare Function GetSystemMenu Lib "user32" _    (ByVal hWnd As Long, ByVal bRevert As Long) As LongPrivate 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 LongPrivate 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&  Private Sub Form_Load()    ' 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")    'End Sub 
saludos  :hola:

gervb:
hola, toph este codigo sirve y es lo que busco, cuando lo agrego a un formulario nuevo sin nada anda perfectamente.
Pero cuando lo agrego al formulario de mi programa al principio cuando se carga este me saltan errores y me dicen que los comentarios solamente pueden aparecer end sub .
Como hago para que funcione? porque realmente me sirve.

Navegación

[0] Índice de Mensajes

[#] Página Siguiente