|
|
|
|
- Para gestionar todas las teclas del teclado con KeyPressed:
- Probar una combinación de teclas
- Interrumpir una Process en un bucle de navegación
- Status asincrónico reporte
- Usando la función KeyPressed
Comprueba qué tecla está pulsada.
// Include the "KeyConst.wl" file to manage the keyboard keys EXTERN "KeyConst.WL" FOR I = 1 TO 5000 HourGlass(True) Multitask(-1) // Check Space key IF KeyPressed(VK_SPACE) = True THEN Info("Space key down") // Check A key IF KeyPressed(Asc("A")) = True THEN Trace("A key down") END HourGlass(False)
Sintaxis
<Result> = KeyPressed(<Constant> [, <Change of status>])
<Result>: booleano - True si la tecla de control está presionada o ha cambiado de estado desde la última vez que se llamó a la función KeyPressed,
- False en caso contrario.
<Constant>: Constante de tipo Integer Identifica la clave de control: | | kpAlt | Tecla Alt. | kpControl | Tecla Ctrl. | kpEscape | Tecla Esc. | kpLButton | Botón izquierdo del ratón.
| kpRButton | Botón derecho del ratón.
| kpShift | Tecla Mayús. |
Existen constantes adicionales en el archivo "KeyConst.wl".. Estas constantes se utilizan para identificar todas las teclas del teclado. Este archivo está disponible en el subdirectorio WINDEV "Personal\External". <Change of status>: Booleano opcional - True (valor predeterminado) para obtener un informe síncrono: actualmente presionada,
- False para obtener un informe asíncrono: el estado de la tecla ha cambiado desde la última vez que se llamó a la función KeyPressed.
Observaciones Para gestionar todas las teclas del teclado con KeyPressed: - Incluya el archivo KeyConst.WL en su proyecto. Este archivo asocia una constante específica con cada tecla del teclado. Este archivo está disponible en el directorio \Personal\Externo de WINDEV. Para incluir este archivo en sus aplicaciones, debe utilizar la palabra clave EXTERN de la siguiente manera:
- Utilice las constantes en la función KeyPressed:
IF KeyPressed(VK_Space) THEN...
Observaciones: - Para gestionar las claves de los caracteres, basta con utilizar el código ASCII de ese carácter (devuelto por Asc).
- Todas las constantes encontradas en el archivo KeyConst.WL comienzan con las letras VK_.. Estas constantes son mostradas por el completador de código en el editor de código desde el momento en que el archivo ha sido integrado con la palabra clave EXTERN.
Probar una combinación de teclas Para ejecutar la prueba de una combinación de teclas, ejecute la prueba de dos teclas pulsadas: IF KeyPressed(kpShift) AND KeyPressed(VK_TAB) THEN Trace("OK") END
Interrumpir una Process en un bucle de navegación En un bucle, para interrumpir el proceso pulsando la tecla Esc, debe utilizarse la función # Multitask antes de la función KeyPressed. Ejemplo: HReadFirst(Customer, CustNum) WHILE HOut() = False // Abandon via Esc? Multitask(-1) IF KeyPressed(kpEscape) = True THEN BREAK // Process HReadNext(Customer, CustNum) END
Status asincrónico reporte Para evitar la recuperación de una tecla pulsada con anterioridad (en otra Process por ejemplo), el estado de la tecla a probar debe ser reiniciado por el siguiente Line de código:
Esta página también está disponible para…
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|