------------ Дoбавленo в 20.48:
Решил так:
Add(DropFile,8314355,217,217)
{
link(onDropFile,16197012:doEvent1,[])
}
Add(MediaPlayer,2150479,490,217)
{
}
Add(Hub,16197012,273,217)
{
OutCount=3
link(onEvent1,2150479:doPlay,[])
link(onEvent2,13137665:doData,[(392,230)(392,293)])
link(onEvent3,10157559:doRepeat,[(308,237)(308,307)])
}
Add(ProgressBar,15596595,553,301)
{
Width=380
Ctl3D=0
WinStyle=2
Point(doMax)
}
Add(DoData,13137665,497,287)
{
link(onEventData,15596595:doMax,[(541,293)(541,314)])
link(Data,2150479:Length,[])
}
Add(DoData,9007322,434,301)
{
link(onEventData,15596595:doPosition,[])
link(Data,2150479:Position,[(440,275)(496,275)])
}
Add(Repeat,10157559,329,301)
{
link(onRepeat,10823695:doEvent1,[])
}
Add(Hub,10823695,378,301)
{
link(onEvent1,9007322:doData,[])
link(onEvent2,13750058:doSleepMks,[(413,314)(413,356)])
}
Add(Application,13042607,483,350)
{
Wait=1
}
Add(Sleep,13750058,434,350)
{
Delay=20000
link(onSleep,13042607:doProcessMessages,[])
}
Хотя при проигрывании становится невозможно закрыть программу, только аварийно.