Also:
ich habe VideoHandle als THandle definiert.
Dann kommt diese Funktion :
Delphi-Quellcode:
function SaveWebcamPictureDIB(pFileName: PChar;WebcamHandle: THandle):Boolean;
const WM_CAP_FILE_SAVEDIB = WM_USER + 25;
begin
if IsWindow(WebcamHandle) then
result := (SendMessage(WebcamHandle,WM_CAP_FILE_SAVEDIB,0,LPARAM(pFileName)) <> 0)
else
result := false;
end;
wird so aufgerufen :
SaveWebcamPictureDIB(PChar('C:\test.jpg'),VideoHandle);
Aber er erstellt irgendwie kein Bild. Und wenn ich mehrere Cams Nutzen will was dann?