• Domingo 27 de Septiembre de 2020, 04:51

Autor Tema:  Re: Capturar imagen desde una webcam  (Leído 8726 veces)

MindEye

  • Miembro MUY activo
  • ***
  • Mensajes: 185
    • Ver Perfil
Re: Capturar imagen desde una webcam
« en: Martes 2 de Septiembre de 2003, 14:02 »
0
- Me gustaría que alguien me explicara por favor, como puedo capturar una imagen desde una webcam, para guardarla en el disco duro.

 - Gracias amigos.

jjabietar

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Re: Capturar imagen desde una webcam
« Respuesta #1 en: Martes 2 de Septiembre de 2003, 17:17 »
0
Declaraciones:

Const ws_visible = &H10000000
Const ws_child = &H40000000
Const WM_USER = 1024
Const WM_CAP_EDIT_COPY = WM_USER + 30
Const wm_cap_driver_connect = WM_USER + 10
Const wm_cap_set_preview = WM_USER + 50
Const wm_cap_set_overlay = WM_USER + 51
Const WM_CAP_SET_PREVIEWRATE = WM_USER + 52
Const WM_CAP_SEQUENCE = WM_USER + 62
Const WM_CAP_SINGLE_FRAME_OPEN = WM_USER + 70
Const WM_CAP_SINGLE_FRAME_CLOSE = WM_USER + 71
Const WM_CAP_SINGLE_FRAME = WM_USER + 72
Const DRV_USER = &H4000
Const DVM_DIALOG = DRV_USER + 100
Const PREVIEWRATE = 30

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lparam As Long) As Long
Private Declare Function capCreateCaptureWindow Lib "avicap32.dll" Alias "capCreateCaptureWindowA" (ByVal a As String, ByVal b As Long, ByVal c As Integer, ByVal d As Integer, ByVal e As Integer, ByVal f As Integer, ByVal g As Long, ByVal h As Integer) As Long

Dim hwndc As Long


Código que activa la captura de imágenes:(se supone un formulario con 2 picture llamados "picture1" y "picture2")

    hwndc = capCreateCaptureWindow("Ventana de Captura", ws_child Or ws_visible, 0, 0, Picture2.Width, Picture2.Height, Picture2.hwnd, 0)
    If (hwndc <> 0) Then
        temp = SendMessage(hwndc, wm_cap_driver_connect, 0, 0)
        temp = SendMessage(hwndc, wm_cap_set_preview, 1, 0)
        temp = SendMessage(hwndc, WM_CAP_SET_PREVIEWRATE, PREVIEWRATE, 0)
    End If

Código que realiza la captura de la imagen:

   temp = SendMessage(hwndc, WM_CAP_EDIT_COPY, 1, 0)
   Set Picture1.Picture = Clipboard.GetData

Espero que te sirva de ayuda.

Saludos,
Joaquín.

agfed

  • Miembro activo
  • **
  • Mensajes: 45
    • Ver Perfil
    • http://www.maersa.com.mx
Re: Capturar imagen desde una webcam
« Respuesta #2 en: Martes 2 de Septiembre de 2003, 19:26 »
0
las camaras logitech quickam incluyen un sdk, con codigo en vba

MindEye

  • Miembro MUY activo
  • ***
  • Mensajes: 185
    • Ver Perfil
Capturar imagen desde una webcam
« Respuesta #3 en: Martes 2 de Septiembre de 2003, 19:43 »
0
- Muchisimas Gracias.

 - Estoy realmente agradecido

eliza_marti

  • Miembro MUY activo
  • ***
  • Mensajes: 267
    • Ver Perfil
    • http://www.solocodigo.com
Re: Capturar imagen desde una webcam
« Respuesta #4 en: Miércoles 14 de Julio de 2004, 19:54 »
0
Hola Chicos!!  :hola: ..JJABIETAR..derrepente..no sabes como configurar la camara Web....así como tu la haces..(osea... que? constantes tengo que mandar a sendmessager y como?)...lo que quiero es cambiar la dimensión de la imagen que se presenta..y si es posible .. :unsure: ..Me podrías enseñar como capturo la imagen de la webcam para guardarla como JPG?.. :) ....De antemano...Muchas gracias.. :P ..Bye.. :hola:  :comp:
Conserva la Paz con tu Alma en la bulliciosa confusión de la vida, aún con toda su farsa, penalidades y sueños fallidos, el mundo es todavia Hermoso....

