SAPI5 и WAV файл

[Kek]

В рамках темы
http://keklab.ru/frees/73-sound-agent.html
появилась одна задача.
Для обучения системы распознавания речи необходимо формировать звучание слов.
Делать это через микрофон не хочется, поэтому был установлен SAPI5 и в Delphi сделана прога, которая произносит через динамики любые слова, которые написаны текстом. Набор этих слов в текстовом виде в конечном итоге можно сделать из базы по случайной выборке.
Но есть вопрос. Можно ли сделать так, чтобы звучание текстового слова через SAPI5 превратилось в файл WAV?

[nsh]

На Delphi код для записи в файл выглядит так:

  Voice := TSpVoice.Create(nil);
  Stream := TSpFileStream.Create(nil);
  Stream.Format.Type_ := SAFT44kHz16BitMono;
  Stream.Open('c:\temp\test.wav', SSFMCreateForWrite, False);
  Voice.AudioOutputStream := Stream.DefaultInterface;
  Voice.Speak('Hello World!', 0);
  Stream.Close;

[Kek]

Цитата nsh @ 27.02.14, 08:08

На Delphi код для записи в файл выглядит так:

  Voice := TSpVoice.Create(nil);
  Stream := TSpFileStream.Create(nil);
  Stream.Format.Type_ := SAFT44kHz16BitMono;
  Stream.Open('c:\temp\test.wav', SSFMCreateForWrite, False);
  Voice.AudioOutputStream := Stream.DefaultInterface;
  Voice.Speak('Hello World!', 0);
  Stream.Close;

Спасибо, вопрос решен. Вот исходники
www.keklab.ru/buf/ai/sapi_sampl.zip