怎样判断字符串中只有中文? 中文的高位是特定的你可以参考MSDN具体我可以回去帮你查查 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 试试for ii := 1 to length(yourstring) dobegin if yourstring[ii] > #127 then begin showmessage('有中文字符'); end;end; for i := 1 to length(s) dobegin if ord(s[i]) > $A1 then begin showmessage('Chs'); end;end; 楼上的做法很对!中文汉字的编码信息(ASCII值)是大于127的。 function ByteType(const S: string; Index: Integer): TMbcsByteType;IsDBCSLeadByte告诉你一个非常有用的函数。 bytetype 它可以判断一个字符串中,某个 Char 是单个字母,还是双字节的前一位或后一位。mbSingleByte 单字母mbLeadByte 双字节第一位mbTrailByte 双字节第二位 求教:网络数据包的打包 公司招Delphi开发人员 关于感情的问题。我的话可能有些偏激,不喜欢听的请不要进来。 怎样一台主机控制多台计算机的鼠标和键盘? dxgrid的标题栏文字分两行显示如何实现? 问,如何把tcolor的值存入ini文件或注册表? 在线等待 请问 TcxGrid 能实现象 TStringGrid 类似的功能吗? 关于DBGrid刷新 有谁知道怎么现实考试试题自动生成系统 很急的问题,我的2000任何驱动都安装不上,安装到最后,都说缺少需要的文件,怎么办 第一次提问:有关findkey查询数据库记录。
for ii := 1 to length(yourstring) do
begin
if yourstring[ii] > #127 then
begin
showmessage('有中文字符');
end;
end;
begin
if ord(s[i]) > $A1 then
begin
showmessage('Chs');
end;
end;
IsDBCSLeadByte
告诉你一个非常有用的函数。
bytetype 它可以判断一个字符串中,某个 Char 是单个字母,还是双字节的前一位或
后一位。
mbSingleByte 单字母
mbLeadByte 双字节第一位
mbTrailByte 双字节第二位