Webcam Snapshot speichern

[Sir Rufo]

Zitat von Bummi:

  SendMessage(handle, WM_CAP_FILE_SAVEDIB, 0, LPARAM(PAnsichar('C:\temp\file.jpg')));

Odda man nimmt die Unicode-Variante http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx

odda macht sich etwas, das immer funktioniert

Delphi-Quellcode:

// ANSI Version -> PAnsiChar verwenden
function capCreateCaptureWindowA(lpszWindowName: LPCSTR;
  dwStyle: DWORD;
  x, y,
  nWidth,
  nHeight: integer;
  hwndParent: HWND;
  nID: integer): HWND; stdcall;
  external 'AVICAP32.DLL' name 'capCreateCaptureWindowA';
// Unicode Version -> PWideChar verwenden
function capCreateCaptureWindowW(lpszWindowName: LPCWSTR;
  dwStyle: DWORD;
  x, y,
  nWidth,
  nHeight: integer;
  hwndParent: HWND;
  nID: integer): HWND; stdcall;
  external 'AVICAP32.DLL' name 'capCreateCaptureWindowW';
// Automatisch wie der Compiler -> PChar verwenden 
function capCreateCaptureWindow(lpszWindowName: {$IFDEF UNICODE}LPCWSTR{$ELSE}LPCSTR{$ENDIF};
  dwStyle: DWORD;
  x, y,
  nWidth,
  nHeight: integer;
  hwndParent: HWND;
  nID: integer): HWND; stdcall;
  external 'AVICAP32.DLL' name {$IFDEF UNICODE}'capCreateCaptureWindowW'{$ELSE}'capCreateCaptureWindowA'{$ENDIF};