定义一个SplitStr函数,参数是文本框中的字符串,使用ByteType函数返回这个字符串中每个字符所占的字节数,如果返回mbSingleByte(单字节),那么说明这个字符是字母或数字,如果是双字节,那么说明这个字符是汉字。根据字符的字节数通过copy函数获取当前这个字符,然后调用GetSpell函数来返回这个字符的拼音简码。主要代码如下:function TForm1SplitStr(str: string): string;vartext: String;i, Count: Integer;begintext := '';i := 1;while i <= Length(str) dobeginif ByteType(str, i) = mbSingleByte thenCount := 1elseCount := 2;
以上就是关于Delphi中如何获取汉字拼音简码全部的内容,包括:Delphi中如何获取汉字拼音简码、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)