Delphi 判断字符串是否是单词

本文整理自网络，侵删。

 
function IsEnglishWord(strWord  : string) : Boolean;
var
  i : Integer;
begin
  Result  := True;
  for i := 1 to Length(strWord) do
  begin
    if not (strWord[i] in ['A'..'Z','a'..'z']) then  Exit(False);
  end;
end;
 

相关阅读 >>

Delphi中ado异步执行方式

Delphi 关于datetimepicker的一点问题（同时修改日期和时间的实现）

Delphi设置光标在edit右边

Delphi splitter 控件属性及作用

Delphi firedac mysql 连接

Delphi tstringlist删除重复项

Delphi 在richedit中插入gif图片的方法

Delphi listview的用法

Delphi 字符串替换

Delphi自带皮肤的使用

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

转载请注明出处：木庄网络博客 » Delphi 判断字符串是否是单词