控制Edit只能输入数字时报的错误**

zhengpeijin

控制Edit只能输入数字时报的错误
[错误]Biz:\ZHAJ_DS\RYXX\RYINFO.INFO.DIR\RYXXDJ.FormDoc.pas(159, 11): Incompatible types: "Ordinal" and "Char&"
代码是这样写的：
begin
  if not (key in ['0'..'9','.',#8]) then       //#8为backspace
  begin
    key   :=   #0;
  end;
end;
请问应该怎么改？

jiahaiminghr

case key of
   '0'..'9': ;
   #8: ;
   '.': ;
   else key   :=   #0;
  end;

julio

尽量不用EDIT这样的控件，而是用一个数据集的临时字段来取代，避免因为输入规则带来的麻烦！