Delphi汉字转拼音 获取首字母.rar

Delphi汉字转拼音 获取首字母，简化版拼音反查单元，把汉字转换成全拼，然后取拼音的首字母，并转换成大写，修改于 Trueway(TM) LiQunwei，去掉了外挂字典，简化代码。iMode 二进制功能位说明： 　　 1: 0 - 只取各个汉字声母的第一个字母; 1 - 全取 　　 2: 0 - 遇到不能翻译的字符不翻译; 1 - 翻译成 '?' (本选项目针对全角字符) 　　 3: 0 - 生成的串不包括非数字, 字母的其他字符; 1 - 包括(控制全角的要输出非数字, 字母字符的; 半角的非数字, 字母字符)