求助高手，我想在tedit 控件中只输入数字，怎么实现啊？

Question

我这代码实现上述功能发生了错误，是为什么啊？
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not(key in['0'..'9',#8])  then
　　　　begin
　　　　　key:=#0;
　　　　　MessageBeep(1);
　　　　end;end;

Answer 1

没看出有什么不对,要不你把//MessageBeep(1);  注销掉试试
提示什么?

Answer 2

[Error] Unit1.pas(51): Illegal character in input file: '　' ($A1A1)
这就是提示啊，高手

Answer 3

try
   time:=StrTofloat(Edit1.Text);
 except
   begin
     ShowMessage('请您输入合法的数字') ;
     Edit1.Text:='';
     Edit1.SetFocus;
     Exit;
   end;
 end;

Answer 4

if not (key in ['0'..'9',#8])  then　key := #0;这个绝对是正确的！！！