Teclas Especiales En Keypress (SOLUCIONADO)


Objetivo: Teclas Especiales En Keypress (SOLUCIONADO)
Ya se que es redundante, pero no lo he encontrado.
Como se que el usuario esta pulsando la tecla <Alt> o <Ctrl> a la vez que la tecla que pulse.

He mirado la ayuda y no lo entiendo
PUBLIC SUB Form_KeyPress()
' KeyPress with Control Key event will often pass through to this Form event.
DIM altSet AS Boolean
TRY altSet = Key.Alt
altSet = IIf( ERROR , FALSE, altSet)
IF altSet THEN
ME.Text = CString(Time) & " True: Control key is being held down"
ELSE
ME.Text = CString(Time) & " False: Control key was not held down"
ENDIF
END


Como se que esta pulsando F5 y la tecla control. ¿Son key.Alt y key.Control funciones?

Gracias por volver sobre los pasos, pero a veces....

Antonio

última edición por ahtonio el Martes, 21 Diciembre 2010, 18:48; editado 1 vez
Perfil MP  
Objetivo: Re: Teclas Especiales En Keypress
Hola

Para preguntar por ALT - F6 lo correcto es
IF (Key.code = Key.f6) AND Key.alt THEN
print "bien"
ENDIF


Para preguntar por CTRL - F6
if (key.code=key.F6) and key.control then
print "bien"
endif


key.alt y key.control devuelven true si están pulsadas en ese momento. Por eso preguntas si está pulsada F6 y preguntas si está pulsada control


última edición por soplo el Martes, 21 Diciembre 2010, 18:45; editado 1 vez
Perfil MP  
Objetivo: Re: Teclas Especiales En Keypress
Muchas gracias, lo sencillo siempre es bien recibido.

Feliz navidad....

Antonio

Perfil MP  

Página 1 de 1


  
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

   

Está utilizando la versión (Lo-Fi). Para ver la versión completa del foro, haga clic aquí.

Powered by Icy Phoenix based on phpBB
Design by DiDiDaDo

Página generada en:: 0.1582s (PHP: -55% SQL: 155%)
Consultas SQL: 25 - Debug off - GZIP Activado