Senin, 27 Agustus 2012

Recording Video dari Web Camera dengan VB.NET (Pemrograman Visual Basic .NET)

Setelah berhasil Menampilkan WebCam dengan VB.NET dan Meng-capture (Snapshot) Web Camera dengan Visual Basic .NET. Kali ini coba kita buat aplikasi yang bisa Recording (Merekam) Web Camera menggunakan VB .NET.

Pertama Buka Visual Studio .NET, sebaiknya dengan hak akses Administrator, caranya klik kanan Icon / Menu, pilih Run As Administrator. Karena sering terjadi error ketika menyimpan file hasil Recording.


Kemudian kemudian Buka Project sebelumnya dari Artikel Menampilkan WebCam dengan VB.NET yang dapat didownload pada link berikut ini, kemudian tambahkan 2 Buah Button, Button1 "Start / Record" dan Button2 "Stop / Save" serta SaveFileDialog1 sehingga tampak sebagai berikut :




Kemudian Klik Dua Kali Button1 "Start/Record", kemudian tambahkan Kode Program berikut :


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        SaveFileDialog1.InitialDirectory = "C:\"
        SaveFileDialog1.FileName = "C:\RecordedVideo.avi"
        If SaveFileDialog1.ShowDialog <> Windows.Forms.DialogResult.OK Then
            Exit Sub
        End If
        Button1.Enabled = False
        Button2.Enabled = True
        SendMessage(hWnd, WM_CAP_SEQUENCE, 0, 0)
    End Sub


Kemudian Klik Dua Kali pada Tombol Button2 "Stop/Save" Masukkan Kode Program berikut :


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        SaveFileDialog1.InitialDirectory = "C:\"
        SaveFileDialog1.FileName = "C:\RecordedVideo.avi"
        If SaveFileDialog1.ShowDialog <> Windows.Forms.DialogResult.OK Then
            Exit Sub
        End If
        Button1.Enabled = False
        Button2.Enabled = True
        SendMessage(hWnd, WM_CAP_SEQUENCE, 0, 0)
    End Sub



Program siap dijalankan. Klik Run. Pilih Source WebCam untuk menampilkan Camera


Coba Klik "Start / Record" untuk mulai Merekam / Recording. Anda akan ditanyai dimana nanti File akan disimpan. Jika langsung klik OK maka file hasil rekaman akan tersimpan di C:\RecordedVideo.avi.



Setelah dirasa selesai merekamnya. Klik "Stop/Save". Silakan cek file hasil rekamannya.

Project selengkapnya dapat didownload disini. Di Google Docs, klik File - Download

Semoga berguna.