Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   Problema con camara web (https://www.clubdelphi.com/foros/showthread.php?t=65361)

JULIPO 09-12-2009 04:57:23

Problema con camara web
 
Reciban un cordial saludo

Estoy elaborando una aplicacion donde necesito almancenar una imagen tomada desde una webcam a una base de datos

Código Delphi [-]
procedure Tcaptfoto.BitBtn2Click(Sender: TObject);
begin
   Ventana := capCreateCaptureWindowA('Capturar Fotografia',
   WS_CHILD OR WS_VISIBLE, image1.Left, image1.Top, image1.Width,
   image1.Height,biodynad.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);
         bitbtn5.Enabled:=true;
      EXCEPT
         RAISE;
      END;
   END
   ELSE
   BEGIN
      MessageDlg('Error al conectar Webcam', mtError, [mbok], 0);
   END;
end;

El problema es que lanzo el formulario de captura de fotos como modal cuando creo el handle solo lo puedo hacer en base a el programa principal (biodyn.handle) no con la ventana de mi formulario lanzado que seria (captfoto.handle) por lo que el image1 queda ligado al formulario principal y no puedo cerrarlo ni controlarlo desde mi formulario lanzado como puedo solucionar este problema.


La franja horaria es GMT +2. Ahora son las 01:15:08.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi