如何限制特定字符串！

Question

1,使用pos函数，使用方法请看帮助

Answer 1

var
  I: Integer;
begin
  I := AnsiPos('@', string);
  if I = 0 then
     showmessage('非法字符')如果不是整数则showmessage('非法号码')  不要用 try ...except ...end 来判断。
为何？

Answer 2

2。是使用edit接收字符串吗？
如果是可以在keypress事件中通过限制输入来实现if not (key in ['1'..'9', #8, #13, #27]) then
  key := #0;

Answer 3

能解释下 #8 #13 #27   和 key:=#0  是什么意思吗？

Answer 4

#8不知道
#13回车
#27 Esc
#0使输入字符无效

Answer 5

整数用 StrToIntDef判断看看

Answer 6

#8  好像是按 Tab 键

Answer 7

是不是应该加上 @的ansi？ #64??

Answer 8

if not (key in ['1'..'9', #8, #13, #27,#64]) then
  key := #0;//这里是不是在加个showmessage*（）；？？