Hello,
radio42 thanks for your reply

Still little Stucked:
type
TBuf = array of SmallInt;
var
Buffer : TBuf;
Stream : HSTREAM;
begin
Stream := BASS_StreamCreateFile(False, PChar(FileName), 0, 0, BASS_STREAM_DECODE);
BASS_Encode_Start(Stream, 'output.wav', BASS_ENCODE_PCM, nil, nil);
BASS_ChannelGetData(Stream, @Buffer, BASS_DATA_FFT1024);
{what i am missing?}
End;
You mean Like above?
and how to call back BASS_ChannelGetData?
Please give me a sample code
Thanks again