用用:
BOOL IsDBCSLeadByte(
BYTE TestChar // character to test
);
和
BOOL IsDBCSLeadByteEx(
UINT CodePage, // identifier of code page
BYTE TestChar // character to test
);
BOOL IsDBCSLeadByte(
BYTE TestChar // character to test
);
和
BOOL IsDBCSLeadByteEx(
UINT CodePage, // identifier of code page
BYTE TestChar // character to test
);
如果一个字节大于0xa0,而其前后都小于0xa0,则此字节不属于汉字
*---------判断字符串中是否含有高位字符含有汉字
*--入口:字符串
*--返回:.t. 为有汉字字符 .f. 为无汉字符
func SearchCH
para wk_str
noNull=alltrim(wk_str)
returnthis=.f.
for i=1 to len(noNull)
if asc(substr(noNull,i,1))<122
returnthis=.f.
else
returnthis=.t.
exit
endif
endfor
return returnthis