delphi自动生成拼音汉字反查到拼音.docx

delphi自动生成拼音汉字反查到拼音.docx

《delphi自动生成拼音汉字反查到拼音.docx》由会员分享，可在线阅读，更多相关《delphi自动生成拼音汉字反查到拼音.docx（31页珍藏版）》请在冰豆网上搜索。

delphi自动生成拼音汉字反查到拼音

unitIMCode;//简化版拼音反查单元

interface

{iMode二进制功能位说明

XXXXXXXXXXXXXXXX

321

1:

0-只取各个汉字声母的第一个字母;1-全取

2:

0-遇到不能翻译的字符不翻译;1-翻译成'?

'（本选项目针对全角字符）

3:

0-生成的串不包括非数字,字母的其他字符;1-包括

（控制全角的要输出非数字,字母字符的;半角的非数字,字母字符）

}

functionMakeSpellCode（stText:

string;iMode,iCount:

Integer）:

string;

functionGetSpellCode（szText:

PChar;iMode,iCount:

Integer）:

PChar;stdcall;

implementation

uses

SysUtils;

type

{拼音代码表}

TPYCode=record

PYCode:

string[6];

end;

TFPYCodes=array[1..126,1..191]ofTPYCode;

const

PYMUSICCOUNT=405;

PyMusicCode:

array[1..PYMUSICCOUNT]ofstring[6]={汉字基本发音表}（

'a','ai','an','ang','ao','ba','bai','ban','bang','bao',

'bei','ben','beng','bi','bian','biao','bie','bin','bing','bo',

'bu','ca','cai','can','cang','cao','ce','ceng','cha','chai',

'chan','chang','chao','che','chen','cheng','chi','chong','chou','chu',

'chuai','chuan','chuang','chui','chun','chuo','ci','cong','cou','cu',

'cuan','cui','cun','cuo','da','dai','dan','dang','dao','de',

'deng','di','dian','diao','die','ding','diu','dong','dou','du',

'duan','dui','dun','duo','e','en','er','fa','fan','fang',

'fei','fen','feng','fu','fou','ga','gai','gan','gang','gao',

'ge','ji','gen','geng','gong','gou','gu','gua','guai','guan',

'guang','gui','gun','guo','ha','hai','han','hang','hao','he',

'hei','hen','heng','hong','hou','hu','hua','huai','huan','huang',

'hui','hun','huo','jia','jian','jiang','qiao','jiao','jie','jin',

'jing','jiong','jiu','ju','juan','jue','jun','ka','kai','kan',

'kang','kao','ke','ken','keng','kong','kou','ku','kua','kuai',

'kuan','kuang','kui','kun','kuo','la','lai','lan','lang','lao',

'le','lei','leng','li','lia','lian','liang','liao','lie','lin',

'ling','liu','long','lou','lu','luan','lue','lun','luo','ma',

'mai','man','mang','mao','me','mei','men','meng','mi','mian',

'miao','mie','min','ming','miu','mo','mou','mu','na','nai',

'nan','nang','nao','ne','nei','nen','neng','ni','nian','niang',

'niao','nie','nin','ning','niu','nong','nu','nuan','nue','yao',

'nuo','o','ou','pa','pai','pan','pang','pao','pei','pen',

'peng','pi','pian','piao','pie','pin','ping','po','pou','pu',

'qi','qia','qian','qiang','qie','qin','qing','qiong','qiu','qu',

'quan','que','qun','ran','rang','rao','re','ren','reng','ri',

'rong','rou','ru','ruan','rui','run','ruo','sa','sai','san',

'sang','sao','se','sen','seng','sha','shai','shan','shang','shao',

'she','shen','sheng','shi','shou','shu','shua','shuai','shuan','shuang',

'shui','shun','shuo','si','song','sou','su','suan','sui','sun',

'suo','ta','tai','tan','tang','tao','te','teng','ti','tian',

'tiao','tie','ting','tong','tou','tu','tuan','tui','tun','tuo',

'wa','wai','wan','wang','wei','wen','weng','wo','wu','xi',

'xia','xian','xiang','xiao','xie','xin','xing','xiong','xiu','xu',

'xuan','xue','xun','ya','yan','yang','ye','yi','yin','ying',

'yo','yong','you','yu','yuan','yue','yun','za','zai','zan',

'zang','zao','ze','zei','zen','zeng','zha','zhai','zhan','zhang',

