Webcam capturar imagen y adaptada

[KingOfDragons]

Empezado por ronald_tro

Hola amigos de nuevo, estoy haciendo una aplicacion de poder ver mi webcam por medio de una image1, el codigo que tengo es este:
Boton de inicio:
begin
Ventana := capCreateCaptureWindowA('Ventana de captura',
WS_CHILD OR WS_VISIBLE, image1.Left, image1.Top, image1.Width,
image1.Height, form1.Handle, 0);
IF Ventana <> 0 THEN
BEGIN
TRY
SendMessage(Ventana, WM_CAP_DRIVER_CONNECT, 0, 0);
SendMessage(Ventana, WM_CAP_SET_PREVIEWRATE, 40, 0);
SendMessage(Ventana, WM_CAP_SET_PREVIEW, 1, 0);
EXCEPT
RAISE;
END;
END
ELSE
BEGIN
MessageDlg('Error al conectar Webcam', mtError, [mbok], 0);
END;
end;

Despues de conectar el driver pones este mensaje

Código Delphi [-]
SendMessage (Ventana, WM_CAP_SET_SCALE, 1, 0);

y agregas esta constante

Código Delphi [-]
Const WM_CAP_SET_SCALE = WM_CAP_START + 53;

esto va a hacer que se ajuste al tamaño que le definiste a Ventana

[KingOfDragons]

y Bueno ya que estamos con este tema me podrian ayudar ya que la solucion que dan no funciona me marca error quiero guardarlo en un archivo ya sea bmp o el formato que sea pero tambien quiero cambiar o definir su tamaño con el comando que dice el compañero al principio si funciona pero solo me deja el archivo con la primera letra de toda la cadena y sin formato que puedo hacer??

[arrakshe]

Tengo el mismo codigo pero el detalle esque el image1 me sale en negro cuando se prende la camara y la camara si sirve porque la he probado con otros programas y funciona perfectamente, no se si alguno tendra una minima idea del porque todo sale en negro, porque yo estoy perdido... Ademas como dato curioso un compañero implemento un codigo similar que si le esta funcionando sin embargo cuando lo coloque en mi programa no funciono y tenemos el mismo estilo de camara....

[Casimiro Noteví]

Empezado por arrakshe

un compañero implemento un codigo similar que si le esta funcionando sin embargo cuando lo coloque en mi programa no funciono y tenemos el mismo estilo de camara....

Si la cámara es igual y el programa es distinto, y funciona en un programa sí y en el otro no, entonces es que hay un programa mal.

[arrakshe]

Empezado por Casimiro Notevi

Si la cámara es igual y el programa es distinto, y funciona en un programa sí y en el otro no, entonces es que hay un programa mal.

De hecho es el mismo codigo, pero ya arregle el problema, es algo con los drivers de la camara porque si la apago y vuelvo a encender con el programa a la segunda encendida si funciona como debe ser, muchas gracias por tomarte el tiempo en responder.

[Alexander]

Muy buen día.

Alguien sabe donde consigo el Driver para que me funcionen los programas de la webcam.
He revisado en los foros y ya tengo lo programas, pero con todos me sale la imagen en negro.

Muchas Gracias por su información.

[Casimiro Noteví]

Seguramente viene en el cd de la cámara.
También podrás descargarlo de la web del fabricante de la cámara.
También puede ser que el propio sistema operativo tenga alguno estandar y no necesites otro.

Si todo te sale siempre negro... ¿has quitado la tapa negra que trae el objetivo de la cámara?

Amigo, es casi imposible que te podamos ayudar sin ningún dato ni información, no has dado ni una triste pista de nada... y no somos adivinos
¿La has probado en otro ordenador?, ¿la has conectado a otro puerto?, ¿has comprobado el cable?, ¿sabes si está bien instalada?, ¿la reconoce el sistema operativo en hardware encontrado?, ¿no estarás con la luz apagada y es de noche?

Venga, a ver si nos das más pistas, amigo, que así es imposible.

Por cierto, sigue nuestra guía de estilo, esto que has escrito no tiene nada que ver con la pregunta que inició este tema. Deberías haber creado un hilo nuevo.