读书人

delphi2007:一个程序怎么控制两个摄像

发布时间: 2012-03-09 21:42:55 作者: rapoo

delphi2007:一个程序如何控制两个摄像头
我的电脑有两个摄像头,如何进行两个同时摄像,拍照?
请大侠指点,我只有20分。谢谢。

[解决办法]

Delphi(Pascal) code
procedure TForm1.FormCreate(Sender: TObject);begin   cmbCap:=TComboBox.Create(StatusBar1);   cmbCap.Style:=csOwnerDrawFixed;   cmbCap.Left:=75;   cmbCap.Width:=self.Width-83;   cmbCap.Parent:=StatusBar1;   FCap:= TCapture.Create(Panel1);   if FCap.GetCapDevice(cmbCap.Items)=0 then      ShowMessage('没有找到摄像头')   else      cmbCap.ItemIndex:=0;   FCap.OnMouseDown:=MyMouseDown;   FCap.OnDblClick:=MyDblClick;end;
[解决办法]
创建枚举器,获取设备名称,绑定设备,生成一个filtergrap ,打开指定的设备。。。。
大概思路是这样的...

读书人网 >.NET

热点推荐