Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   PowerCOBOL (ActiveX, v4 - v11) (https://www.cobolforo.es/forumdisplay.php?f=9)
-   -   [Duda] Tomar imagen de webcam (https://www.cobolforo.es/showthread.php?t=257)

JuanJuan77 5 de noviembre de 2015 17:07
Tomar imagen de webcam
 
Hola. Tengo powercobol 9. Necesito tomar foto con webcam y almacenarlas con un nombre. Como se puede hacer? gracias

Kuk 5 de noviembre de 2015 20:35
juanjuan77, prueba con esto: [Aporte] VFW Video Capture OCX - COBOL Foro

Roger 5 de noviembre de 2015 20:39
Hola Juan

Utilizo el ezVidC60.ocx primero lo registro incrusto en el programa el ocx
puedes poner en un boton este codigo:
Código COBOL:
  1. WORKING-STORAGE SECTION.
  2.  01 RETURNVALUE PIC S9(9) COMP-5.
  3.  01 foto.
  4.       02 RUTA PIC X(50) VALUE "D:\FOTOS\0001.bmp".
  5. PROCEDURE       DIVISION.
  6. INVOKE EZVIDCAP1 "SaveDIB" USING FOTO INVOKE EZVIDCAP1 "CaptureEnd" RETURNING ReturnValue.

images son solo en .bmp
Funciona en modo de ejecución, mas no en programa.

Roger 5 de noviembre de 2015 20:46
1 Archivos Adjunto(s)
Este es el OCX

Josber 5 de noviembre de 2015 20:47
Yo lo hago como dice Roger y sin problemas de momento.

Un saludo.-

JuanJuan77 5 de noviembre de 2015 21:17
Gracias!, pero se ve que tengo un problema, no me aparece la imagen, probe con 2 webcams, a alguien le paso?, me queda negro

Rapinto 6 de noviembre de 2015 00:27
Hola Juan,

Não podes executar o programa com o PPJ aberto.
O OCX não permite duas ocorrências do programa a serem executadas.

Anexo um PPJ completo com um exemplo de Foto e de Video : [Aporte] VFW Video Capture OCX - COBOL Foro

Josber 6 de noviembre de 2015 10:50
juanjuan77, No sé si entiendes lo que ha dicho Rapinto, pero es el problema, casi seguro, para poder ver la imágen, has de tener el proyecto cerrado, el ocx, no permite dos ejecuciones simultáneas, en éste caso el proyecto y el ejecutable, cierra uno de los dos para que funcione. Yo tengo una dll, hecha para ésto, que llama a un form, que captura la imágen, si la quieres, dilo y la subo al foro.

Un saludo.-

JuanJuan77 6 de noviembre de 2015 20:44
Muchas gracias!, con el ejemplo de Rapinto lo pude hacer. GRacias!

Galileo 20 de diciembre de 2015 12:28
Cita:
Citación del post de Josber (Mensaje 1194)
juanjuan77, No sé si entiendes lo que ha dicho Rapinto, pero es el problema, casi seguro, para poder ver la imágen, has de tener el proyecto cerrado, el ocx, no permite dos ejecuciones simultáneas, en éste caso el proyecto y el ejecutable, cierra uno de los dos para que funcione. Yo tengo una dll, hecha para ésto, que llama a un form, que captura la imágen, si la quieres, dilo y la subo al foro.

Un saludo.-
¿Crees que funcionaría en PowerCOBOL 3.0?

Kuk 20 de diciembre de 2015 12:49
Galileo, el OCX es un control ACTIVEX. Es otra tecnología, no se puede usar en Power 3.

Rapinto 21 de diciembre de 2015 02:05
Galileo,

Deve ser possível, utilizando a API da Microsoft AVICAP32.DLL.
Tem lá todas as rotinas necessárias.

Mas eu nunca utilizei PCobol 3.0.

Posso fazer um exemplo para PowerCobol 9.
Poderão ver se é possível adaptar a PowerCobol 3.0.

Amanhã vou tentar fazer esse exemplo.
Un saludo,
Rui Pinto


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

Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.