Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Tecla Bloq Mayscula (https://www.clubdelphi.com/foros/showthread.php?t=39405)

Onti 18-01-2007 23:38:06

Tecla Bloq Mayscula
 
Hola amigos:

Alguien sabe como detectar si la tecla "Bloq Mayus" esta presionada?


gracias y salu2

roman 18-01-2007 23:49:40

Código Delphi [-]
if GetKeyState(VK_CAPITAL) and $01 <> 0 then
  ShowMessage('Prendido')
else
  ShowMessage('Apagado')

// Saludos

Onti 18-01-2007 23:51:30

Ok, gracias Roman

roman 18-01-2007 23:54:07

Leí mal; lo anterior te dice si está activada o no. Para ver si está presionada sería así:

Código Delphi [-]
if GetKeyState(VK_CAPITAL) and $8000 <> 0 then
  ShowMessage('Prsionada')
else
  ShowMessage('Sin presionar')

// Saludos

ContraVeneno 19-01-2007 02:01:49

Si el foquito del teclado con un símbolo "A" esta encendido, entonces la tecla esta activa. :D:D:D:D

Onti 19-01-2007 16:28:53

ContraVeneno esta un poco difícil de implementar ese código, pero aun mas difícil es dejar de reír :D


La franja horaria es GMT +2. Ahora son las 04:06:21.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi