Delphi - Cambiar una cadena de strings a Mayúsculas

Por favor, alguién me podría decir como puedo cambiar a Mayúsculas una cadena de Strings que se ingrese dentro de un edit y me la guarde a una tabla.
Gracias.

usa UpperCase
si te es mas facil, cambia el CharCase a ecUpperCase y lo que escribas en el Edit se convertirá automaticamente en mayusculas

suerte