unit pinyinfunction //汉字拼音相关的函数定义单元 Function GetHZPY(HZstr: String):String //将任意字符串中的汉字换成拼音首字母（大写） function GetPYIndexChar(hzchar: string):char //将一个汉字转化成拼音首字母（大写） -unit pinyinfunction // the function of Chinese characters spelling the defini