命令名称:文本_是否为汉字

得罪人的血债

模块版本:V3.47-最新版本
所用系统:XP 32位
命令名称:文本_是否为汉字
BUG描述:是根据区位表找的,只有6000多字,汉字不止6000多字,所以部分字体无法查到,例如:“囧”字
我的联系QQ:1318185638(也可以短消息我)
问题源码:
[e]
信息框 (到文本 (文本_是否为汉字 (“囧”)), 0, )
[/e]
改善源码:
[e]
.版本 2
.支持库 RegEx

.子程序 文本_是否为汉字, 逻辑型, 公开
.参数 汉字, 文本型
.局部变量 正则, 正则表达式
.局部变量 局_文本, 文本型
.局部变量 局_计次, 整数型
.局部变量 搜索结果, 搜索结果, , "0"

汉字 ＝ 取文本左边 (汉字, 2)
正则.创建 (“[^\x20-\x7f]”, )
搜索结果 ＝ 正则.搜索全部 (汉字)
.计次循环首 (取数组成员数 (搜索结果), 局_计次)
    局_文本 ＝ 局_文本 ＋ 搜索结果 [局_计次].取匹配文本 (汉字, )
.计次循环尾 ()
.如果真 (局_文本 ＝ “”)
    返回 (假)
.如果真结束
返回 (真)
[/e]
支持生僻字,越生僻越好!@御风软件

御风软件

用正则的，不好吧，我之前就想到了这个了，但是加个正则上去，要加载正则类的

而且，我想的那个也没有你这么复杂，因为传入的是一个汉字，取前面2个字节，然后，直接取匹配数量就行了