Цитата:
	
	
		| Сообщение от cotseec пишем в гугл bass , идем по первой ссылке, скачиваем архив для вин, в примерах находим
 
	Код: procedure TForm2.FormCreate(Sender: TObject);
var
  i: Integer;
  ADeviceInfo: BASS_DEVICEINFO;
begin
  i := 1;
  while BASS_GetDeviceInfo(I, ADeviceInfo) do
  begin
    ListBox1.Items.Add(ADeviceInfo.name);
    i := i + 1;
  end;
end; 
в листбоксе названия звуковух, следующий вопрос - как проиграть звук на выбранной звуковухе - ответ см выше, там же, где и сама библотека | 
	
 
работает, спасибо

извини конечно, я новичок в этом, а как все таки проиграть звук?буду оооочень благодарен)