간단하게 해결할 수 있는 방법은 Edit의 Event중 KeyPress부분에

약간의 코딩을 해 주시면 될것같은데요..

예를 들어 A라는 문자를 받았을때 라면...

procedure TForm.EditKeyPress(Sender: Tobject; Var Key: Char);
begin
  if Key = 'A' then ShowMessage('Error...');
end;
이런식으로요....  간단하죠...

하여간 key에 관련된 Event에 넣어주시면 되거든요...

도움이 되었으면 좋겠군요... 그럼 좋은 코딩하세요...