我按电脑报的文章开发自己的英文语音朗读软件做到了3不知道如何找到这个组件其图标不认识可以说说吗

Question

我按电脑报的文章开发自己的英文语音朗读软件做到了3不知道如何找到这个组件其图标不认识可以说说吗
３．经过上面的步骤，已经将此组件引入到我们的程序中来，并生成了vtxtAuto＿tlB单元unit，我们只需要在自己的应用程序中使用此单元就可以了。现在我们在Speechunit的uSeS声明的末尾加上vtxtAuto＿tlB。并在vAr下面声明一个名为vtxt的全局变量，类型为vtxtAuto＿。
http://www.yesky.com/20011222/211156.shtml

Answer 1

到 http://www.cnetseek.com/gb/index.html 看一看
有一个文本语音朗读开发包，可以实现中英文朗读，而且简单

Answer 2

我写了一个小例子，你可以试一下！
但很奇怪，TTS一定要作全局变量，如果放在Button1Click中定义，则不会发音，可能是因为还没有放音这个变量就已消失的原因。unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, VTxtAuto_TLB;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    TTS : IVTxtAuto ;
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
  TTS := CoVTxtAuto_.Create;
  TTS.Register('Haofei','New English');
  TTS.Speed:=240;
end;procedure TForm1.Button1Click(Sender: TObject);
begin
  TTS.Speak('Hello',vtxtsp_HIGH);
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  TTS := nil ;
end;end.