es estrictamente necesario hacer esa validación?
En un TEdit tienes la propiedad "CharCase" que si la pones en "ecLowerCase" automáticamente permite ingresas solo caracteres en minuscula.
Sino otra opción podría ser:
Código Delphi
[-]
var s : string;
s := LowerCase(edit1.text);
Espero que te sirva. Saludos.