Sección de controles Ocx para Visual basic , Dll , Activex
<Volver> - Anterior - Siguiente
Contenido:
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
Este otro control, además de poder colocar y notificar el programa, permite desplegar un BaloonTip.
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
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
Nota: registrar el control en el sistema mediante regsvr32, desde la linea de comandos
Buscar en Recursos vb con Google
Recursos visual basic - Buscar - Privacidad - Copyright © 2005 - 2009 - www.recursosvisualbasic.com.ar