FoxPro/Visual FoxPro - Lower a Upper

Hola... como estan.... ?? me da mucho gusto saludarles...
deseo me puedan ayudar con lo siguiente...

deseo que al cargar mi aplicacion.. Si esta el Block Mayusculas apagado.. o que no este el LED encendido... haya algo para encenderlo y activar el Block-may.. y no estar en cada form diciendole... xdato=Upper(Thisform.xdato.Value)... etc.. o con un SetAll

saludos
amado

Utiliza la mascara del objeto de la caja de texto inmputmask y la propiedad format

capslock()=.T.

Te aconsejo que hagas lo que dice sergio o lo que estabas haciendo vos, ya que por mas que utilices el CapsLock()=.T. el usuario lo puede deshabilitar.

OK.. Muy bien...
voy a dejarlo como esta... ya que todos los text de los form de mi proy.. ya tienen las mask correspondientes...

1000 gracias..
saludos