• Miércoles 8 de Mayo de 2024, 01:14

Autor Tema:  Re: Acciones con ventanas  (Leído 1498 veces)

Serneli

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Re: Acciones con ventanas
« en: Domingo 27 de Octubre de 2002, 21:52 »
0
Estoy diseñando un programa que debe ejecutarse siempre, desde que se prende el computador hasta q se apague...el hecho es que tengo una ventana de formulario a la que quiero deshabilitarle la(X), y q funcione como los messenger, q al presionar la (X) se minimice la ventana y aparezca un icono en el area de notificacion al lado del reloj...

De antemano gracias!

javierbalk

  • Miembro MUY activo
  • ***
  • Mensajes: 142
  • Nacionalidad: 00
    • Ver Perfil
    • Print preview y grabar PDF en Visual Basic 6
Acciones con ventanas
« Respuesta #1 en: Martes 29 de Octubre de 2002, 01:25 »
0
Si buscas en el Cd de Visual Basic vas a encontrar un archivo que es Systray.ocx, ese componente te sirve para poner tu programa al lado del reloj, o mejor dicho en la Bandeja de sistema (System tray en inglés)
También está el código fuente por si lo quieres modificar.

En cuanto a que se minimize al presionar la X hace lo siguiente:
Para el evento Form_QueryUnload escribí:

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    If UnloadMode = 0 Then
        Cancel = True
        WindowState = vbMinimized
        ' o bien SysTray1.OnTray = True
    End If
End Sub

Después vas a tener que hacer una forma para que se vuelva a restaurar y otra para poder cerrarlo definitivamente.
Saludos,

Javier