Delphi 远程控制—视频通讯（2）

在网络上进行摄像头视频通讯
          有很多朋友正被老板要求做类似QQ一样的视频聊天软件，
本例子使用的是简的老技术（VFW），开发起来相对简单，以下是Delphi代码，你需要先加入 VFW.PAS 文件，没有这个文件你可以在网上找一下。

Delphi只是一个开发工具，代码思想是的设计的精髓。

在程序的开始，你需要用capCreateCaptureWindow来创建一个摄像头句柄，
       CapWnd := capCreateCaptureWindow('预览窗口',WS_VISIBLE or WS_CHILD,0,0,320,240,PrevWnd,1);
在后面的参数：PrevWnd代表预览窗口的句柄，你可以指定一个Panel的句柄；320和240代表了窗口的长宽。

if CapWnd = 0 then

    exit;
capDriverConnect(CapWnd,0); //连接摄像头设备
capDlgVideoFormat(CapWnd);