[Tizio]

Since BSplayer build 818 comes out, MovieWindow name and class changed, so the code has to be modified as follow:

.....
'If you click on Button "Command1"
Private Sub Command1_Click()
    'Retrieve the handle of the MovieWindo
    ParentHwnd = FindWindow("BSPVideoWindow", "VideoWindow")
    'If the MovieWindow exists
    If ParentHwnd <> 0 Then
.....