DBEdit solo en Mayúsculas

[dec]

Hola,

Tal vez bastaría conque en el evento "OnExit" del "TDbEdit" codificaras algo como esto:

Código Delphi [-]
  DBEdit1.Text := UpperCase(DBEdit1.Text);

O quizás bastaría conque dejases el "TDbEdit" en minúsculas y luego, a la hora de buscar lo que sea menester utilizaras la función "UpperCase" que puede verse en el código de arriba. De ese modo el usuario no vería un "cambio extraño" de minúsculas a mayúsculas en el "TDbEdit".

[el_barto]

en caso de que se escriba la ñ es mejor usar:

Key := AnsiUpperCase(Key)[1];

[dec]

Hola,

Empezado por el_barto

en caso de que se escriba la ñ (...)

Pues así es la verdad. Muchas gracias el_barto, por el dato, que no conocía

[[maeyanes]]

No te sirve la propiedad CharCase del TDBEdit? Estableces el valor de la propiedad a ecUpperCase y todo lo que los usuarios escriban estará en mayúsculas.



Saludos...

[dec]

Hola,

Aquí, aquí es donde viene pintiparado decir que cuatro ojos ven más que dos. En este caso seis ojos y, si se apura, ocho ojos