Показать сообщение отдельно
Старый 27.04.2012, 01:09   #9
barsunduk
ПроЭктировщик
 
Аватар для barsunduk
 
Регистрация: 09.05.2010
Адрес: рф ро шахты
Сообщений: 177
Написано 66 полезных сообщений
(для 271 пользователей)
Ответ: сам у себя доступ к файлу забрать норовит MCI

спасибо за советы. покурю.
но все же либа bass намного проще. события я так и не осилил, но...
как оказалось, легче завести массив потоков и проверять, активны ли они, когда я добавляю новых звуков. все неактивные я чищу и кидаю в них новьё. проблема решена, я полагаю.

var
  
strm: array [0..255of HSTREAM;
 
// ...
 
  
if BASS_ChannelIsActive(strm[i]) = 0 then
  begin
    BASS_StreamFree
(strm[i]);
    
strm[i] := BASS_StreamCreateFile(FalsePChar(Filename), 00{$IFDEF UNICODE} or BASS_UNICODE {$ENDIF});
    
BASS_ChannelPlay(strm[i], True);
  
end
__________________
to be or not to be - it's not a question!
2b or not 2b = ff
(Offline)
 
Ответить с цитированием