En C++ Builder 6, los objetos TEdit tienen una propiedad llamada CharCase en la que podemos seleccionar la opción ecUpperCase para obligar a que se capture en mayúsculas en ese objeto sin importar si el usuario selecciona minúsculas en su teclado.
Los objetos TMemo no cuentan con esa opción, si queremos obtener un efecto equivalente a poner ecUpperCase en la propiedad CharCase de los objetos TEdit, podemos poner el siguiente código en el evento OnKeyPress del TMemo:
switch (Key)
{
case 'ñ':
Key = 'Ñ';
break;
case 'á':
Key = 'Á';
break;
case 'é':
Key = 'É';
break;
case 'í':
Key = 'Í';
break;
case 'ó':
Key = 'Ó';
break;
case 'ú':
Key = 'Ú';
break;
default :
Key = UpCase(Key);
}
Etiquetas: C++ Builder, Mayusculas en TMemo
