Cambiar Mayusculas A Dbmemo

[Neftali [Germán.Estévez]]

Hola, te recomiendo que leas la Guía de estilo.

Con éste código puedes conseguir que lo que se escribe aparezca en mayúsclas (evento OnKeyPress):

Código Delphi [-]
procedure TForm1.Memo1KeyPress(Sender: TObject; var Key: Char);
begin
  key := UpperCase(Key)[1];
end;

Queda sin resolver la opción de que "peguen" un texto desde el portapapeles, por ejemplo. Para eso tendrás que modificar todo el texto al acabar (por ejemplo en el OnExit, que también es una opción válida aunque no utilices el código anterior).

[susy]

Hola Neftali, las dos sugerencias que me hiciste el favor de darme me han sido de gran utilidad. Como verás, soy novata, una disculpa hee.
Ya probe tu respuesta y me dio el resultado que esparaba, muchisimas gracias.