'zhao','zhe','zhen','zheng','zhi','zhong','zhou','zhu','zhua','zhuai',

'zhuan','zhuang','zhui','zhun','zhuo','zi','zong','zou','zu','zuan',

'zui','zun','zuo','','ei','m','n','dia','cen','nou',

'jv','qv','xv','lv','nv'

）;

PyCodeIndex:

array[1..126,1..191]ofWord=（{拼音索引表}

（354,279,331,0,190,39,284,67,249,167

353,19,133,92,129,152,31,385,105,131,84,348,348,329,133,0,376,116,283,349,344,87,133,0,0,0,284,202,0,0,0,0,0,0,342,345,0,276,199,243,0,0,52,0,375,102,88,176,170,348,136,180,375,0,354,294,299,94,344,368,344,55,347,333,131,347,353,369,166,74,325,92,0,329,6,19,0,306,0,332,372,114,107,20,33,370,279,258,79,191,243,328,220,83,43,324,62,376,229,354,64,73,329,348,336,92,2,349,232,282,84,305,389,357,134,332,343,336,363,332,217,208,335,340,377,389,13,232,348,294,348,374,107,181,378,21,250,14,371,47,346,369,14,332,250,284,10,121,110,333,91,78,194,19,113,123,102,251,47,337,282,320,106,157,348,101,349,189,340,3,175,77,178,29,37,343,377,263,125,294,56）,

（302,214,130,132,313,373,393,39,404,134,286,313,282,320,20,201,334,318,354,330,340,101,148,329,348,84,167,122,350,332,270,229,330,190,331,339,62,134,375,157,294,123,334,125,16,309,81,344,11,354,336,116,374,375,19,133,220,389,167,323,169,43,387,0,91,310,286,187,304,383,337,237,241,88,167,299,245,80,375,387,178,295,171,122,68,386,12,329,134,200,23,125,347,276,245,350,36,243,264,376,45,325,354,19,309,345,83,305,328,75,34,283,140,62,29,11,367,120,220,369,388,345,353,340,367,47,84,84,375,190,92,348,335,343,294,71,368,373,315,11,360,245,325,296,375,297,331,355,261,217,357,126,180,63,305,109,129,330,278,243,252,35,40,270,11,334,352,220,304,301,346,78,19,333,359,97,270,162,352,362,387,231,295,381,354,368,389,279,43,131,107）,

（370,247,349,62,335,174,11,234,130,166,175,182,243,332,304,350,68,392,278,127,132,318,392,240,160,32,101,241,308,381,325,92,20,121,45,312,278,220,82,332,354,75,170,20,97,332,332,193,347,130,242,127,83,377,2,269,348,137,216,304,348,58,150,0,125,40,128,276,359,24,18,3,303,59,30,158,348,130,243,188,329,214,248,208,32,169,404,152,10,354,16,360,375,294,353,109,247,246,164,308,325,173,40,31,333,311,335,164,179,360,221,305,345,179,202,360,338,265,265,316,32,208,208,130,345,284,0,0,0,0,282,69,0,0,120,329,265,167,354,107,310,0,92,348,184,254,345,184,367,132,98,132,184,377,96,340,353,140,348,189,284,188,134,147,193,84,335,189,303,89,116,226,84,193,242,125,296,186,316,97,131,247,68,88,349,2,164,25,194,384,52）,

（294,74,130,170,330,70,79,79,134,40,374,83,198,375,83,83,139,88,237,150,107,258,43,92,243,53,92,57,323,136,164,84,250,64,193,171,376,17,129,129,278,31,94,43,153,74,77,129,47,131,69,179,363,355,54,0,276,43,54,164,81,31,241,0,43,386,89,240,74,247,385,125,92,345,123,74,375,329,98,283,125,367,139,244,42,31,381,175,164,231,278,147,98,117,367,385,166,134,172,102,128,102,125,125,314,92,125,125,375,31,390,196,164,378,344,131,145,335,375,348,378,196,160,135,147,346,321,334,197,152,129,169,0,131,90,193,37,159,352,0,135,247,175,21,157,139,190,68,340,329,348,343,346,283,168,175,234,284,92,244,128,251,333,348,342,79,135,314,134,57,181,343,343,404,164,34,333,251,357,133,10,0,14,87,87,348,231,134,220,91,75）,

