Sección de controles Ocx para Visual basic , Dll , Activex

48 - Controles ocx que permiten colocar el ejecutable en la barra systray de windows

<Volver> - Anterior - Siguiente



 

 

 

Contenido:

 

 

 


1 - Systray Ocx

Este control ocx es muy simple y tiene 2 métodos, uno llamado PonerSystray que lo coloca en la barra de notificación y RemoverSystray que lo elimina

También tiene 2 propiedades, una llamada ToolTipText para el texto a mostrar al pasar el mouse por encima y otra llamada IconPicture que es para establecer el ícono del ejecutable, ya sea en tiempo de diseño como en tiempo de ejecución.

En el archivo de ejemplo para descargar, hay una muestra de como usarlo para cambiar estas propiedades: el ícono, el tooltip, para colocarlo y para eliminarlo de la barra tray.

Para desplegar un menú Poupup en algún evento del mouse, una ves que está colocado en la barra, se debe utilizar lo eventos MouseDown, MouseUp o DoblClick. Dentro de estos eventos hay que verificar que botón se ha presionado, exactamente como se hace con los menues contextuales popup por ejemplo en un form, utilizando las variables de visual basic vbRightButton y vbLefButton de la variable Button.

Nota: Si querés ver el código fuente de este ocx está en este enlace: Ver Código fuente Systray

 

Descargar ocx con ejemplo

 


2 - NotifyIcon Control

Este otro control, además de poder colocar y notificar el programa, permite desplegar un BaloonTip.

BaloonTip de información

Baloon Tip de error

warning

Ballon sin ícono

 

El funcionamiento es muy simple, y si bien podés descargar un ejemplo que hice, te explico algunos detalles de como funciona.

Para notificar el programa, se debe usar la propiedad Visible, es decir si se pone en True se notifica en el systray, si la propiedad visible está en False, se quita

Para poder asignar el ícono, se debe usar la propiedad Icon , con la instrucción Set, por ejemplo esto asigna el ícono que está ubicado en un control Image

Set Tray.Icon = Image1.Picture

 

Si queremos mostrar un ícono animado, se debe usar dentro de un Timer, e ir cambiando la imagen ( en el zip tenés un ejemplo con un ícono animado )

Para poder mostrar , en el momento en que se notifica el programa, o en cualquier otro momento, un Baloon Tip , se debe usar el método ShowBallon

Pero antes hay que especificar el texto del BaloonTip ( propiedad Balloontext) El título ( propiedad BallonTitle) y el tipo de ícono ( Balloon Icon) que son los estandar de windows y son cuatro : Icono de información, icono de error, de advertencia y sin ningún ícono

Importante: antes de ejecutar ShowBallon para desplegar el Ballon Tip, hay que colocar el programa en el systray, ya que si se ejecuta ShowBallon antes de ponerlo en el TRay no funciona

Por ejemplo :

' Coloca en el área de notificación
tray.Visible = True

' configura el Ballon tip
''''''''''''''''''''''''''''''''
tray.BalloonIcon = Info ' globo de información
tray.BalloonTitle = "Titulo del Baloon Tip"
tray.BalloonText = " Texto del Baloon Tip "
        
' muestra el Ballon Tip
tray.ShowBalloon

' oculta el formulario ( opcional )
Me.Hide
          

 

Por último, el control tiene 5 eventos Click, DblClick, MouseDown, MouseMove, MouseUp y otro llamado ContextMenu, para desplegar el menú contextual, por ejemplo :

Private Sub Tray_ContextMenu()
PopupMenu MiMenu_Contextual
End Sub

 

Descargar control con ejemplo

 


3 - Control DevPower Tray Icon

Este control es muy similar al anterior. Para colocarlo y sacar elprograma del systray, se usa la propiedad Visible

Para cambiar la imagen del ícono , se usa la propiedad Icon, pero usando la instrucción set, por ejemplo

Set TrayIcon1.Icon = Image1.Picture

 

y para interceptar los eventos del mouse una ves que está notificado , cuenta con los eventos Click, MouseDown, MouseUp y MouseMove

Descargar DevPower Tray Icon

 

Nota: registrar el control en el sistema mediante regsvr32, desde la linea de comandos

 


Enlaces relacionados

 


Buscar en Recursos vb con Google