本文整理自网络,侵删。
//判断字符是否是汉字 function IsHZ(ch: WideChar): boolean; var i:integer; begin i:=or d(ch); if( i<19968) or (i>40869) then result:=false else result:=true; end;
ByteType字符串中判断是否英文
ByteType('123你好吗',1)=mbSingleByte//单字节ByteType('123你好吗',4)=mbLeadByte//双字节字符的第一个字符ByteType('123你好吗',5)=mbTrailByte//双字节字符的第二个字符 function IsMBCSChar(const ch: Char): Boolean;begin Result := (ByteType(ch, 1) <> mbSingleByte);end;是否中文(简体,繁体)
相关阅读 >>
Delphi tfinddialog treplacedialog对话框在memo中的使用
Delphi sizetostr 文件大小转换kb mb gb tb
Delphi pagecontrol.ttabsheet与drivecombobox.items同步
Delphi android应用程序中的java ui线程中执行处理
更多相关阅读请进入《Delphi》频道 >>