Chris,
Try setting the option on ImageCapture, like so:
$DefaultImagingDevice
(* Out[29]= "IPEVO Point 2 View" *)
$ImagingDevices
(* Out[30]= {"IPEVO Point 2 View"} *)
SetOptions[ImageCapture, RasterSize -> {1024, 768}, ImageSize -> {1024, 768}]
(* Out[32]= {"CaptureAction" -> Automatic, "CaptureRunning" -> True, "FrameRate" -> Automatic, ImageSize -> {1024, 768}, RasterSize -> {1024, 768}, "Device" :> $DefaultImagingDevice} *)
Then:
In[33]:= CurrentImage[]
