程序及源码：TTS语音朗读工具

delphi中开发需要先导入TTS的ActiveX控件, 方法如下:在Delphi开发界面的Project菜单下Import Type Library, 对话框里会有一个 Micosoft Speech Object Library Version5.1 的ActiveX组件，导入, 生成SpeechLib_TLB单元, 在ActiveX组件中加入19个sp系列组件, 其中有这个代码中用到的SpVoice. 代码实现可以*选取语音库, *选取语音设备, 控制语速, 控制音量等功能.朗读中文需要例如NeoSpeech.TTS系列等的中文语音库.