Jump to content
Xtreme .Net Talk

Recommended Posts

Posted

Seems like this should be easy enough.

 

Private Sub Form1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
       If boolFull = True Then
           Try
               mobjVideo.Fullscreen = False
               boolFull = False
           Catch ex As Exception
               MsgBox(ex.ToString)
           End Try
       End If
   End Sub

 

 

 

But this doesn't work...

Posted

Re:

 

Sorry.

 

Doesn't work means it doesn't leave fullscreen mode.

I was unable to check mobjVideo.Fullscreen as Boolean

So to determine if the video was playing at full screen I set a boolean variable.

 

Private Sub cmdFull_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdFull.Click
       Try
           mobjVideo.Fullscreen = True
           boolFull = True
       Catch ex As Exception
           MsgBox(ex.ToString)
       End Try
       Debug.Write(boolFull)
   End Sub

 

The debug log shows

false

fasle

false

false

false

true <- set full screen

false <- subsequently moved the mouse

 

boolFull is declared in the General declarations as boolean.

And looks like it holds its value.

I am geissing the following 'false' is because I moved the mouse in full screen mode.

 

But DX didn't return the window to normal view.

  • 2 weeks later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...