得到某个汉字的拼音字母

转载 2004年09月09日 17:02:00
function GetEn(CnString: string): string;
? function GetEnChar(cnchar: string): char;
? begin
??? case Word(cnchar[1]) shl 8 + Word(cnchar[2]) of
????? $B0A1..$B0C4: result := 'a';
????? $B0C5..$B2C0: result := 'b';
????? $B2C1..$B4ED: result := 'c';
????? $B4EE..$B6E9: result := 'd';
????? $B6EA..$B7A1: result := 'e';
????? $B7A2..$B8C0: result := 'f';
????? $B8C1..$B9FD: result := 'g';
????? $B9FE..$BBF6: result := 'h';
????? $BBF7..$BFA5: result := 'j';
????? $BFA6..$C0AB: result := 'k';
????? $C0AC..$C2E7: result := 'l';
????? $C2E8..$C4C2: result := 'm';
????? $C4C3..$C5B5: result := 'n';
????? $C5B6..$C5BD: result := 'o';
????? $C5BE..$C6D9: result := 'p';
????? $C6DA..$C8BA: result := 'q';
????? $C8BB..$C8F5: result := 'r';
????? $C8F6..$CBF9: result := 's';
????? $CBFA..$CDD9: result := 't';
????? $CDDA..$CEF3: result := 'w';
????? $CEF4..$D1B8: result := 'x';
????? $D1B9..$D4D0: result := 'y';
????? $D4D1..$D7F9: result := 'z';
??? else
????? result := char(0);
??? end;
? end;
var
? i, len: integer;
begin
? CnString := StringReplace(CnString, ' ', '', [rfReplaceAll]);? //删除空格
? len := Length(CnString) - Length(WideString(CnString));??????? //汉字个数
? for i := 1 to len do
??? result := result + GetEnChar(copy(CnString, 2*i-1, 2));
end;

excel中如何实现提取汉字的拼音首字母

http://zhidao.baidu.com/question/104836508.html汉字中还包含英文字母或数字,英文或数字部分也要返回。比如:中国航天6号a返回应为:ZGHT6Ha下面是一个...
  • ztguang
  • ztguang
  • 2016年02月01日 00:00
  • 1579

ORACLE函数获取汉字拼音首字母

ORACLE函数获取汉字拼音首字母 /*------增加:yl--*/ oracle 中 NLSSORT函数的用法 NLSSORT(),用来进行语言排序 拼音 SELECT * FR...
  • lixing732100721
  • lixing732100721
  • 2013年12月01日 22:10
  • 6122

Java获取中文拼音、中文首字母缩写和中文首字母

我们有时候会遇到这样的情况,需要获取某些中文的拼音、中文首字母缩写和中文首字母,下面我将为大家介绍一下如何获取中文拼音的缩写。 1、项目建立和配置 首先,我们建立一个java项目,新建libs文件夹并...
  • u013043346
  • u013043346
  • 2015年12月01日 16:35
  • 7374

如何取汉字的第一个拼音字母

  • 2007年07月24日 19:32
  • 21KB
  • 下载

excle汉字转化拼音字母

  • 2013年06月03日 16:04
  • 2KB
  • 下载

php 实现汉字转化为拼音字母

//PHP 实现汉字转化拼音 class pin { function Pinyin($_String, $_Code='gb2312'){ $_DataKey = "a|ai...
  • liuquan007
  • liuquan007
  • 2017年10月30日 16:55
  • 41

Java 拿到汉字的拼音字母

import java.io.BufferedReader; import java.io.FileNotFoundException; import java.io.FileReader; i...
  • jebe7282
  • jebe7282
  • 2012年05月29日 14:51
  • 972

java汉字转拼音字母项目例子_可直接运行

  • 2014年03月23日 23:18
  • 187KB
  • 下载

JAVA汉字转换拼音字母

  • 2013年07月09日 12:02
  • 99KB
  • 下载

将汉字转换为拼音字母(注意编码保存的格式)

  • slzyb
  • slzyb
  • 2011年04月02日 12:43
  • 331
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:得到某个汉字的拼音字母
举报原因:
原因补充:

(最多只允许输入30个字)