如何得到一个汉字的拼音？

如题

解决方案 »

  1.   

    你的email多少，我给你一个东东
      

  2.   

    function GetHzPy(const AHzStr: string): string;
    const
      ChinaCode: array[0..25, 0..1] of Integer = ((1601, 1636), (1637, 1832), (1833, 2077),
        (2078, 2273), (2274, 2301), (2302, 2432), (2433, 2593), (2594, 2786), (9999, 0000),
        (2787, 3105), (3106, 3211), (3212, 3471), (3472, 3634), (3635, 3722), (3723, 3729),
        (3730, 3857), (3858, 4026), (4027, 4085), (4086, 4389), (4390, 4557), (9999, 0000),
        (9999, 0000), (4558, 4683), (4684, 4924), (4925, 5248), (5249, 5589));
    var
      i, j, HzOrd: integer;
      Hz: string[2];
    begin
      i := 1;
      while i <= Length(AHzStr) do
      begin
        if (AHzStr[i] >= #160) and (AHzStr[i + 1] >= #160) then
        begin
          HzOrd := (Ord(AHzStr[i]) - 160) * 100 + Ord(AHzStr[i + 1]) - 160;
          for j := 0 to 25 do
          begin
            if (HzOrd >= ChinaCode[j][0]) and (HzOrd <= ChinaCode[j][1]) then
            begin
              Result := Result + char(byte('A') + j);
              break;
            end;
          end;
          Inc(i);
        end else Result := Result + AHzStr[i];
        Inc(i);
      end;
    end;
      

  3.   

    我的妹儿是[email protected]
    先谢了
    这段代码我试试，谢了
      

  4.   

    netwolfds(晓竹) :为什么不能在这里贴呀？是不是太大了！那么也给我一个吧！谢谢了。[email protected]
      

  5.   

    还有我！！！
    学习学习
    [email protected]
    谢谢。
      

  6.   

    發的是什麼東東呀!是不是什麼資源文件,我也想要
    [email protected]
      

  7.   

    http://expert.csdn.net/Expert/topic/1332/1332257.xml?temp=.9293329
    应该有所帮助
      

  8.   

    fengron(丰臣)的函数功能只是取得汉字的首字母,并不能获得汉字的完整拼音.
    谁有什么东东,也给我发一份,感激不尽!
    [email protected]
      

  9.   

    是一个dll,以上各位我都已经发过去了。