EditBoxの入力を整数限定にしたいのですが
OnKeyPressで

if not (Key in ['0'..'9',#8]) then
begin
　 Key := #0;
end;

という正数表現しか解りません。
一文字だけマイナスも大丈夫とするにはどうしたらいいでしょうか？