Page 4 of 6
Re: Tomando fotos con la webcam
Posted: Mon Apr 20, 2020 3:57 pm
by FranciscoA
Antonio.
Compilé en W8 y funcionó bien, hasta que se me ocurrió presionar el botón 'Traspasar'.
Ya no funcionó más. Al entrar, nuevamente, presenta la pantalla de la imagen pequeñísima, y no volvió a capturar ya más.
Apagué el cpu pensando tal vez... pero lo mismo. Pero... ojo, por primera vez mi computador presentó mensaje de que Windows estaba tratando de eliminar un malaware. Francamente no sé.
Volví a compilarlo y lo mismo.
Bajé tu ejecutable de prueba, y exactamente el mismo comportamiento. No me funciona.
Saludos.
Re: Tomando fotos con la webcam
Posted: Mon Apr 20, 2020 4:05 pm
by FranciscoA
Resuelto!!!
Re-instalé los drivers de la camara y volvió a funcionar.
Es decir, cambié a otro puerto usb y Windows instaló los drivers nuevamente.
Saludos.
Re: Tomando fotos con la webcam
Posted: Mon Apr 20, 2020 10:00 pm
by leandro
Antonio, ya funciono, pero tuve que cambiar el formato del vídeo a YUY2, en formato MJPG no funciona. Muchísimas gracias con esto logro solucionar el inconveniente que tenia.
Windows 10 64 bits

Re: Tomando fotos con la webcam
Posted: Tue Apr 28, 2020 7:19 am
by Antonio Linares
Usando mod_harbour para tomar fotos / Using mod_harbour to take photos
https://www.modharbour.org/modharbour_samples/photo.prg
Re: Tomando fotos con la webcam
Posted: Tue Apr 28, 2020 5:32 pm
by wartiaga
Amazing! Can you provide source code? Thanks!
Re: Tomando fotos con la webcam
Posted: Tue Apr 28, 2020 7:56 pm
by Antonio Linares
here you have it:
https://github.com/FiveTechSoft/mod_harbour/blob/master/samples/photo.prgIn fact you don't need to run any app at all. Simply save the HTML on a local file and you may even open it from a local HTML file from your browser

Re: Tomando fotos con la webcam
Posted: Wed Apr 29, 2020 2:04 am
by artu01
Excelente Antonio!
tengo una duda todo ese codigo que esta en HTML lo has digitado o haz utilizado alguna herramienta ?
Re: Tomando fotos con la webcam
Posted: Wed Apr 29, 2020 6:33 am
by Antonio Linares
Son ejemplos que busco por la web y los adapto a mod_harbour

Re: Tomando fotos con la webcam
Posted: Sun Jul 12, 2020 2:37 pm
by Enrico Maria Giordano
I'm referring to the sample for Windows. I'm trying to change the width and height of the capture window without success (top and left work fine, though):
Replacing 200 with 100 (as an example) nothing changes.
What am I missing? Is it possible to change width and height of the capture window? If yes, how?
EMG
Re: Tomando fotos con la webcam
Posted: Sun Jul 12, 2020 4:51 pm
by Silvio.Falconi
Is It possibile have Two or many webcam into One dialog?
The cam link from a link or lan
Re: Tomando fotos con la webcam
Posted: Sun Jul 12, 2020 7:37 pm
by Enrico Maria Giordano
Found! The problem is here:
Code: Select all | Expand
SetWindowPos(::hWnd,HWND_BOTTOM,0,0,oStatus:nWidth,oStatus:nHeight,;
nOr(SWP_NOMOVE,SWP_NOZORDER ) )
Once this is commented out, we can change width and height of the capture window.
EMG
Re: Tomando fotos con la webcam
Posted: Mon Jul 13, 2020 7:02 am
by Antonio Linares
Thank you Enrico
Re: Tomando fotos con la webcam
Posted: Fri Apr 23, 2021 4:52 am
by AIDA
Hola otra vez yo dando lata
Aplique el código del photos.prg dentro de mi programita pero al ejecutarse no pregunta que controlador de camara se va usar
solo sale el cuadrito negro

.

pero si lo compilo fuera de mi programa funciona perfecto que sera lo que falta o lo que causa problema

Saluditos

Re: Tomando fotos con la webcam
Posted: Fri Apr 23, 2021 10:18 am
by Antonio Linares
Aida,
Pulsa en "opciones" y en "formato" y dinos que te aparece, gracias
Incluye dichas opciones en tu app y comprueba que aparece
Re: Tomando fotos con la webcam
Posted: Fri Apr 23, 2021 2:51 pm
by AIDA
al pulsar en los botones no pasa nada no sale nada
el código esta sin modificar solo lo maquille en aspecto visual

internamente no funciona
Code: Select all | Expand
REDEFINE BTNBMP oBtnOkKM PROMPT FWString("Add Photo") ID 4032 OF oSof FILE "OPEN" Left FONT oFontV GRADIENT bGrad ACTION FotoCamara()
pero si lo ejecuto externamente si funciona
Code: Select all | Expand
REDEFINE BTNBMP oBtnOkKM PROMPT FWString("Add Photo") ID 4032 OF oSof FILE "OPEN" Left FONT oFontV GRADIENT bGrad ACTION WinExec("photos.exe")