Este control sirve para mostrar animaciones de tipo gif o mng !
Algunas de sus propiedades mas usadas son:
Border
Especifica si desea ponerle borde al control control escogiendo que tipo de borde desea, existen cuatro tipo de bordes las cuales son:
Etched
Plain
Raised
Sunken
Height
Contiene el alto del control es decir su tamaño vertical.
Mouse
Contiene una lista de tipos de punteros para que al estar arriba del control el puntero cambie según el puntero que elija.
Path
Define la ruta donde esta la animación gif o mng.
Playing
Define si la película se reproducirá automáticamente o no. El valor por defecto es FALSE “No se reproducirá automáticamente y TRUE “Significa que la animación se reproducirá automáticamente”
ToolTip
Se utiliza para mostrar un mensaje cuando el mouse este situado arriba del control.
Visible
Especifica si el control sera visible “true” o invisible “false”
Width
Especifica el Ancho del control
X
Posición en el eje de las X del formulario
Y
Posición en el eje de las Y del Formulario
Mas información sobre MovieBox
Ejemplo
1) Se creo un MovieBox y se le cargo una imagen gif “Path = imagen.gif” “Se puede buscar en google” y se le cambio la propiedad playing a TRUE. Quedando de esta manera
En realidad debería de haber quedado de esta manera
Ejemplo 2
Se creo una MovieBox y un Button y al pulsar el botón se le cargara la animación gif y reproducirá la animación.
Código del Button
PUBLIC SUB Button1_Click()
'Ruta de la imagen Gif en este caso esta en el mismo directorio del proyecto
MovieBox1.Path = "2qkl3t5.gif"
'Cambia la propiedad Playing de False a True para que se reproduzca
MovieBox1.Playing = TRUE
END
Al pulsar el Botón se reproducirá la imagen gif
Descargar Ejemplo
4 comentarios:
hola eto esta muy bueno pero necesito los codigo de los botones para retroceder y adelantar videos
Este es el código para retroceder
MovieBox1.Rewind()
Y para adelantar te la debo..!! Creo que no existe la propiedad para adelantar el vídeo, solo para comenzar.
Saludos
xfa ayuda tengo 1 gif pequeño y al hacer l moviebox mas grande no encuentro como expandir el gif al tamaño del moviebox... help
Copia y pega de estos Blog... nada original ni complejo..
Publicar un comentario