Cómo desarrollar una aplicación de cámara DirectShow

DirectShow es un proyecto de software de captura de vídeo de código abierto. Mediante el uso de su base de código, se puede desarrollar una aplicación que puede grabar vídeo se transmite en el ordenador desde un dispositivo de entrada, tal como una cámara web o una cámara digital. El código se basa en el lenguaje de programación Visual Basic .NET de Microsoft, por lo que con el fin de desarrollar una aplicación de cámara de DirectShow, necesitará Microsoft Visual Studio.

Instrucciones

1 Lanzamiento de Visual Studio y crear un nuevo documento para codificar la aplicación de DirectShow.

2 Importar las bibliotecas de códigos apropiados para la aplicación de DirectShow mediante el código siguiente:

Sistema de importaciones
Imports System.Diagnostics
Las importaciones System.Drawing
Imports System.Runtime.InteropServices
Imports System.Windows.Forms
Las importaciones DirectShowLib
importaciones System.Runtime.InteropServices.ComTypes

3 Crear un espacio de nombres y establecer las variables de aplicación; por ejemplo:

Espacio de nombres Capture_The_Webcam Public Class Form1
System.Windows.Forms.Form hereda

End Class

Espacio de nombres fin

enumeración PlayState

Stopped = 0
Paused = 1
Running = 2
Init = 3

End Enum
Dim currentState Como PlayState = PlayState.Stopped

4 Configurar las subrutinas que pondrá en marcha y ejecutar la aplicación una vez que ha sido compilado:

Private Sub InitializeComponent ()

Dim resources As System.Resources.ResourceManager =
New System.Resources.ResourceManager(GetType(Form1))

Me.AutoScaleBaseSize = Nueva System.Drawing.Size (5, 13)
Me.ClientSize = Nueva System.Drawing.Size (320, 320)
Me.Icon = CType ((resources.GetObject (& quot; $ this.Icon & quot;)), System.Drawing.Icon)
Me.Name = & quot; & quot Form1;
Me.Text = & quot; de captura de vídeo de vista previa de (PlayCap) & quot;
Debug.WriteLine (& quot; empecé Sub InitializeComponent & quot;)

End Sub

5 Configurar la clase que es responsable de la captura de vídeo utilizando el código siguiente como una guía para codificar su propia aplicación:

Public Sub CaptureVideo ()

Dim sourceFilter As IBaseFilter = Nothing
Try
Big chunk of code
Catch ex As Exception
MessageBox.Show("An unrecoverable error has occurred.With error : " &
ex.ToString)
End Try

End Sub

h Dim As Integer = 0

6 Compilar el código VB en una aplicación ejecutable y luego ejecutar la aplicación para comenzar a utilizarlo como un programa de grabación de vídeo.