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

解決


me  2005-02-12 08:05:09  No: 13163  IP: [192.*.*.*]

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

編集    削除
Kashiken  2005-02-12 08:35:31  No: 13164  IP: [192.*.*.*]

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

編集    削除
me  2005-02-12 09:43:27  No: 13165  IP: [192.*.*.*]

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

編集    削除