Capturar Imagen Con WebCam

[casacham]

Espero que este codigo les haya sido de utilidad y voy a estar esperando por correcciones, sugerencias y todo aquello que pueda ayudar a ampliar la info en este hilo para aquellos que realizan futuras busquedas sobre este tema.

[Lord Delfos]

Empezado por casacham

Espero que este codigo les haya sido de utilidad y voy a estar esperando por correcciones, sugerencias y todo aquello que pueda ayudar a ampliar la info en este hilo para aquellos que realizan futuras busquedas sobre este tema.

Pues como corrección no tengo ninguna, porque no lo puedo probar por no tener WebCam... (sí, ya sé que estamos en el siglo XXI, pero bueno ).

Lo que sí te quería comentar es que quizás esto etaría bueno ponerlo en la sección "trucos" o quizás hacerce un ejemplito y subirlo al FTP.

[casacham]

Este codigo puede ser descargado desde Directorio raíz » Delphi » Ejemplos, deben buscar con el nombre WebCamCapture - API.zip

[[Caral]]

Hola
No tengo en este momento la cámara pero lo voy a probar.
Lo mas importante es el aporte, gracias.
Saludos

[radenf]

Estimado casacham :

He probado múltiples componentes para captura de video desde una webcam y el mejor resultado lo obtuve con BasicVideo. Siempre he querido independizarme de este componente y utilizar las Api de windows. Había probado con el codigo que se encuentra publicado en Delphimagic.blogspot.com, sin embargo con mi webcam Microsoft NX-6000 siempre obtengo una ventana de captura vacía en negro. La cámara se enciende y no genera tampoco el preview. Los mismos resultados obtengo con el código que aquí has publicado, que es similar al que mencioné anteriormente, aunque el tuyo es más comprensible y separa en dos Unit los códigos, lo que me parece más ordenado.
¿Este código debiera funcionar con cualquier cámara?
¿Se requiere alguna instrucción especial dependiendo del tipo de cámara?
Agradezco enormemente tu aporte, aunque no me haya servido, porque me hizo revisar este tema, que a la fecha no he logrado solucionar.

Salu2 y muchas gracias

[casacham]

Hola radenf, la verdad es que el codigo lo he probado solo con las camaras incorporadas a las notebooks, y en todas las maquinas que he probado el codigo ha funcionado muy bien, no tengo experiencia con camaras accesorias o externas, en teoria deberia funcionar de la misma manera siempre y cuando sea una sola la camara activa. Espero que resuelvas tu problema y lo comentes aqui con nosotros para ayudar a quien busque esta informacion.

[JXJ]

Forbidden

You don't have permission to access /clubdelphi/archivos/Delphi/Ejemplos/WebCamCapture - API.zip on this server.

Additionally, a 404 Not Found error was encountered while trying to use an ErrorDocument to handle the request.
Apache/2 Server at www.terawiki.com Port 80

no se que paso.. da error al querer descargar el ejemplo
http://www.terawiki.clubdelphi.com/a...%20-%20API.zip

[fsolispa]

desde hace mucho estoy buscando algo parecido a lo que a cabas de comentar, hoy mismo hago la prueba, de antemano felicitaciones por tu iniciativa

[luiayllon]

Empezado por casacham

Espero que este codigo les haya sido de utilidad y voy a estar esperando por correcciones, sugerencias y todo aquello que pueda ayudar a ampliar la info en este hilo para aquellos que realizan futuras busquedas sobre este tema.

Bueno esto es para capturar la imagen desde una camara ewb, ahora sera similar las instrucciones para capturar la imagen desde un escaner y depositarla en una carpeta.

GRACIAS ADELANTADO POR LA AYUDA

[casacham]

El codigo podria ser de utilidad, no lo he probado. Pero en teoria si uno especifica la fuente de donde proviene la imagen, esta se puede capturar. Analiza mas el contenido del codigo a ver si te es de utilidad. Si lo logras, por favor publicalo en este hilo.

Gracias a todos.

[socger]

Alguno de ustedes al final pudo averiguar como pasarle la fuente de la procedencia a esta API?

Muchas gracias de antemano

[luigysiete]

Acabo de terminar una pequeña aplicacion utilizando los componentes dspack, esto es porque al igual que un usuario menciono, el codigo de este post solo me mostraba un cuadro negro al darle "Play" usando una webcam microsoft nx6000, investigando un poco mas encontre estos componentes gratuitos y muy faciles de usar, el pack original esta actualizado hasta Delphi7, yo hice una version para DelphiXE que es el que estoy usando, mi aplicacion permite seleccionar la fuente del video, y despues tomar una foto y guardarla en un archivo jpg, si a alguien le intereresa con gusto comparto el codigo asi como la actualizacion del dspack, intente compartir 2 enlaces pero como esta es mi primer colaboracion en el foro no me lo permitio, contacteme a quien le interesen, saludos desde Mexico!

[Wbarrantes]

Genial te felicito... me encantaria ver tu aplicacion, para ver como fue que lo lograste, el tema se las trae, y la verdad el tiempo que le e podido dedicar al tema, es practicamente nulo... te agradeceria si nos compartes tu experiencia del caso...

Gracias

[dekorone16]

Al momento de darle click al botos me marca un error "External excepcion C0000008" y me manda a esta linea de codigo ..

procedure TWebcam.Connect;
begin
  if CaptureWnd <> 0 then
    SendMessage(CaptureWnd, WM_Connect, 0, 0);
end;

Utilizo delphi 7 en Windows 7 y una camara web de usb, espero que me puedan ayudar a encontrar el error.

[lbidi]

Hola estimados.

Buscando informacion sobre como tomar una foto de una web cam, he llegado a este interesantisimo post. Lo he probado con el 2007 y me anduvo perfecto este codigo a la primera.

Es posible modificarlo para que en lugar de guardar imagenes BMP, guarde JPG ?? Mi idea es almacenar luego estas imagenes en una
BD y con BMP, creo que se podria agrandar el tamaño considerablemente.

Gracias totales

Saludos

[Casimiro Notevi]

Si la webcam crea JPG entonces podrás hacerlo, en caso contrario... no

La solución que te quedaría es convertir tú mismo la imagen de BMP a JPG, busca por los foros, se ha tratado en diversas ocasiones y es algo sencillo de hacer.