R
Ramanaji
Hi,
I did code for to captue the video on Windows form in vb.net. I used the
"CapCreateCapturewindowA" API and binded to PictureBox. I used the timer
also to refresh. Same thing I would like to Capture the videoon Web. So
please any one help to capture the video(used webcam) on Web. I am here with
attaching the cdoe what I did in vb.net. Thank you.
Dim iWidth As Integer = PictureBox1.Width
hHwnd = capCreateCaptureWindowA(iDevice, WS_VISIBLE Or WS_CHILD,
0, 0, 640, _
480, PictureBox1.Handle.ToInt32, 0)
If SendMessage(hHwnd, WM_CAP_DRIVER_CONNECT, iDevice, 0) Then
SendMessage(hHwnd, WM_CAP_SET_SCALE, True, 0)
SendMessage(hHwnd, WM_CAP_SET_PREVIEWRATE, 66, 0)
SendMessage(hHwnd, WM_CAP_SET_PREVIEW, True, 0)
SetWindowPos(hHwnd, HWND_BOTTOM, 0, 0, PictureBox1.Width,
PictureBox1.Height, _
SWP_NOMOVE Or SWP_NOZORDER)
Else
DestroyWindow(hHwnd)
End If
regards
Ramanaji
I did code for to captue the video on Windows form in vb.net. I used the
"CapCreateCapturewindowA" API and binded to PictureBox. I used the timer
also to refresh. Same thing I would like to Capture the videoon Web. So
please any one help to capture the video(used webcam) on Web. I am here with
attaching the cdoe what I did in vb.net. Thank you.
Dim iWidth As Integer = PictureBox1.Width
hHwnd = capCreateCaptureWindowA(iDevice, WS_VISIBLE Or WS_CHILD,
0, 0, 640, _
480, PictureBox1.Handle.ToInt32, 0)
If SendMessage(hHwnd, WM_CAP_DRIVER_CONNECT, iDevice, 0) Then
SendMessage(hHwnd, WM_CAP_SET_SCALE, True, 0)
SendMessage(hHwnd, WM_CAP_SET_PREVIEWRATE, 66, 0)
SendMessage(hHwnd, WM_CAP_SET_PREVIEW, True, 0)
SetWindowPos(hHwnd, HWND_BOTTOM, 0, 0, PictureBox1.Width,
PictureBox1.Height, _
SWP_NOMOVE Or SWP_NOZORDER)
Else
DestroyWindow(hHwnd)
End If
regards
Ramanaji