08-16-2018, 09:13 PM
(This post was last modified: 08-16-2018, 09:17 PM by InterestedNewbie.)
I'm using an application named eViacam. It's a headtracker that uses my WebCam to control the mouse. It has a small program window with a WebCam preview (that window doesn't need to be on top for the program to work).
eViacam works fine except it has a tendency to reset my WebCam driver settings on a regular basis. White Balance and Exposure are turned on again causing the frame rate to drop to 15 fps (while it should be 30 fps for smooth Tracking). It could also be that Windows 10 is responsible for this reset. I tried several WebCams the behavior is the same.
I created the following QM script that unchecks White Balance and Exposure in eViacam settings. It works perfectly from within QM. However, when I create a standalone executable it doesn't work.
Macro fix WebCam
any suggestions would be welcome.
eViacam works fine except it has a tendency to reset my WebCam driver settings on a regular basis. White Balance and Exposure are turned on again causing the frame rate to drop to 15 fps (while it should be 30 fps for smooth Tracking). It could also be that Windows 10 is responsible for this reset. I tried several WebCams the behavior is the same.
I created the following QM script that unchecks White Balance and Exposure in eViacam settings. It works perfectly from within QM. However, when I create a standalone executable it doesn't work.
Macro fix WebCam
int w=win("Enable Viacam" "wxWindowNR")
Acc a.Find(w "PUSHBUTTON" "Options" "class=ToolbarWindow32[]id=10042" 0x1005)
a.Mouse(1)
key D ;; Down
1
int w2=win("Configuration" "#32770")
Acc a2.Find(w2 "PUSHBUTTON" "Settings..." "class=Button[]id=10053" 0x1005)
a2.Mouse(1)
1
int w3=win("Properties" "#32770")
Acc a3.Find(w3 "CHECKBUTTON" "" "class=Button[]id=1108" 0x1004)
a3.Mouse(1)
1
int w4=win("Properties" "#32770")
Acc a4.Find(w4 "PAGETAB" "Camera Control" "class=SysTabControl32[]id=12320" 0x1005)
a4.Mouse(1)
1
int w5=win("Properties" "#32770")
Acc a5.Find(w5 "CHECKBUTTON" "" "class=Button[]id=1033" 0x1004)
a5.Mouse(1)
1
int w6=win("Properties" "#32770")
Acc a6.Find(w6 "PUSHBUTTON" "OK" "class=Button[]id=1" 0x1005)
a6.Mouse(1)
1
int w7=win("Configuration" "#32770")
Acc a7.Find(w7 "PUSHBUTTON" "OK" "class=Button[]id=5100" 0x1005)
a7.Mouse(1)any suggestions would be welcome.