FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Simular Caps Lock
Posts: 234
Joined: Tue Sep 01, 2009 07:55 AM
Simular Caps Lock
Posted: Wed May 07, 2014 05:27 AM

Hola:
En una aplicación se me plantea la necesidad de forzar a que el usuario use continuamente las mayúsculas, ¿existe alguna forma de comprobar el estado de CAPS LOCK?, y ¿existe la forma de poner su estado como activo?, evidentemente por software :D
Así lo interrogaría al entrar en la aplicación y de ser necesario lo activaría.
Un saludo y gracias
José Luis

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Simular Caps Lock
Posted: Wed May 07, 2014 05:32 PM

La Clase TMsgBar usa un timer que constantemente hace esa comprobación y muestra ó no el estado de CAPs en la barra inferior.

Puedes comprobar el estado con:
GetKeyToggle( VK_CAPITAL ) --> lYesNo

Y puedes forzar su cambio con:
KeyToggle( VK_CAPITAL )

el valor de VK_CAPITAL es 20 y esta definido en vkey.ch

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 2064
Joined: Fri Jan 06, 2006 09:28 PM
Re: Simular Caps Lock
Posted: Wed May 07, 2014 06:57 PM

No seria mas facil si en los GET usas PICTURE "@!" o cuando definas los recursos le hagas en el disenador de recurso UPPER CASE SI.?, por lo menos asi lo hago con Pelles C y forzo sin el picture que siempre se use MAYUSCULA, especialmente para la creacion de valores de campos unicos, saludos... :shock:

Dios no está muerto...



Gracias a mi Dios ante todo!
Posts: 234
Joined: Tue Sep 01, 2009 07:55 AM
Re: Simular Caps Lock
Posted: Thu May 08, 2014 05:18 AM

Muchas gracias a ambos.
José Luis no me había dado cuenta de esa posibilidad en los controles, desde el editor de recursos.
Un saludo
José Luis

Continue the discussion