Restaurar aplicación desde el System Tray - VB-MUNDO

lvarela · #1 (**permalink**) 15-05-2008, 21:47:21

Buenas a todos, solicito su ayuda, tengo una aplicación que al minimizar aparece en el system tray pero lo que trato de intentar es que al presionar una tecla específica del teclado, la aplicación se restaure.

He buscado por tadas partes como hacer esto y no he encontrado nada.
Por favor que alguien me ayude!!!

Esto me urge por que es para mi trabajo!!!

Gracias

seba123neo · #2 (**permalink**) 16-05-2008, 13:18:59

Hola,deberias hacerlo con funciones api's,te pongo un ejemplo con una de ellas:

Código:

Public Class Form1
    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Short

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Enabled = True
        Timer1.Interval = 50
    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If GetAsyncKeyState(13) = -32767 And Me.WindowState = FormWindowState.Minimized Then
            Me.WindowState = FormWindowState.Normal
        End If
    End Sub
End Class

cuando esta minimizado tu formulario y apretas ENTER,te lo restaura...hay otra api tambein que no necesita de un Timer para funcionar y por lo tanto se hace mas "liviano" ,pero es mucho codigo...

saludos.

lvarela · #3 (**permalink**) 16-05-2008, 14:04:18

Ok, voy a intentarlo.
Gracias por tu ayuda!!!

lvarela · #4 (**permalink**) 16-05-2008, 14:24:08

Cita:

Empezado por lvarela

Buenas a todos, solicito su ayuda, tengo una aplicación que al minimizar aparece en el system tray pero lo que trato de intentar es que al presionar una tecla específica del teclado, la aplicación se restaure.

He buscado por tadas partes como hacer esto y no he encontrado nada.
Por favor que alguien me ayude!!!

Esto me urge por que es para mi trabajo!!!

Gracias

Si alguien me ayuda se lo agradezco

lvarela · #5 (**permalink**) 16-05-2008, 14:26:15

Cita:

Empezado por seba123neo

Hola,deberias hacerlo con funciones api's,te pongo un ejemplo con una de ellas:

Código:

Public Class Form1
    Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Integer) As Short
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Enabled = True
        Timer1.Interval = 50
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If GetAsyncKeyState(13) = -32767 And Me.WindowState = FormWindowState.Minimized Then
            Me.WindowState = FormWindowState.Normal
        End If
    End Sub
End Class

cuando esta minimizado tu formulario y apretas ENTER,te lo restaura...hay otra api tambein que no necesita de un Timer para funcionar y por lo tanto se hace mas "liviano" ,pero es mucho codigo...

saludos.

Hola, ya probé este tip, pero cuando la pantalla está minimizada en el system tray y presiono Enter, no se restaura. Algún consejo?

lvarela · #6 (**permalink**) 16-05-2008, 18:09:36

Estoy usando el digitalpersona Platinum SDK, necesito que una ventana que se encuentra minimizada en el system tray se restaure cuando alguien pone el dedo en el lector. Estoy usando el método FingerTouching, pero al momento de ejecutarse, no ejecuta este evento.
Me podrían ayudar?

lvarela · #7 (**permalink**) 16-05-2008, 20:49:38

Necesito un poco de ayuda y ya estoy algo desesperada, alguien me podría ayudar?

Se me presenta el siguiente caso: estoy realizando una palicación que utiliza lector de huellas digitales, estoy usando un dispositivo DigitalPesona Platinum SDK.

En el programa se minimiza una pantalla y esta se muestra en el sistem tray, ahora mi dilema es cómo hago para restaurar esta pantalla con solo tocar el lector de huellas con un dedo, tengo la función FingerTouching(), pero no logro hacer que funcione.

Aquí les muestro el código que tengo.

Cita:

PrivateSub Fp_FingerTouching() Handles Fp.FingerTouching
'detecta que el lector de huellas ha sido tocado y registra la marca
Dim F AsNew System.EventArgs
IfMe.WindowState = FormWindowState.Minimized Then
If Fp.ImageWidth > -1 Then

Nfi_Notificador_Click(Nfi_Notificador, F)
EndIf
EndIf
EndSub

El problema es que cuando se está ejecutando y la pantalla se minimiza, no reconoce o no está ejecutando el evento FingerTouching()

Alguien me pude ayudar, estoy un poco desesperada por he buscado en Google y en todas partes y no encuentro nada que me ayude con esto y es algo que me urge porque es un proyecto que tengo que entregar en el trabajo.

Les agradezco me puedan sacar de este apuro.

lee-mon-shu-pao · #8 (**permalink**) 16-05-2008, 21:47:20

Lo que quieres hacer no se puede.
porque NO hay forma de llevar el foco con el teclado a un systray.

Te puedo aconsejar que mantengas un cuadrado siempre visible en la pantalla (Con un color llamativo),
que diga algo como 'PRESIONE AQUI PARA ACTIVAR', que no se pueda cerrar (por parte del usuario) y menos mover ni minimizar,
y cada vez que lo presiones active tu programa.
es solo una idea.