Chce by moj programik wydawal dzwiek o danej czestotliwosci. Korzystajac z bass.dll napisalem

1 var
2 sam : HSAMPLE;
3 data : pointer;
4 chan : HCHANNEL;
5 begin
6 BASS_SampleCreate(1000, 1000, 1,0 );
7 sam := BASS_SampleCreateDone();
8 chan := BASS_SampleGetChannel(sam,false) ;
9 if not BASS_ChannelPlay(chan,false) then ShowMessage('channel play error');

Program sie odpala, nie wyrzuca bledow, obserwuje wzmozona aktywnosc procka po odpaleniu tej procedury i .... nic nie slychac. Jakies sugestie, przykladzik?