网站导航免费论文 原创论文 论文搜索 原创论文 网学软件 学术大家 资料中心 会员中心 问题解答 原创论文 论文素材 设计下载 最新论文 下载排行 论文上传 在线投稿 联系我们
返回网学首页
网学联系
最新论文 推荐专题 热门论文 素材专题
当前位置: 网学 > 编程文档 > DELPHI > 正文
Delphi 计算汉字比画的函数
来源:Http://myeducs.cn 联系QQ:点击这里给我发消息 作者: 用户投稿 来源: 网络 发布时间: 12/10/12
下载{$ArticleTitle}原创论文样式

function GetBiHua(chnstr:string):integer; 
const 
BiHuaTable= 
#10#7#10#10#8#10#9#11#17#14#13#5#13#10#12#15+ 
#10#6#10#9#12#8#10#10#8#8#10#5#10#14#16#9+ 
#12#12#15#15#7#10#5#5#7#10#2#9#4#8#12#13+ 
#7#10#7#21#10#8#5#9#6#13#8#8#9#13#12#10+ 
#13#7#10#10#8#8#7#8#7#19#5#4#8#6#9#10+ 
#14#14#9#12#15#10#15#12#12#8#9#5#15#10#16#13+ 
#9#12#8#8#8#7#15#10#13#19#8#13#12#8#5#12+ 
#9#4#9#10#7#8#12#12#10#8#8#5#11#11#11#9+ 
#9#18#9#12#14#4#13#10#8#14#13#14#6#10#9#4+ 
#7#13#6#11#14#5#13#16#17#16#9#18#5#12#8#9+ 
#9#8#4#16#16#17#12#9#11#15#8#19#15#7#15#11+ 
#12#16#13#10#13#7#6#9#5#8#9#9#10#6#9#11+ 
#15#8#10#8#12#9#13#10#14#7#8#11#11#14#12#8+ 
#7#10#2#10#7#11#4#5#7#19#10#8#17#11#12#7+ 
#3#7#13#15#8#11#11#14#16#8#10#9#11#11#7#7+ 
#10#4#7#17#16#16#15#11#9#8#12#8#5#9#7#19+ 
#12#3#9#9#9#14#12#14#7#9#8#8#10#10#12#11+ 
#11#12#11#13#11#6#11#19#8#11#6#9#11#4#11#7+ 
#2#12#8#11#10#12#7#9#12#15#15#11#7#8#4#7+ 
#15#12#7#15#10#6#7#6#11#7#7#7#12#8#15#10+ 
#9#16#6#7#8#12#12#15#8#8#10#10#10#6#13#9+ 
#11#6#7#6#6#10#8#8#4#7#10#5#9#6#6#6+ 
#11#8#8#13#12#14#13#13#13#4#11#14#4#10#7#5+ 
#16#12#18#12#13#12#9#13#10#12#24#13#13#5#12#3+ 
#9#13#6#11#12#7#9#12#15#7#6#6#7#8#11#13+ 
#8#9#13#15#10#11#7#21#18#11#11#9#14#14#13#13+ 
#10#7#6#8#12#6#15#12#7#5#4#5#11#11#15#14+ 
#9#19#16#12#14#11#13#10#13#14#11#14#7#6#3#14+ 
#15#12#11#10#13#12#6#12#14#5#3#7#4#12#17#9+ 
#9#5#9#11#9#11#9#10#8#4#8#10#11#9#5#12+ 
#7#11#11#8#11#11#6#9#10#9#10#2#10#17#10#7+ 
#11#6#8#15#11#12#11#15#11#8#19#6#12#12#17#14+ 
#4#12#7#14#8#10#11#7#10#14#14#7#8#6#12#11+ 
#9#7#10#12#16#11#13#13#9#8#16#9#5#7#7#8+ 
#11#12#11#13#13#5#16#10#2#11#6#8#10#12#10#14+ 
#15#8#11#13#2#7#5#7#8#12#13#8#4#6#5#5+ 
#12#15#6#9#8#9#7#9#11#7#4#9#7#10#12#10+ 
#13#9#12#9#10#11#13#12#7#14#7#9#12#7#14#12+ 
#14#9#11#12#11#7#4#5#15#7#19#12#10#7#9#9+ 
#12#11#9#6#6#9#13#6#13#11#8#12#11#13#10#12+ 
#9#15#6#10#10#4#7#12#11#10#10#6#2#6#5#9+ 
#9#2#9#5#9#12#6#4#9#8#9#18#6#12#18#15+ 
#8#8#17#3#10#4#7#8#8#5#7#7#7#7#4#8+ 
#8#6#7#6#6#7#8#11#8#11#3#8#10#10#7#8+ 
#8#8#9#7#11#7#8#4#7#7#12#7#10#8#6#8+ 
#12#12#4#9#8#13#10#12#4#9#11#10#5#13#6#8+ 
#4#7#7#4#15#8#14#7#8#13#12#9#11#6#9#8+ 
#10#11#13#11#5#7#7#11#10#10#8#11#12#8#14#9+ 
#11#18#12#9#12#5#8#4#13#6#12#4#7#6#13#8+ 
#15#14#8#7#13#9#11#12#3#5#7#9#9#7#10#13+ 
#8#11#21#4#6#9#9#7#7#7#12#7#16#10#10#14+ 
#10#16#13#15#15#7#10#14#12#4#11#10#8#12#9#12+ 
#10#12#9#12#11#3#6#9#10#13#10#7#8#19#10#10+ 
#11#3#7#5#10#11#8#10#4#9#3#6#7#9#7#6+ 
#9#4#7#8#8#9#8#8#11#12#11#8#14#7#8#8+ 
#8#13#5#11#9#7#8#9#10#8#12#8#5#9#14#9+ 
#13#8#8#8#12#6#8#9#6#14#11#23#11#20#8#6+ 
#3#10#13#8#6#11#5#7#9#6#9#8#9#10#8#13+ 
#9#8#12#13#12#12#10#8#8#14#6#9#15#9#10#10+ 
#6#10#9#12#15#7#12#7#11#12#8#12#7#16#16#10+ 
#7#16#10#11#6#5#5#8#10#17#17#14#11#9#6#10+ 
#5#10#8#12#10#11#10#5#8#7#6#11#13#9#8#11+ 
#14#1

  • 上一篇资讯: Delphi预编译指令说明
  • 下一篇资讯: DELPHI字符串分割函数
  • 网学推荐

    免费论文

    原创论文

    浏览:
    设为首页 | 加入收藏 | 论文首页 | 论文专题 | 设计下载 | 网学软件 | 论文模板 | 论文资源 | 程序设计 | 关于网学 | 站内搜索 | 网学留言 | 友情链接 | 资料中心
    版权所有 QQ:3710167 邮箱:3710167@qq.com 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2015 myeducs.Cn www.myeducs.Cn All Rights Reserved
    湘ICP备09003080号