Sección de código fuente Visual basic


Reproductor de video



 

 


Código fuente programado y enviado por helmuth Schmelzer campos

 

Este código fuente es un simple reproductor de archivos de video mpg, avi, wmv etc.., utilizando la función del Api MciSendString, y el video se reproduce sobre un formulario

 

El preproductor tiene las opciones básicas de reproducción ( Reproducir, pausa, loop, pantalla completa, stop)

 

 

 

vista previa

vista de las opciones para reproducción

 

Y otro menú con cinco opciones : ( para quitar el sonido , para avanzar y retroceder el video por cuadros, y otra opción para indicar la velocidad de la reproducción )

 

vista del menu para otras opciones

 

Descarga código fuente

 


Este otro proyecto también enviado por helmuth Schmelzer, es similar al proyecto anterior, es decir para reproducir archivos de video, pero también otros formatos de multimedia: Archivos de sonido ( wma mp3 wav aif au ) , Windows Media Audio ( wma ), Secuencia Midi , Pista de Audio En Cd , Archivos de Video ( wmv, mpa, mpe, mpg, mpeg, avi ) , Windows Media Video ( wmv ) , Archivo de Pelicula mpeg, mpg

También , este permite posicionarse en cualquier parte del archivo mediante un control Slider, y otra opción para poder configurar mediante la ventana de propiedades de video de windows.

Y otra diferencia es que el video lo abre en una ventana aparte, y no en el mismo formulario como en el caso anterior.

 

Vista previa :

vista de la ventana de reproducción y de la ventana con las opciones del reproductor

 

Descargar reproductor

 


Otro ejemplo, que es similar a los anteriores pero permite reproducir el video tanto en una ventana aparte como en el mismo formulario, y también tiene la opción para posicionarse en cualquier parte de la película

 

Descargar reproductor

 


Módulo de clase para reproducir videos

Este otro Código fuente permite mediante un módulo de clase, reproducir videos en formato avi, Mpeg, Mpeg2, Quicktime, divx y otros formatos en visual basic, mediante los comandos del MCI

 

Vista previa del reproductor

vist del programa para reproducir videos en visual basic

 

El reproductor permite los comandos básicos de play , pausa, etc.., establecer la posición de reproducción mediante un control Slider, establecer el volumen , ver la posición en segundos y el total de la reproducción, y varias otras opciones que NO se usan en el ejemplo, pero que se pueden acceder mediante métodos y propiedades que tiene el módulo de clase, como por ejemplo:

  1. Ejecutar el video a pantalla completa ( método playFullScreen )
  2. Obetner los frames por segundo y el total
  3. Establecer y recuperar la posición y tamaño del video dentro del objeto a reproducir : Left, Top, Width y Height ( en este caso es en un picturebox )
  4. Chequear si el dispositivo está listo para poder reproducir el video ( Método checkDeviceReady )
  5. Chequear y ver el estado del audio ( getAudioStatus ),
  6. Establecer el Rate o velocidad de reproducción
  7. Ver el estado actual del dispositivo Mci ( getStatus ) para saber si se está en Pausa, Stop, Play etc.. ,
  8. Minimizar y reestaurar la ventana de reproducción en caso de hacerlo en una ventana independiente ( minimizeMovie y restoreMovie)
  9. Reiniciar el video ( restartMovie )
  10. Rebobinar y adelantar el video ya sea por cuadros, por segundos y por milisegundos
  11. Abrir y cerrar la bandeja de CD o DVD ( setDoorClosed y setDoorOpen )
  12. Manejar el balance de los altavoces
  13. Algunas otras opciones

 

Nota: en el ejemplo, yo lo hice para que al redimensionar el formulario, el video también se redimensione con el tamaño que tenga el picturebox donde se visualiza el movie.

Per puede ser que querramos que el video tenga un tamaño fijo, para ello se debe quitar la siguiente linea de código del evento Resize del formulario :

    ' redimensiona el tamaño del video
    MM.sizeLocateMovie 0, 0, _
                       (Picture1.Width / Screen.TwipsPerPixelX), _
                       (Picture1.Height / Screen.TwipsPerPixelY)
 

... y colocarle al método sizeLocateMovie, los valores que se quiran para establecer el ancho, alto, la posición Left y Top

 

Descargar código fuente

 


Enlaces relacionados




Buscar en Recursos vb