Webcam UDF + Win7

[BrettF]

Hi there,

Been trying for a few hours to get the Webcam UDF working with windows 7. I've been trying to run it on my laptop (with the inbuilt) where it works fine, but the minute I try to do it with my external it all goes pear shaped.

In the _Webcam() function in the UDF I tried to change the values of:

DllCall($user, "int", "SendMessage", "hWnd", $cap[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 0, "int", 0)

to

DllCall($user, "int", "SendMessage", "hWnd", $cap[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 1, "int", 0)
DllCall($user, "int", "SendMessage", "hWnd", $cap[0], "int", $WM_CAP_DRIVER_CONNECT, "int", 2, "int", 0)

But all I end up getting is a blank screen.

When set to 0 (only with both plugged in. Still comes up if I disable the inter grated camera). I manage to get this GUI:

If I select the intergrated camera, it works fine.

I've tried to find drivers for my LifeCam VX-700, but it appears there aren't any. I have however installed the Microsoft LifeCam software and it seemed to indicated it was installing them? Other sources seem to say it doesn't need any.

The crappy thing is that I can view the webcam in MSN and use it! It just doesn't seem to want to work for my anywhere else.

I would really like to work out the issue before tomorrow as I need the program working for then.

Code:

expandcollapse popup

#include <GUIConstantsEx.au3>
#include <Webcam.au3>

;Initiate the webcam
_WebcamInit()

;Folder to store images, no trailing slash
$image_dir = @ScriptDir & "\" & @YEAR & @MON & @MDAY

;Time between taking images (ms)
$timelapse = 2000

;Size of Webcam Image
$width = 320
$height = 240

;Create $image_dir
If Not FileExists ($image_dir) Then DirCreate ($image_dir)

;Create the GUI
$gui = GUICreate("Time Lapse", $width, $height)

;Create the webcam on the GUI
_Webcam($gui, $width, $height, 0, 0)

ToolTip ("Loading")
;Wait for webcam to initate
Sleep (5000)
;Show the GUI
GUISetState(@SW_SHOW)

$timer = TimerInit()

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then
        _WebcamStop()
        Exit
    ElseIf $timer >= $timelapse Then
        _WebcamSnapShot($image_dir & "\" & @MDAY & @MON & @MDAY & @HOUR & @MIN & @SEC & ".jpg")
        $timer = TimerInit ()
    EndIf
WEnd

Cheers,

Brett

[BrettF]

No ideas? I was forced to use a mac to do the time lapse today...!

[pierrotm777]

Try this webcam udf version.

You can init different port (0 to 3)

webcam.au3

[GEOSoft]

Brett, if you have irfanview installed, open it and see if the device is listed in the TWAIN souces. Actually it doesn't have to be irfanview, anything that lists the available TWAIN devices will do it.