Trace("Aguarde..Tirando Foto")
b_salvar_imagen is boolean = VideoCapture(CAM_FOTO,"imagentemp.jpeg",viPictureCapture,2)
IF b_salvar_imagen=True THEN
IMG_Foto="imagentemp.jpeg"
ELSE
Error(ErrorInfo())
END
TraceEnd()

// blog com vídeo e exemplo


http://windevdesenvolvimento.blogspot.com.br/2017/07/aula-1210-windev-curso-erp-042-tirar.html

https://www.youtube.com/watch?v=NW8w-7plb4E