TEditの入力で数値のみの入力にするとBackSpaceが使えない対策

解決

me 2005-02-11 23:05:09 No: 13163

過去のTips集＞Delphi Tips に TEditに数値しか入力できないようにするというのがありますが、
これにBackSpaceも使えるようにするのはどのように判別すればよいのでしょうか。

Kashiken 2005-02-11 23:35:31 No: 13164

バックスペースの文字コード（#8）を追加してください。
if not (key in ['0'..'9',#8]) then Key := #0;

me 2005-02-12 00:43:27 No: 13165

無事に完成、即レスありがとうございました〜。