怎么辨别0到9和a到z的字符！

怎么在if语句里写，如果输入的是0到9之间的字符就执行if里的语句！
急！谢谢！

解决方案 »

  1.   

    if x in ['0'..'9', 'a'..'z'] then ...;
      

  2.   

    同意上面的简单方法
    也可以判断它的asiic码！
      

  3.   

    procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
    begin
       if x in ['0'..'9', 'a'..'z'] then ...;
       
    end;
      

  4.   

    我不是在FormKeyPress里写！是在Button1Click里写！
    在Button1Click里写，x要char型！可不可以用string型呀！
    如果要用asiic码判断，要怎么写呀？
      

  5.   

    你也可以判断他的Asc码只要asc码值在48－57之间就是0－9的数字！
      

  6.   

    用ASCII码怎么写呀？能不能各位大虾举个例子！
      

  7.   

    如果你是整个字符串，就用
    for i:=1 to Length(Str) do
     if Str[i] in ['0'..'9', 'a'..'z'] then  ...如果是单字符
     if Str[Length(Str)] in ['0'..'9', 'a'..'z'] then  ...
      

  8.   

    还有，如果再FormKeyPress里面写要判断是不是回车呀！
      

  9.   

    if (x>=ord('0') and x<=ord('9') ) or (x>=ord('a') and x<=ord('z')) then
      

  10.   

    if Str[Length(Str)] in ['0'..'9', 'a'..'z', #13] then  ...
      

  11.   

    要是你的X是CHAR型的话 那不等式左边应该是ord(x)