Icono en el system tray
Hola estoy haciendo una aplicación senvilla en VB y quiero colocar un icono al lado del reloj, yo tengo una dll que lo hace y funciona muy bien, pero también quisiera que cuando se hage clic derecho sobre el, se muestre un menu popup, encontré un ocx que coloca el icno y tiene la función para generar el popup, pero me indica que falta un control menu. Podrías ayudarme con eso. Gracias
Private Sub cSysTray1_MouseDown(Button As Integer, Id As Long)
If Button = 2 Then
PopupMenu MenuIcono
End If
End Sub
Este es el código para que aparezca el popup, y la sentencia que esta dentro del if es la que me da el error
Private Sub cSysTray1_MouseDown(Button As Integer, Id As Long)
If Button = 2 Then
PopupMenu MenuIcono
End If
End Sub
Este es el código para que aparezca el popup, y la sentencia que esta dentro del if es la que me da el error
1 respuesta
Respuesta de giampietro
1
Probé tu código y me funciono. El popup se elabora en base en el editor de menús en el cual el menu que contiene las opciones (como por ejemplo abrir, cerrar, etc) el key debe llamarce MenuIcono. Yo uso on ocx llamado anitray de ultima si quieres pásame tu mail que te lo mando con un código de ejemplo.
