Показать сообщение отдельно
  #2  
Старый 15.09.2017, 01:13
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Может вот это наведет на мысль...

А вообще, глянул доку. Там, походу, можно просто загрузить ресурс в поток, а потом передать указательна память в функцию БАССа. Как=то примерно так (не проверял):
Код:
var
  R : TResourceStream;
begin
  R := TResourceStream.Create(HInstance, '1_MP3', RT_RCDATA);
  channel:=BASS_StreamCreateFile(true, R.Memory, 0, 0, 0 );
  bass_channelplay(channel,true);
  R.Free; // Тут надо смотреть, если bass_channelplay асинхронный, то сначала надо дождаться пока доиграет.
Ответить с цитированием