本文小编为大家详细介绍“delphi怎么判断字符串是否为纯字母组合”,内容详细,步骤清晰,细节处理妥当,希望这篇“delphi怎么判断字符串是否为纯字母组合”文章能帮助大家解决疑惑,下面跟着小编的思路慢慢深入,一起来学习新知识吧。
代码
function IsEnCase(Vaule:String):boolean; //判断字符串是否为纯字母组合vari:integer;beginVaule:=trim(Vaule); //去空格知for i:=1 to length(Vaule) do //准备循环beginif ( Vaule[i] in ['A'..'Z']) or ( Vaule[i] in ['a'..'z']) then //如果Vaule的第i个字不道是A-Z或者a-z中的任一个回beginresult:=true; //返回值 不是endelsebeginresult:=false; //设置返度回值为 是exit;end;end;end;
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; //返回值 不是(假) exit; //退出函数 end; end;end;function IsUpperCase(Vaule:String):Boolean; //判断Vaule 是不是大写字母vari:integer;beginresult:=true; //设置返回值为 是Vaule:=trim(Vaule); //去空格 for i:=1 to length(Vaule) do //准备循环 begin if not (Vaule[i] in ['A'..'Z']) then //如果Vaule的第i个字不是A-Z中的任一个 begin result:=false; //返回值 不是 exit; //退出函数 end; end;end;function IsLowerCase(Vaule:String):Boolean; //判断Vaule 是不是小写字母vari:integer;begin result:=true; //设置返回值为 是Vaule:=trim(Vaule); //去空格 for i:=1 to length(Vaule) do //准备循环 begin if not (Vaule[i] in ['a'..'z']) then //如果Vaule的第i个字不是a-z中的任一个 begin result:=false; //返回值 不是 exit; //退出函数 end; end;end;同理 如果想判断是不是字母的话function IsEnCase(Vaule:String):boolean; //判断Vaule 是不是字母vari:integer;begin result:=true; //设置返回值为 是Vaule:=trim(Vaule); //去空格 for i:=1 to length(Vaule) do //准备循环 begin if (not (Vaule[i] in ['A'..'Z'])) or (not (Vaule[i] in ['a'..'z'])) then //如果Vaule的第i个字不是A-Z或者a-z中的任一个 begin result:=false; //返回值 不是 exit; //退出函数 end; end;end;
读到这里,这篇“delphi怎么判断字符串是否为纯字母组合”文章已经介绍完毕,想要掌握这篇文章的知识点还需要大家自己动手实践使用过才能领会,如果想了解更多相关内容的文章,欢迎关注编程网行业资讯频道。