Portal    Foro    Buscar    FAQ    Registrarse    Conectarse

Portal » Foro » Gambas » General

Fecha y hora actual: Viernes, 10 May 2024, 19:08 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Key.capslock


Publicar nuevo tema  Responder al tema  		Página 1 de 1
 
 
Key.capslock
Autor Mensaje
Desconectado tomas Sexo: Masculino
Usuario
Usuario
avatar
Registrado: Febrero 2010
Mensajes: 33
Edad: 57

 
 
Responder citando   Descargar mensaje  
Mensaje Key.capslock 
 
Hola a todos

Hay alguna forma de saber por código cuando esta pulsada esta tecla (BloqMayús)?
Con cualquier otra, por ejemplo key.shift:

Dim xtecla as boolean
xtecla=key.shift  'me da true si está pulsada y false si no lo está.

Pero con la tecla BloqMayús (Key.CapsLock) siempre me da true.
Se me está pasando algo?

Gracias a todos
 



 
#1  Lunes, 11 Junio 2012, 19:23
tomas - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado Enchufadoo Sexo: Masculino
Aprendiz
Aprendiz
avatar
Registrado: Agosto 2010
Mensajes: 50
Edad: 37
Ubicación: argentina.png
 
 
Responder citando   Descargar mensaje  
Mensaje Re: Key.capslock 
 
Hola, yo habia visto esta respuesta buscando lo mismo

http://www.mail-archive.com/gambas-...t/msg02832.html

' gambas class file
PUBLIC SUB Form_Open()
  
  DIM hObservador AS Observer
  hObservador = NEW Observer(ME) AS "Main"
  
END

PUBLIC SUB Main_KeyPress()
  DIM sShellOutput AS String
  DIM iKeyLocks AS Integer
  
  SHELL "xset q | grep 'LED mask:' | grep -o 0000000." TO sShellOutput

  iKeyLocks = Val(sShellOutput)  
    
  SELECT iKeyLocks
    CASE 0
      PRINT "Todo apagado"
    CASE 1
      PRINT "CapsLock Prendido"
    CASE 2
      PRINT "NumLock Prendido"
    CASE 3
      PRINT "CapsLock Prendido & NumLock Prendido"
  
  END SELECT
END

 



 
#2  Martes, 12 Junio 2012, 23:39
Enchufadoo - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Desconectado tomas Sexo: Masculino
Usuario
Usuario
avatar
Registrado: Febrero 2010
Mensajes: 33
Edad: 57

 
 
Responder citando   Descargar mensaje  
Mensaje Re: Key.capslock 
 
Perfecto

Gracias por tu ayuda
 



 
#3  Jueves, 14 Junio 2012, 21:45
tomas - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Portal » Foro » Gambas » General

Fecha y hora actual: Viernes, 10 May 2024, 19:08 • Todas las horas son UTC + 1 Hora
Ver tema anterior Temas recientes Habilitar biblioteca Descargar tema Versión imprimible Correo a un amigo Ver siguiente tema

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

 
Lista de permisos
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


  

 
cron