Тогда попробуй вот эту схемку
Add(Button,47479,35,35)
{
Left=5
Top=10
Width=130
Height=25
Caption="Выбрать файлы"
link(onClick,15104708:doExecute,[])
}
Add(Button,2496941,35,112)
{
Left=145
Top=10
Width=190
Height=25
Caption="Воспроизвести список"
link(onClick,8234160:doEvent1,[])
}
Add(Hub,8234160,112,112)
{
InCount=2
OutCount=1
link(onEvent1,7346845:doNext,[])
}
Add(Counter,7346845,147,112)
{
Min=-1
Point(doValue)
link(onNext,9357745:doRead,[])
}
Add(ListBox,14842960,189,35)
{
Left=5
Top=40
Width=435
Height=340
Point(doSelect)
}
Add(ArrayRW,9357745,203,112)
{
link(onRead,11377434:doCreate,[])
link(Array,14842960:Array,[])
}
Add(BASS_StreamCreateFile,11377434,259,112)
{
Name="MainSound"
link(onCreate,955842:doPlay,[])
link(onEndPlay,10705781:doTimer,[(303,125)(303,167)])
}
Add(BASS_ChannelPlay,955842,315,112)
{
Channel="MainSound"
}
Add(Timer,10705781,315,161)
{
Interval=1
Enable=1
AutoStop=1
link(onTimer,8234160:doEvent2,[(356,167)(356,152)(100,152)(100,125)])
}
Add(MainForm,11326011,35,175)
{
Width=453
Height=414
Color=-16777206
Caption="bass"
Point(Handle)
link(onCreate,8398872:doInit,[])
}
Add(BASS_Init,8398872,112,189)
{
link(Handle,11326011:Handle,[(132,177)(86,177)(86,219)(41,219)])
}
Add(ODialog,15104708,105,35)
{
Title="Open File"
FileName=""
Select=1
link(onExecute,14842960:doAdd,[])
}
Add(Thread,6851419,315,196)
{
Delay=0
FastStop=0
}
И получается как в песне "Дивлюсь я на схему да думку гадаю чего я не сокол чего не летаю"