Einzelnen Beitrag anzeigen

kujin1000
(Gast)

n/a Beiträge
 
#1

Webcam Video 10 Sekunden machen

  Alt 21. Sep 2007, 15:53
Hio^^
ich will ein programm schreiben das bei knopfdruck von der webcam ein video macht nämlich 10 sekunden und das dann speichert. wie geht das? hab über die sufu das gefunden:

ich hab ein panel zur ausgabe

Delphi-Quellcode:
const
  WM_CAP_DRIVER_CONNECT = WM_USER + 10;
  WM_CAP_EDIT_COPY = WM_USER + 30;
  WM_CAP_SET_PREVIEW = WM_USER + 50;
  WM_CAP_SET_PREVIEWRATE = WM_USER + 52;

function capCreateCaptureWindow(lpszWindowName: LPCSTR;
dwStyle: DWORD;
x, y,
nWidth,
nHeight: integer;
hwndParent: HWND;
nID: integer): HWND; stdcall;
external 'AVICAP32.DLLname 'capCreateCaptureWindowA';

procedure TfrmMain.FormCreate;
begin
  FCapHandle := capCreateCaptureWindow('Video',ws_child+ws_visible, 0,
  0, 320, 240, Panel1.handle, 1);
  SendMessage(FCapHandle, WM_CAP_DRIVER_CONNECT, 0, 0);
  SendMessage(FCapHandle, WM_CAP_SET_PREVIEWRATE, 1, 0);
  SendMessage(FCapHandle, wm_cap_set_preview, 1, 0);
end;

ich wills aber nicht anzeigen sondern nur ein 10 sekunden video machen und das speichern. also möglichst ohne video anzeigen im panel. slowt den pc nur

THX
  Mit Zitat antworten Zitat