Delphi VFW 操作Web Cam影像輸出，出現黑屏的解決方式

VFW 操作Web Cam影像輸出，換了不同型號的Web Cam出現黑屏，原來是「視訊格式」不同造成。

Code:

    hCapWnd := THandle;

    hCapWnd := capCreateCaptureWindow('Cam. Window',WS_VISIBLE or WS_CHILD, 

      0, 0, Panel1.Width, Panel1.Height, Panel1.Handle, 0);

    capDriverConnect(hCapWnd, 0); 

    capDlgVideoFormat(hCapWnd); //會出現「視訊各式」的視窗

將「像素深度(位元)及壓縮」設置成 YUY2 即可