（95,55,133,95,203,133,348,126,141,116,250,79,245,361,152,116,354,102,121,57,153,166,166,298,70,133,250,330,143,345,250,343,209,389,284,330,323,323,335,278,92,288,152,330,335,254,346,248,280,37,340,330,153,92,75,330,270,345,372,107,344,62,368,0,227,0,245,344,375,183,309,281,313,391,81,363,355,164,63,246,5,102,345,164,32,243,164,345,345,355,114,190,262,250,0,162,70,381,282,282,282,348,56,285,136,6,267,284,385,331,334,92,357,265,48,98,249,37,0,114,192,183,341,386,74,347,223,123,348,39,246,335,239,117,114,354,221,342,263,223,90,137,404,91,326,241,329,128,357,37,283,319,326,75,284,135,230,326,197,254,62,284,377,312,330,348,241,237,386,340,348,334,344,250,332,320,239,17,84,346,123,303,55,321,393,21,302,332,123,241,77）,

（75,375,378,343,334,149,284,311,397,341,322,160,314,338,353,189,209,337,0,109,357,173,239,183,389,110,332,160,238,167,6,192,404,299,84,107,356,353,97,97,11,107,348,243,316,345,323,164,249,34,362,344,69,241,62,246,0,114,0,0,167,159,276,0,0,328,349,241,321,244,3,363,209,354,310,157,330,2,400,385,368,358,334,333,384,329,326,309,97,241,241,57,347,386,316,52,110,344,241,372,167,332,350,98,363,104,179,0,62,251,320,0,305,3,57,354,372,377,30,322,0,360,220,190,116,357,119,355,92,376,325,276,340,120,367,345,167,354,271,139,127,345,278,230,300,351,325,350,0,11,0,362,123,309,220,334,244,273,352,114,335,180,29,106,263,321,92,227,329,332,386,175,321,0,301,0,269,0,199,244,14,5,166,391,378,196,304,128,38,128,139）,

（304,282,2,334,174,334,116,121,104,340,332,363,32,238,60,180,116,86,305,347,269,128,334,117,181,254,334,334,92,153,334,109,396,127,340,320,304,343,329,392,79,139,121,24,43,358,57,354,319,330,241,109,166,340,121,349,343,220,294,345,350,55,369,0,385,216,356,335,127,355,2,352,325,354,230,59,336,73,58,336,232,349,391,214,62,158,302,328,331,347,74,339,377,368,130,32,343,185,375,175,121,228,353,220,349,351,186,114,372,164,172,106,202,196,345,164,175,173,196,57,35,236,232,333,185,330,74,148,345,31,350,0,156,302,334,46,119,123,381,372,334,367,164,31,30,164,348,179,360,297,0,365,125,358,378,158,212,0,0,121,349,213,317,141,355,132,233,357,48,121,75,10

4,314,316,104,253,260,104,303,104,349,122,107,178,104,44,325,355,251,148,240）,

（355,355,344,317,316,316,317,177,121,348,176,176,344,316,313,240,175,150,344,384,297,297,385,58,242,331,278,212,196,124,375,343,348,246,186,261,319,82,14,337,158,131,92,62,337,226,305,250,385,98,303,132,346,0,175,249,96,342,6,171,378,84,116,0,375,5,0,228,193,92,110,404,47,37,349,115,72,371,84,101,220,74,102,29,346,335,285,19,114,55,138,58,108,3,337,332,9,239,11,348,349,107,340,383,246,83,80,252,352,137,331,62,159,135,246,372,169,117,21,132,347,62,344,251,299,374,323,134,178,374,146,279,68,304,23,315,13,332,74,348,375,384,241,134,208,143,154,208,125,89,354,344,97,163,80,344,154,3,282,203,316,36,119,14,166,328,381,10,354,329,129,264,347,94,387,354,120,75,220,84,92,186,279,320,349,83,376,129,130,113,89）,

（45,332,237,162,337,120,71,323,341,330,92,150,350,352,139,297,284,189,327,36,316,252,376,164,231,9,361,72,373,329,374,343,373,2,95,345,140,326,335,172,106,159,279,231,13,35,175,175,223,243,186,196,381,290,174,16,27,375,370,140,63,35,385,0,92,104,244,246,62,52,345,302,366,243,325,383,127,278,278,81,240,318,317,79,252,73,392,62,283,121,74,304,61,329,82,120,304,55,347,378,125,354,244,127,144,348,232,63,126,347,342,304,158,134,118,58,255,243,343,332,330,2,344,59,264,130,404,152,175,345,304,325,121,173,173,265,164,170,31,343,345,162,6,323,270,382