Simular Caps Lock

[groiss]

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
Así lo interrogaría al entrar en la aplicación y de ser necesario lo activaría.
Un saludo y gracias
José Luis

[Antonio Linares]

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

[joseluisysturiz]

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...

[groiss]

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