dear un4seen
first,the url is ok,I use the following code to list all the output device, and select the default device
var
info: BASS_DEVICEINFO;
i: Integer;
begin
ListBox1.Clear ;
i := 1;
while BASS_GetDeviceInfo(i, info) do
begin
ListBox1.Items.Add(string(info.name));
Inc(i);
end;
end;
BASS_Init(-1, 44100, 0, 0, nil) //default device.
//and use this code to show the status, it shows playing.
case BASS_ChannelIsActive(chan) of
BASS_ACTIVE_STOPPED:str:= 'stop ';
BASS_ACTIVE_PLAYING:str:= 'playing: ';
BASS_ACTIVE_STALLED:str:= 'buffering';
BASS_ACTIVE_PAUSED:str:= 'pause ';
end;
the same code run ok in win7.and other notebook, but it only doesn't work on my laptop computer.
maybe some compatibility with the new win10?