Hola: Puede volver a la forma NORMAL con lo siguiente: En Form1_Load : Me.KeyPreview = True (Tambien puedes ponerlo en propiedades del form)
Y añades esto: Private Sub Form1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown If e.KeyCode = Keys.Escape Then Timer1.Stop() BANDERA = False Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable Me.WindowState = FormWindowState.Normal AxWindowsMediaPlayer1.Dock = DockStyle.None AxWindowsMediaPlayer1.Height = ALTURA PanelCONTROLES.Location = New Point(0, Me.Height - PanelCONTROLES.Height - 45) PanelCONTROLES.Width = Me.Width PanelCONTROLES.Visible = True ButtonNORMAL.Visible = False ButtonCOMPLETA.Visible = True End If End Sub
Muy buena pero hay un problema Cuando lo maximizo con el boton de pantalla completa funciona perfectamente. Pero cuando le hago doble click a windowsmedia se maximiza pero no vuelve a la pantalla normal con la tecla escape
Hola: Ni sabia que se maximizaba el reproductor al hacer doble click sobre el. Cada dia se aprende algo nuevo. A ver si te sirve esto: http://visualbasictutoriales.blogspot.com.es/2016/12/minimizar-axwindowsmediaplayer-con.html Saludos.
Por favor puede usted enviarme todo el código del control del panel que pila cómo hacer el control de la exhibición de la pantalla completa cuando el movimiento del ratón me ayuda por favor Mi correo electrónico: nyoxmlimwa@gmail.com
Muy buen tutorial amigo
ResponderEliminarHabria alguna forma de minimizarlo con la tecla ESC como los videos de youtube
Hola: Puede volver a la forma NORMAL con lo siguiente:
EliminarEn Form1_Load :
Me.KeyPreview = True (Tambien puedes ponerlo en propiedades del form)
Y añades esto:
Private Sub Form1_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.Escape Then
Timer1.Stop()
BANDERA = False
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable
Me.WindowState = FormWindowState.Normal
AxWindowsMediaPlayer1.Dock = DockStyle.None
AxWindowsMediaPlayer1.Height = ALTURA
PanelCONTROLES.Location = New Point(0, Me.Height - PanelCONTROLES.Height - 45)
PanelCONTROLES.Width = Me.Width
PanelCONTROLES.Visible = True
ButtonNORMAL.Visible = False
ButtonCOMPLETA.Visible = True
End If
End Sub
Ya me diras que tal te va.
Saludos.
Muy buena
Eliminarpero hay un problema
Cuando lo maximizo con el boton de pantalla completa funciona perfectamente. Pero cuando le hago doble click a windowsmedia se maximiza pero no vuelve a la pantalla normal con la tecla escape
Hola: Ni sabia que se maximizaba el reproductor al hacer doble click sobre el. Cada dia se aprende algo nuevo.
EliminarA ver si te sirve esto:
http://visualbasictutoriales.blogspot.com.es/2016/12/minimizar-axwindowsmediaplayer-con.html
Saludos.
Este comentario ha sido eliminado por el autor.
ResponderEliminarplease can you send to me all code of panel control i stack how to make full screen display control when mouse move please help me
ResponderEliminarEste comentario ha sido eliminado por el autor.
ResponderEliminarEste comentario ha sido eliminado por el autor.
ResponderEliminarPor favor puede usted enviarme todo el código del control del panel que pila cómo hacer el control de la exhibición de la pantalla completa cuando el movimiento del ratón me ayuda por favor Mi correo electrónico: nyoxmlimwa@gmail.com
ResponderEliminarhiii can you show code? pleasee
ResponderEliminar