SAPI - "Klasse nicht registriert"

[Neutral General]

Hi,

Bin zufällig auf die Spracherkennungs Engine von Windows gestoßen und bin fasziniert^^ Würd das mal gerne testweise in ein Programm einbauen. Hab dazu was gefunden:

Folgendes ist praktisch von einer Internetseite übernommen:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, speech, comobj, activeX;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Memo1: TMemo;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  VoiceText := CreateComObject(CLSID_VTxt) as IVoiceText;
  OleCheck(VoiceText.Register(nil, PChar(Application.ExeName),
    nil, GUID_NULL, 0, nil));
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  OleCheck(VoiceText.Speak(PChar(memText.Text), 0, nil));
end;

end.

Bei der Zeile
VoiceText := CreateComObject(CLSID_VTxt) as IVoiceText; bekomm ich "Klasse nicht registriert" an den Kopf geworfen. Was stimmt denn da nicht?

Gruß
Neutral General

[sirius]

Was ist denn die CLSID_VTxt?

Hast du mal geschaut ob es die bei dir gibt (in der registry).

[Bernhard Geyer]

Welche Windows/IE/Mediaplayer-Version hast du auf deinem PC

[Neutral General]

Zitat von Bernhard Geyer:

Welche Windows/IE/Mediaplayer-Version hast du auf deinem PC

XP Prof. SP. 2, 6, 11 (nicht funktionierend)

[Bernhard Geyer]

Steht bei der Seite wo du den Code her hast auch Vorraussetzungen oder nötige Installer?