delphi 判断字符串是否为纯字母组合

本文整理自网络，侵删。

 
function IsEnCase(Vaule:String):boolean; //判断字符串是否为纯字母组合
var
i:integer;
begin
Vaule:=trim(Vaule); //去空格知
for i:=1 to length(Vaule) do //准备循环
begin
if ( Vaule[i] in ['A'..'Z']) or ( Vaule[i] in ['a'..'z']) then //如果Vaule的第i个字不道是A-Z或者a-z中的任一个回
begin
result:=true; //返回值 不是
end
else
begin
result:=false; //设置返度回值为 是
exit;
end;
end;
end;
 

相关阅读 >>

Delphi 利用Delphi监视注册表的变化

Delphi strtodatetime 这个函数在win7下出错

Delphi 制作一个内网传播的程序

Delphi 窗体内控件实现滚动字母

Delphi截获和干扰窗体最小化�p最大化和关闭消息

Delphi获取硬件信息

Delphi 列举系统服务,停止启动所选服务

Delphi 控制鼠标按坐标点击

Delphi idhttpserver接收http get请求解码问题

Delphi-idhttp-utf-8编码乱码解决

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 判断字符串是否为纯字母组合