Timage / Tbitmap上的delphi网络摄像头照片

Question

我正在使用此代码从网络摄像头拍照：

if hWndC <> 0 then
  begin
    SendMessage(hWndC, WM_CAP_SAVEDIB, 0,
      longint(StringToPAnsiChar('C:\Test.bmp')));
  end;

此代码将保存照片，如何在不通过文件的情况下拍摄照片并将其直接存储到Tbitmap或Timage？

对不起，我的英语不好。 提前致谢

Answer 1

您可以使用Windows视频（FVW）和/或DirectX进行此类工作。 我成功地使用了来自michael@grizzlymotion.com的代码（VFrames.pas和FSample.pas），这些代码可从http://siapen.googlecode.com/svn/trunk/webcam/Common/获得。我将此代码与XE4一起使用DirectX标头由XE4提供。 本文可能对以下人员有用： Delphi Webcam Simple Program