Heyyy Friends ! bass.dll mediaplayer listbox problem

planyin song but listbox to next song problem
listbox code:
Код:
if opendialog.Execute=true then
begin
if stream<>0 then
bass_StreamFree(stream);
stream:= bass_streamCreateFile(false, pChar(opendialog.filename), 0, 0, 0);
for i := 0 to OpenDialog.Files.Count-1 do listbox2.Items.Add(ExtractFilename(OpenDialog.Files.Strings[i]));
bass_channelplay(stream, false);
auto listbox song next pls
