Ako rozvíjať aplikácie DirectShow kamery

DirectShow je open - source softvér pre zachytávanie videa projekt . Pomocou jeho základné kód , môžete vytvoriť aplikáciu , ktorá môže nahrávať video prenášaná do počítača zo vstupného zariadenia , ako je napríklad webové kamery alebo digitálneho fotoaparátu . Kód je založený na Microsoft Visual Basic . NET programovací jazyk , tak s cieľom vytvoriť aplikácie DirectShow fotoaparátu , budete potrebovať Microsoft Visual Studio . Veci , ktoré budete potrebovať v Microsoft Visual Studio
Zobraziť ďalšie inštrukcie Cestuj 1

Spustiť Visual Studio a vytvoriť nový dokument , aby svoj kód DirectShow aplikácie .
2

Import príslušnej knižnice kódu pre aplikácie DirectShow pomocou nasledujúci kód :

Dovoz SystemImports System.DiagnosticsImports System.DrawingImports System.Runtime.InteropServicesImports System.Windows.FormsImports DirectShowLibImports System.Runtime.InteropServices . ComTypes
3

Vytvorte si menný priestor a nastaviť premenné pre použitie , napríklad :

Menný Capture_The_Webcam Public Class Form1Inherits System.Windows.Forms.FormEnd ClassEnd Menný

eNUM PlayState

Zastavené = 0Paused = 1Running = 2Init = 3End EnumDim CurrentState Ako PlayState = PlayState.Stopped
4

Nastavte podprogramy , ktoré sa spustí a spustenie aplikácie raz to bol zostavený :

Private Sub InitializeComponent ( )

Dim zdroje ako System.Resources.ResourceManager = New System.Resources.ResourceManager ( gettype ( Form1 ) )

ma . AutoScaleBaseSize = New System.Drawing.Size ( 5 , 13 ) Me.ClientSize = New System.Drawing.Size ( 320 , 320 ) Me.Icon = Cdruh ( ( resources.GetObject ( " $ this.Icon " ) ) , System.Drawing.Icon ) Me.Name = " Form1 " Me.Text = " Video Capture Previewer ( PlayCap ) " Debug.WriteLine ( " Začal som Sub InitializeComponent " ) End Sub
5

Nastaviť triedu , ktorý je zodpovedný za záznam videa pomocou nasledujúci kód ako vodítko ku kódu vlastnej aplikácie :

Public Sub CaptureVideo ( ) Dim sourceFilter ako IBaseFilter = NothingTryBig kus codeCatch ex As ExceptionMessageBox . show ( " neodstrániteľná chyba má occurred.With chyba : " & ex.ToString ) End Sub TryEnd

Dim hr As Integer = 0
6

Kompilácia VB kód do spustiteľné aplikácie a spustite aplikáciu začať používať ako program pre záznam videa .

• Predchádzajúca strana: Ako analyzovať váš systém Verilog tvrdenie 
• Ďalšia strana: Ako Flush Cache v Ehcache