有个语音朗读开发包,可以实现你的要求.需要语音库支持.
www.smartysoft.cn/smartreadsdk

解决方案 »

  1.   

    我现在使用TextToSpeech这个ActiveX控件,也就是那个ActiveX控件栏上那个红色的“大嘴”,可以发声了,但是却只能发英文,我设置了LanguageID属性也不行,代码如下:
      TextToSpeech1.LanguageID($408);
      TextToSpeech1.Speak('好的');
    到底是什么问题呢?
      

  2.   

    你先装“进山词霸”,它上面有中文发音的TTS引擎
      

  3.   

    1.在微软下载中心下载:Speech SDK 5.1并安装,包括以下六个文件:
    msttss22L.exe               2.0 MB
    sapi.chm                    2.3 MB
    Sp5TTIntXP.exe              3.5 MB
    SpeechSDK51.exe            68.0 MB
    SpeechSDK51LangPack.exe    81.5 MB
    speechsdk51msm.exe        131.5 MB2.在Delphi中,通过Project->Import Type Library...进入Import Type Library面板,
      点击Add...按钮,选择D:\WINNT\Speech\vtxtauto.tlb,在列表中将会出现Microsoft Speech Object Library [Version 5.1],
      选择此项,点击面板下方的Install...按钮,完成安装。Delphi自动建立SpeechLib_TLB.pas并编译这个包,默认将这个库中的 19 个
      控件装到 ActiveX 页。3.使用方法:
      新建一个项目,上面各放一个SpVoice、Memo和Button,在 Memo中写“中文朗读”,在Button的onClick里写
      procedure TForm1.Button1Click(Sender: TObject);
      begin
        SpVoice1.Speak(memo1.Lines.Text,0);
      end;
      点击按钮,即可中文朗读。