Iniciar Sesión

Ver la Versión Completa : [Componente] EZVIDC60.ocx (webcam) y Windows 10


Josber
7 de julio de 2017, 12:32
¿Alguien ha utilizado éste ocx en Windows 10?, está perfectamente registrada, sin errores, pero a la hora de grabar la imagen, me da el error:

DIB File not saved

Está programado exactamente igual que en Windows 7, y ahí si que funciona sin problemas.

Muchas gracias.-

Rapinto
7 de julio de 2017, 15:30
Josber,
Estou a usar o OCX em Windows 10 e funciona bem.
O Windows 10 não deixa gravar ficheiros em algumas localizações ( gravar em C:\ dá erro).

Verifica o Path do ficheiro a gravar ( Faz display).
Un saludo,

Rui Pinto

Roger
7 de julio de 2017, 16:40
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 PATH-EZFOTO PIC X(256).
PROCEDURE DIVISION.
MAIN SECTION.
MAIN-00.
INVOKE EZVIDCAP1 "CapSingleFrame".
IF "TEXT" OF CmPathFOTO = SPACE GO TO MAIN-99-EXIT.
MOVE "TEXT" OF CMPATHFOTO TO PATH-EZFOTO.
INVOKE EZVIDCAP1 "SaveDIB" USING PATH-EZFOTO.
INVOKE POW-SELF "ThruEvents".
MOVE POW-TRUE TO "Preview" OF EZVIDCAP1.
MOVE "FOTO GRAVADA!" TO "CAPTION" OF CMEMTRATAMENTO.
INVOKE POW-SELF "DEACTIVATE".
MAIN-99-EXIT.
EXIT PROGRAM.


estos codigos son de RUI tal vez te sirva de algo yo tambien uso ese ocx en win 10 me va bien.

tenia problemas con las laptop que tiene camara en un primer instante funciona pero al segundo intento no lo solucione con una rutina que tambien saque del ejemplo de RUI no se si subio el en el foro el ejemplo seria bueno que lo revises.

Josber
7 de julio de 2017, 20:23
Rui, no lo grabo en C:, sino en 'C:\Tiras y Cordones\Imágenes\nonbre_de_archivo....".

La librería está registrada como Administrador sin problemas, pero no hay manera, sin embargo el status-code que me devuelve es 0, (cero), el código que uso es el siguiente:


01 ReturnValue PIC S9(5) COMP-5.
01 WTEX PIC X(255) VALUE SPACES.
01 FECHA.
03 AA PIC XXXX.
03 MM PIC XX.
03 DD PIC XX.
03 HOR PIC XX.
03 MIN PIC XX.
03 SEG PIC XX.
PROCEDURE DIVISION.

MOVE FUNCTION CURRENT-DATE TO FECHA.
MOVE FECHA TO "Text" OF CAMPO30.

COMPUTE TAMA = FUNCTION STORED-CHAR-LENGTH (WRPRO) + 1.
MOVE WRPRO TO WTEX.
STRING "Imagenes" DELIMITED BY SIZE INTO WTEX WITH POINTER TAMA.
STRING FECHA DELIMITED BY SIZE INTO WTEX WITH POINTER TAMA.

MOVE WTEX TO WTEX-WEBCAM.

INVOKE ezVidcap1 "SaveDIB"
USING WTEX-WEBCAM
RETURNING ReturnValue
END-INVOKE.

Es un programa hecho en PWC9, creado como una dll, para poder usarlo en distintos sitios.

Un saludo y gracias.-

---------- Post añadido : 20:23 ---------- Post anterior : 19:24 ----------

¡¡¡ JOERRRR QUE BURROOOOOOO SOYYYYY !!!, me acabo de dar cuenta que j¡he creado el directorio con un acento y en el programa es sin acento, es que es para caparme.

En fin, ya funciona perfectamente, gracias a todos y perdón por las molestias.

Ub saludo.-