文件名称:开启摄像头E源码
文件大小:6KB
文件格式:E
更新时间:2017-09-08 14:56:20
开启摄像头 E语言 源码
E语言开启摄像头源码,易语言 .版本 2 .程序集 窗口程序集1 .程序集变量 hWndC, 整数型 .子程序 _视频窗口_创建完毕 .局部变量 hwnd, 整数型 hwnd = 视频窗口.取窗口句柄 () hWndC = capCreateCaptureWindow (“My Own Capture Window”, 位异或 (#WS_CHILD, #WS_VISIBLE), 2, 2, 320, 240, hwnd, 0) SendMessage (hWndC, #WM_CAP_SET_CALLBACK_VIDEOSTREAM, 0, 0) SendMessage (hWndC, #WM_CAP_SET_CALLBACK_ERROR, 0, 0) SendMessage (hWndC, #WM_CAP_SET_CALLBACK_STATUSA, 0, 0) SendMessage (hWndC, #WM_CAP_DRIVER_CONNECT, 0, 0) SendMessage (hWndC, #WM_CAP_SET_SCALE, 1, 0) SendMessage (hWndC, #WM_CAP_SET_PREVIEWRATE, 66, 0) SendMessage (hWndC, #WM_CAP_SET_OVERLAY, 1, 0) SendMessage (hWndC, #WM_CAP_SET_PREVIEW, 1, 0) .子程序 _按钮1_被单击 .如果真 (hWndC ≠ 0) SendMessageStr (hWndC, #WM_CAP_SAVEDIB, 0, “c:\test.bmp”) .如果真结束 .子程序 _按钮2_被单击 .如果真 (hWndC ≠ 0) SendMessageStr (hWndC, #WM_CAP_FILE_SET_CAPTURE_FILEA, 0, “c:\test.avi”) SendMessage (hWndC, #WM_CAP_SEQUENCE, 0, 0) .如果真结束 .子程序 _按钮3_被单击 .如果真 (hWndC ≠ 0) SendMessage (hWndC, #WM_CAP_STOP, 0, 0) .如果真结束 .子程序 _视频窗口_将被销毁 .如果真 (hWndC ≠ 0) SendMessage (hWndC, #WM_CAP_DRIVER_DISCONNECT, 0, 0) .如果真结束