http]
programacion,c,c++,
C#,java,linux,videojuegos,
directX,.NET,allegro,asm,codigo
[

Gandalf_malaga7

  • Miembro MUY activo
  • ***
  • Mensajes: 162
    • Ver Perfil
Re: Capturar imagen desde una webcam
« Respuesta #5 en: Martes 20 de Julio de 2004, 23:44 »
0
Hola colegas, :kicking:

yo realice una aplicación en la que tenía que capturar imagenes con una webcam para luego procesarlas.La forma más sencilla sin duda es buscar un control OCX.Yo usé dos diferentes: "VideocapX" y "Videcap Control ActiveX"; en ambos con un par de lineas de código que podías encontrar en sus ayudas capturas la imagen y la guardas en el HD.El primero trabaja con imágenes en formato .jpg y el segundo con .bmp. A vuestro gusto, :comp:

saludos :hola:
...Gandalf El Gris,ese era mi nombre;soy Gandalf El Blanco y en los albores de la tempestad vuelvo a vosotros.

eliza_marti

  • Miembro MUY activo
  • ***
  • Mensajes: 267
    • Ver Perfil
    • http://www.solocodigo.com
Re: Capturar imagen desde una webcam
« Respuesta #6 en: Miércoles 20 de Octubre de 2004, 23:16 »
0
:hola: ..sip..Gandalf_malaga7..pero date cuenta que ese componente caduca...(no lo puedes usar siempre).. :(
Conserva la Paz con tu Alma en la bulliciosa confusión de la vida, aún con toda su farsa, penalidades y sueños fallidos, el mundo es todavia Hermoso....

http]
programacion,c,c++,
C#,java,linux,videojuegos,
directX,.NET,allegro,asm,codigo
[

solcito

  • Miembro MUY activo
  • ***
  • Mensajes: 143
    • Ver Perfil
Re: Capturar imagen desde una webcam
« Respuesta #7 en: Miércoles 5 de Enero de 2005, 22:58 »
0
Yo tambien necesito esa misma informacion, y si dicen q esos componentes caducan, como lo podria resolver entonces???
Everything that has a beginning has an end.....

eliza_marti

  • Miembro MUY activo
  • ***
  • Mensajes: 267
    • Ver Perfil
    • http://www.solocodigo.com
Re: Capturar imagen desde una webcam
« Respuesta #8 en: Jueves 6 de Enero de 2005, 15:53 »
0
Hola solcito!.. :hola: ...pues la solución a tu problema es utilizar las APis de Windows... :)  ...mira este post...te ayudará un poco...  ;)  a mi me ayudo mucho...claro que tienes que probarlo , mejorarlo......etc...

Utilizando la camara Web...

Espero que te sirva...Bye  :hola: ...Suerte..  :comp:   :guitar: ...y nos cuentas como te fue.. :yes:
Conserva la Paz con tu Alma en la bulliciosa confusión de la vida, aún con toda su farsa, penalidades y sueños fallidos, el mundo es todavia Hermoso....

http]
programacion,c,c++,
C#,java,linux,videojuegos,
directX,.NET,allegro,asm,codigo
[

solcito

  • Miembro MUY activo
  • ***
  • Mensajes: 143
    • Ver Perfil
Re: Capturar imagen desde una webcam
« Respuesta #9 en: Jueves 6 de Enero de 2005, 19:52 »
0
Gracias Eliza, lo voy a probar y despues te cuento  :hola:



 :comp:
Everything that has a beginning has an end.....

diskjokey

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Re: Capturar imagen desde una webcam
« Respuesta #10 en: Domingo 26 de Agosto de 2012, 04:08 »
0
se q es viejo el post pero no logro hacer que la imagen se guare que linea falta? no veo el savepicture por ningun lado