Delphi + WebCam + Pantalla Negra
 

Buenos días a la comunidad. Sé que este tema está más que hablado, pero siguiendo todos los hilos existentes, no vi una solución fehaciente a este problema.

Tengo un programita de control de fichajes de empleados hecho, pero quiero agregarle la unit de la webcam, que realice una captura por cada fichaje.

He probado de todo, y si bien, la webcam se me reconoce bien, siempre la imágen es negra.

He probado en WinXP, Win 7 64, Win 7 32, con una cámara USB Genius, y con una netbook con camara incorporada. Las camaras andan de 10 con skype por ej, pero he probado 6 soft q reconocen webcams y realizan capturas, y siempre el resultado es el mismo, pantalla negra.

He probado con el componente "tscap32", y con el ejemplo dado AQUÍ, utilizando la API de windows y pantalla negra siempre.

Ya no se mas que probar, que hacer. Tienen idea que puede estar ocurriendo? Muchas gracias!

Si tu programa no es comercial puedes utilizar la versión gratuita de uso personal de VideoLab, que puedes descargar desde su página web, en este link:

http://www.mitov.com/html/videolab.html

Es sumamente fácil de usar, practicamente no requiere código, trae un buen manual y funciona de maravilla.
Salu2

Muchas gracias radenf por tu respuesta, pero casualmente esta mañana, he probado la demo (Video Capture demo) misma, con iguales resultados :/

El .exe lo he probado en Win 7 64, Win 7 32, Win XP con una WebCam Genius. Y en una netbook, con Win 7 32 y cámara integrada.

Estoy algo perdido, no se me ocurre que puede estar pasando.

Lo siento pape19.

No te puedo ofrecer otras opciones, aunque me parece raro que no te funcione. Yo jamás he tenido problemas con este componente.
A lo mejor estas seleccionando alguna opción que no corresponde o tienes descativado el preview.
Revisa la documentación de ayuda o en la página web la VLCapture en la pestaña de componentes (Video source components)
Salu2

Hola pape19: probá este enlace (DirectXDelphiWebcamCapture.rar) que tiene un ejemplo y con los codigos de fuentes que realmente funciona. A mi me pasa lo mismo, es decir, a veces prende la camara y a veces no, y aun no he tenido el tiempo para analizar el codigo del ejemplo del enlace que te adjunto.-

Saludos.-

pape19,

Probé los ejemplos del link propuesto por MartinS (Versión 1 y 2) y funcionaron correctamente en mi Sistema: Windows 7 Professional x32 SP1, Delphi 7 y Cámara Logitech HD Pro Webcam C910.

El problema de la imagen en negro nunca se presento, la única forma de lograrlo fue por medio de las opción Difference Map de la versión 2. lo cual no es un error, si no una opción de la aplicación.

Espero sea útil :)

Nelson.

Hola: Con el tema de la pantalla negra a mi me pasaba que el problema era que no encendia (No se prendia el led que indicaba el uso del dispositivo). Use en primera instancia la unidad WebCam que expresa pape19 en el primer post y puse el codigo de activar la camara en un boton y en otro el de desactivar entonces "Jugaba" un poco con esos botones hasta que la encendia y tambien cree un post aqui relacionado a lo que estaba pasando.
Siempre vi el ejemplo basado en la unidad Webcam como exprese arriba hasta hoy que encontré lo de Delphibasic (DirectXDelphiWebcamCapture) aunque no llegue a analizar el código que usa y talvez halla alguna relacion con DirectX algo que no se :p.
Tambien ocurre que en entorno de desarrollo se presenta dicho problema cosa que no ocurre si se ejecuta el .exe directamente.
En definitiva el uso de la camara me ha traido un par de inconvenientes ya sea porque aparecia la pantalla negra o bien el cuadro de dialogo para seleccionar el dispositivo y si este aparecia el selector del driver presentaba caracteres irreconocibles.
Me pasa lo mismo con el componente de camara de Jedi.
Espero que podamos dilucidar el problema.-

Saludos.-