DELPHI FIVE EDITTEXTの入力制限 (ID:36613)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 TEditであれば、OnKeyPressイベントはいかがですか？ procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not (Key in ['a'..'e']) then Key := #0; end;