Como Capturar teclas solo dentro del formulario?

[smoke001]

Primero un saludos amigos del Foro,

Tengo una duda, utilizo este codigo que encontre por la web para capturar la pulsacion de una tecla para hacer X funcion...

en un timer:

Código vb6:

Dim i As Integer
    
    For i = 0 To 255
        [COLOR=SeaGreen]'Consultamos el valor de la tecla mediante el Api. _
        Si se presionó devuelve -32767 y mostramos el valor de i[/COLOR]
        If GetAsyncKeyState(i) = -32767 Then
        
        If i = 113 Then Form1.Show 1
 
    End If
        
    Next i
 

El caso es que me sirbe para que cuando aprieten X tecla me abra el formulario pero captura a todo momento hasta con tener la aplicacion minimizada...

no se como hacer para que solo sea cuando este "activo" el formulario inicial..

he probado desactivando el timer y en el evento activate lo activo otravez pero no logro desactivarlo de nuevo cuando este no este en pantalla... nose si me explico


muchas gracias..!!

[pkj]

Puedes usar los eventos gotfocus y lostfocus para saber cuando el form recibe o pierde el enfoque y así activar y desactivar tu timer.

De todos modos lo mas normal es usar, en lugar de getasynckeystate, algún evento del form como keypress o keydown para controlar las teclas que se pulsan, aunque estos eventos ignoran algunas teclas, pero suelen ser suficiente.

Saludos

[T3rryMan]

hola te recomendaria buscar la propiedad del Form KEYPREVIEW = TRUE (es importante para q funcione)por defecto se encuentra en false sirve pa que reciba primera las pulsaciones de las teclas(F1,F2.... F12 y demas que son ASCII A,B,C...Z) es muy parecido al KEY_PRESS no de los botones:
y despues busques el evento del FORM keyUp y copies ahi tus
debug.print KeyCode ' aqui sabras que codigo pulsaste o mejor dicho que tecla
Select Case KeyCode
Case 64 'pulso @
msgbox "ud pulso la @ por favor no lo haga jajajajaj"
Case 65 'codigo ASCII A
CmdPressA_Click
Case 66 'codigo ASCII A
CmdPressB_Click
.......
End Select
y al identificar que tecla pulsas podras programar su evento o procedimiento
Cualquier duda aqui esta mi correo [email protected] Lima-Peru