MP3In из NewAC

[ZuBy]

кажется Char

[TUberwer]

Спасибо!! Вы меня сдвинули с того места, на котором я стоял уже несколько дней!!
Огромное спасибо! Теперь ошибок с компонентами нету! Только если я открываю свой проект, то появляются несколько ошибок с какими-то компонентами из NewAC, с кнопками проигнорировать.. Сейчас очень постараюсь сам что-нибудь придумать!

В этом наборе NewAC нету AudioOut.. У меня он используется, можно ли его заменить на DXAudioOut? Сейчас буду пробовать

[TUberwer]

Слушайте, в чем может быть проблема?
Если на Delphi 7 просто создать пустой package, и не добавлять ничего, сразу скомпилировать, то не находит rtl.dcp ...
Его действительно нигде нет на компьютере, но он автоматом вписывается в package. Где его найти? скачать? или что еще можно сделать? Когда я свои компоненты добавляю в пустой package, то добавляется к rtl.dcp еще vcl.dcp, и его тоже не находит и его нигде нету. Что можно сделать?

[TUberwer]

Может нужно Delphi переустановить?

[KBO]

Здравствуйте форумчане,
скажите, а кто-нибудь пытался "MP3In1" вывести звук из BLOB поля БД. Просто выкидывает EAccessViolation. Вот с BLOB'а сначала в файл, а потом из файла воспроизвести - получается, а напрямую?

var
  MS: TMemoryStream;
begin
  MS := TMemoryStream.Create;
  try
    TBlobField(ibdsService.FieldByName('SPEAK')).SaveToStream(MS);
    MP3In1.Stream := MS; //ошибка
    DXAudioOut1.Run;
  finally
    MS.Free;
  end;
end;

Что я так не так делаю?

[ZuBy]

    TBlobField(ibdsService.FieldByName('SPEAK')).SaveToStream(MS);
    MS.Seek(0,0);
    MP3In1.Stream := MS; //ошибка
    DXAudioOut1.Run;

[KBO]

Спасибо за подсказку, но у меня вылетает ошибка:
"Project PEng_gDB.exe raised exception class EAuException with message 'Access violation at address 43534544. Read of address 43534544'. Process stopped. Use Step or Run to continue."

на возможной строке:

if sync_reader.reader.OpenStream(sync_reader.AuStream) <> S_OK then

в модуле: "libwma1.pas" (NewAC)

[KBO]

Как мне подсказали, я слишком быстро делаю

MS.Free;