• Jueves 14 de Noviembre de 2024, 17:04

Autor Tema:  Controlbox  (Leído 3084 veces)

FRIJU

  • Miembro MUY activo
  • ***
  • Mensajes: 158
    • Ver Perfil
Controlbox
« en: Miércoles 10 de Diciembre de 2003, 13:08 »
0
Hola Compañer@s!!!

Como puedo anular la x del y dejar los botones de maximizar y minimizar de la barra.
 :unsure:

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Controlbox
« Respuesta #1 en: Miércoles 10 de Diciembre de 2003, 14:38 »
0
Kaixo FRIJU.

Tal vez mediante apis se pueda conseguir lo que quieres... pero aquí tienes dos formas de lograr el mismo efecto sin eliminar el botón:

1- (La más sencilla). Utilizae el evento QueryUnload del formulario de la siguiente forma:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
        If UnloadMode = 1 Then Cancel = 1
End Sub

2 - Podrías crear el form sin ControlBox y currarte tú uno con un PictureBox, de forma que al hacer click en determinada posición: Me.WindowState = 1 (minimizado) o Me.WindowState = 2 (maximizado).

Ya te digo que lo más tal sería usar la primera opción...

Agur.

FRIJU

  • Miembro MUY activo
  • ***
  • Mensajes: 158
    • Ver Perfil
Re: Controlbox
« Respuesta #2 en: Miércoles 10 de Diciembre de 2003, 14:40 »
0
Moitas Gracias Brroz!!
  Lo probaré.
Como siempre tan eficiente.
 :comp:

observador

  • Miembro activo
  • **
  • Mensajes: 65
    • Ver Perfil
    • http://www.soloprogramacion.net/
Re: Controlbox
« Respuesta #3 en: Jueves 11 de Diciembre de 2003, 00:30 »
0
Bien... ya te dieron un par de soluciones, pero no esta por demas mostrar esta otra...

Como bien mensiona Brroz esto se puede hacer con un par de APIs.

Este codigo que adjunto trabaja directamente con el menu de sistema, lo que hace es eliminar esa opcion del menu, dando como consecuencia un boton X (Cerrar) deshabilitado y la opcion Cerrar  ALT+F4 eliminada...

Les anexo un screenshot para que observen el resultado...



Bueno... pues alli esta, otra alternativa mas...

Hasta pronto...
El mensaje contiene 1 archivo adjunto. Debes ingresar o registrarte para poder verlo y descargarlo.
Solo Programacion Net

Hasta pronto...

FRIJU

  • Miembro MUY activo
  • ***
  • Mensajes: 158
    • Ver Perfil
Re: Controlbox
« Respuesta #4 en: Jueves 11 de Diciembre de 2003, 07:55 »
0
Muchisimas gracias a todos!
Lo probaré.

 :kicking:

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Controlbox
« Respuesta #5 en: Sábado 13 de Diciembre de 2003, 10:14 »
0
Saludo a tod@s.

¡Ojo!

En el código que escribí metí la gamba y langostino:
Código: Text
  1.  
  2. Private Sub Form_QueryUnload(Cancel As Integer _
  3. , UnloadMode As Integer)
  4.         If UnloadMode = 1 Then Cancel = 1
  5. End Sub
  6.  
  7.  
debería haber puesto:
Código: Text
  1.  
  2. Private Sub Form_QueryUnload(Cancel As Integer _
  3. , UnloadMode As Integer)
  4.        If UnloadMode = 0 Then Cancel = 1
  5. End Sub
  6.  
  7.  

El valor UnloadMode = 1 indica que el formulario se descarga desde el código,
El valor UnloadMode = 0 indica que el usuario cierra el formulario tras haber pulsado X en la barra del form.

Disculpas.