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 vcl gif 动画

Delphi 把字符串复制到剪贴板

Delphi 不可移动的窗体

Delphi 批量给每个字符加括号

Delphi 关于rs485总线通信协议开发注意事项

Delphi thttprio 控件调用webservice超时问题

Delphi remobjects，您值得拥有

Delphi 控制台base64加密解密

Delphi 详解variant 的相关函数

Delphi 定时鼠标模拟点击

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

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