Столкнулся с одной проблемой в Delphi 7.

Я пишу программу с поддержкой Speech API и Ms Agent. Голосовые движки (Text-To-Speech) стандартные (L&H). Подключаю стандартный файл Speech.pas и компонент Ms Agent.

Программа идет полностью, но возникает вопрос: как с помощью Speech API "на лету" записывать звук в MP3 файл ?!

В книге, по которой я учусь, сказано лишь, как записывать звук в Wav-файл. Но Wav занимают много места.

Сердцем чую, что разгадка в этой процедуре:

OleCheck(fITTSCentral.TextData(CharsET_TEXT, 1, fSData, pointer(fTTSBufNotifySink),IID_ITTSBufNotifySink));

Надо поменять один из параметров, но какой ???!!!