rsetaurra aplicacion desde el Tray - VB-MUNDO

garepa · #1 (**permalink**) 30-04-2004, 01:00:00

rsetaurra aplicacion desde el Tray

Pongo la aplicacion en la Barra de tareas pero no se como capturar un click o doble click en el icono.

Lo unico que capuro es si se posicona el el puntero del mouse sobre el icono con mouse_down pero no puedo capturar el click

Si alguien me ayuda le voy a agradecer

Juan</TR>

acalanto · #2 (**permalink**) 30-04-2004, 01:00:00

RE: rsetaurra aplicacion desde el Tray

Prueba este código que sirve para 95, 98, 2000 y XP (Tendrás que escribir tú código para cada pulsación del ratón en los dos conjuntos de CASE)

<BLOCKQUOTE><PRE><SPAN class=texto_mini>Codigo:</SPAN><HR>

garepa · #3 (**permalink**) 30-04-2004, 01:00:00

RE: rsetaurra aplicacion desde el Tray

Estoy haciendolo en Un MDIForm y no tiene la prop scaleMode

Si omito el sig. codigo

If (Me.ScaleMode = vbPixels) Then
msg = x
Else
msg = x / Screen.TwipsPerPixelX
End If

Me cambia en algo ???</TR>

acalanto · #4 (**permalink**) 17-09-2004, 01:00:00

RE: rsetaurra aplicacion desde el Tray

Prueba com msg = x directamente, pero nunca o he probado.

Un saludo
-Acalanto-</TR>