Clarion - Numlock

 
Vista:

Numlock

Publicado por Gerardo (8 intervenciones) el 05/05/2007 15:18:33
Alguien tiene idea de como se puede activar y desactivar la función NumLock desde dentro de un programa clarion?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Numlock

Publicado por Carlos (12 intervenciones) el 26/05/2007 09:09:35
Hola Gerardo! Aca te paso una forma de hacerlo, es la que yo utilizo, seguramente debe haber otras...

***************************************************************************************
En "Inside the Global Map" agrega:

MODULE('Keyboard Functions')
GetKeyState(SIGNED),SIGNED,PASCAL
END

Esta funcion se utiliza para saber cual es el estado (en este caso del NumLock)

***************************************************************************************

Luego en el lugar que quieras del programa solo tenes que agregar:

If GetKeyState(90h) Then
!!!! esta activado
else
!!!! esta desactivado
.

segun lo que quieras hacer en el "IF" pone la siguiente linea:

presskey(90h) !con esta linea cambias el estado de la tecla si esta prendida la apagas, si esta apagada la prendes. Para hacer lo mismo con el CapsLock cambia el valor "90h" por "14h".

Espero que todavia te sirva y saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Numlock

Publicado por Gerardo (8 intervenciones) el 26/05/2007 15:39:27
Muchisimas gracias Carlos, funciona perfectamente, me estaba enloquesiendo
para resolver este problema con las funciones peek poke, nuevamente gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Numlock

Publicado por Carlos (12 intervenciones) el 27/05/2007 06:25:15
De nada Gerardo!!!
Cualquier otra duda que tengas hacemelo saber, si esta dentro de mis posibilidades poder ayudarte con gusto lo haré.
Saludos, Carlos...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar