Delphi判断字符串是否是数字、字母、大小写字母
摘要:
function IsNumberic(Vaule:String):Boolean; //判断Vaule是不是数字vari:integer;beginresult:=true; //设置返回值为 是(真)Vaule:=trim(Vaule); //去空格 for i:=1 to length(Vaule) do //准备循环 begin if not (Vaule[i] in ['0'..'9']) then //如果Vaule的第i个字不是0-9中的任一个 begin result:=false; //返回值 不是(假) ... 阅读全文
posted @ 2013-07-12 13:00 哈哈哈哈BBA 阅读(9201) 评论(1) 推荐(0) 编辑