- 博客(0)
- 资源 (5)
空空如也
史上最完整的“汉字-->拼音声母”处理pas单元(Delphi)
汉字-->拼音声母处理
Developed by cyw(QQ: 26890954)
2010.1.16 All Right Reserved.
一、特点:
1、支持多音字,支持所有中国汉字(共20336个),包括难字、僻字、广东白话字、繁体字等所有计算机能显示的全部汉字。
例如:镕、啱、揾、叻、嘅、咁、門、長、發財、車、冇乜嘢。
2、对繁体字的多音字,优先采用与之对应的简体字第一个常用声母,确保两者的第一个音相同。如:发(fa)、發(bo fa),
调整后的声母分别为:发(f)、發(fb)。
二、提供函数功能:
1、//获取指定汉字的拼音索引字母,如:汉 = h。多音字根据参数OnlyOne决定是否返回多个声母,如:行 = hx
function GetPYIndex(const OneWord: string; const OnlyOne: Boolean = False): string;
2、//获取指定字符串的拼音索引字母(多音字总是取第一个音的声母)。如:中山大学 = zsdx
function GetStrPYIndex(const Str: string): string;
3、//获取字符串Str中与拼音声母字符串PYStr匹配的起始位置。如:PosPY('zsdx','我来自中山大学') = 7
function PosPY(const PYStr, Str: String): Integer;
4、//判断字符串Str的拼音声母是否全部与PYStr相同。如:SamePY('zsdx', '中山大学') = True
function SamePY(const PYStr, Str: String): Boolean;
5、//获取字符串Str中拼音声母串与字符串SubStr拼音声母串匹配的起始位置。如:PosTextPY('纵声大笑', '我来自中山大学') = 7
function PosTextPY(const SubStr, Str: String): Integer;
6、//判断字符串Str的拼音声母是否全部与字符串SubStr的拼音声母相同。如:SameTextPY('纵声大笑', '中山大学') = True
function SameTextPY(const SubStr, Str: String): Boolean;
2010-10-14
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人