Как разрешить ввод в TEdit только на английском языке

Как сделать так, чтобы в компонент TEdit можно было вводить текст только на английской раскладке?

когда TEdit получает фокус, надо вызвать:

ActivateKeyboardLayout($409, 0);

если этого мало, тогда почитай про WM_INPUTLANGCHANGE