si lo se .. pero en este caso no necsito que se muestre en ninguna parte del form... puesto que es solo para el systray...
esto es lo que uso para ello:
Public Sub Eventos(X As Single)
Dim msg As Long
If (Form1.ScaleMode = vbPixels) Then
msg = X
Else
msg = X / Screen.TwipsPerPixelX
End If
Select Case msg
Case WM_RBUTTONUP
Call SetForegroundWindow(Form1.hwnd)
'Si hacemos Click con el boton derecho mostramos el popup Menu
Form1.PopupMenu Form1.menu
Case WM_LBUTTONUP
Call SetForegroundWindow(Form1.hwnd)
'Si hacemos Click con el boton izquierdo mostramos el popup Menu
Form1.PopupMenu Form1.menu
End Select
End Sub
y lo llamo con:
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Eventos X
End Sub
y aki esta el detalle como es Form_MouseMove de alguna manera esta lo muestra en el form principal.. algo que no deberia pasar.
salu2.