最近在编一个背单词的小程序,需要使用TTS 5.1 读单词,在用DELPHI 6中的导入TTS的DLL库时发现找不到在这个论坛上看到的 VTxtAuto.tlb 文件。
请问我该怎么样在 Windows XP 下编写TTS的程序。

解决方案 »

  1.   

    应用 Microsoft TTS 语音引擎的 Delphi 语言实例
      建立一个单窗体工程,添加一个 Edit 和 2 个 Button 控件,分别命名为 Edit1、btnSpeak、btnStop。然后安装引用 TTS 的 vtxtauto.tlb 类库文件,方法是点击菜单“工程-Import Type Library”,点“add”按钮,然后选中 Windows\speech 下的 Vtxtauto.tlb 文件,放入安装包后,再将其添加成 Delphi 的一个 Unit,自动产生的名字为“VTxtAuto_TLB”。然后,在主 Unit 的 Uses 里引用 VTxtAuto_TLB,即在 Uses 后添加字串“VTxtAuto_TLB”。最后参考以下代码:    ……
        procedure TfrmSpeech.FormCreate(Sender: TObject);
        begin
          vtxt:=CoVTxtAuto_.Create;
          vtxt.Register('','Speech');
          Edit1.Text:='I am a chinese, I love my homeland very much, and you?'
        end;
        procedure TfrmSpeech.btnSpeakClick(Sender: TObject);
        begin
          vtxt.Speed:=100;
          vtxt.Speak(trim(Edit1.Text),10);
        end;
        procedure TfrmSpeech.btnStopClick(Sender: TObject);
        begin
          vtxt.StopSpeaking;
        end;
        end.
      

  2.   

    zhangking:
      你说在windows下有一个speech目录,但在我的 windows xp 的windows目录下并没有找到这个speech目录。并且,我在 windows xp 的安装盘下并没有找到你提到的 Vtxtauto.tlb 文件。
      但我在 windows xp 的安装盘下的 
    F:\Program Files\Common Files\Microsoft Shared 目录中找到一个speech
    目录,但并没有 Vtxtauto.tlb 文件。