Domingo 22 de Diciembre de 2024, 18:16
SoloCodigo
Bienvenido(a),
Visitante
. Por favor,
ingresa
o
regístrate
.
¿Perdiste tu
email de activación?
Inicio
Foros
Chat
Ayuda
Buscar
Ingresar
Registrarse
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Boton De Camara Web
« anterior
próximo »
Imprimir
Páginas: [
1
]
Autor
Tema: Boton De Camara Web (Leído 3343 veces)
riciar
Miembro activo
Mensajes: 44
Boton De Camara Web
«
en:
Sábado 25 de Febrero de 2006, 13:28 »
0
Hola, necesitaria saber como puedo capturar el boton de las camaras web con visual basic sin que se active el programa que viene con la camara.
gracias.
Tweet
RadicalEd
Moderador
Mensajes: 2430
Nacionalidad:
Re: Boton De Camara Web
«
Respuesta #1 en:
Sábado 25 de Febrero de 2006, 16:35 »
0
Utiliza el buscador del foro, creo que de ahi encontre esto hace algun tiempo.
Código: Text
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
Private Sub Command1_Click()
'Código que realiza la captura de la imagen:
temp = SendMessage(hwndc, WM_CAP_EDIT_COPY, 1, 0)
Set Picture1.Picture = Clipboard.GetData
End Sub
Private Sub Form_Load()
'Código que activa la captura de imágenesse 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
End Sub
Ojala te sirva.
Chao
El pasado son solo recuerdos, el futuro son solo sueños
riciar
Miembro activo
Mensajes: 44
Re: Boton De Camara Web
«
Respuesta #2 en:
Lunes 27 de Febrero de 2006, 13:28 »
0
El programa de captura de imagenes con una webcam lo tengo, lo que necesito es que cuando pulso el boton de la webcam me congele la imagen y no se me active el programa que viene con la camara.
Gracias de nuevo.
eliza_marti
Miembro MUY activo
Mensajes: 267
Re: Boton De Camara Web
«
Respuesta #3 en:
Jueves 9 de Marzo de 2006, 00:11 »
0
hola riciar..
..pues si manejas la captura con un picture ..entonces podrias por ejemplo poner otro picture que cuando hagas el efecto de congelar la imagen pues se active el segundo picture..con la imagen congelada (claro..ocultando el otro..)..mmm..es una idea..
....chaitos..
..nos cuantas como te fue..
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
[
riciar
Miembro activo
Mensajes: 44
Re: Boton De Camara Web
«
Respuesta #4 en:
Jueves 16 de Marzo de 2006, 02:11 »
0
Gracias Eliza por responder.
Lo que necesitaria es poder ver cuando el usuario presiona el boton de la webcam y capturar en ese momento. El problema que tengo es que cuando pulso el boton se activa el soft que viene con la camara.
Gracias de nuevo.
eliza_marti
Miembro MUY activo
Mensajes: 267
Re: Boton De Camara Web
«
Respuesta #5 en:
Jueves 16 de Marzo de 2006, 23:15 »
0
hola riciar..
..la verdad es que no te entiendomucho...
..segun lo que puienso creo que no estas utilizando apis..sino el programa manejador de la web cam...mmm..utiliza mejor las apis de windows..
..nos cuentas como te va..
..yo hice un programa parecidoutilizando las apis y 0 problems..
..bye..suerte!!!...
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
[
riciar
Miembro activo
Mensajes: 44
Re: Boton De Camara Web
«
Respuesta #6 en:
Viernes 17 de Marzo de 2006, 01:46 »
0
Veo que tengo un problema mas grande ya que no se manejar las apis de window para las camaras.
Vere que puedo hacer.
Gracias de nuevo Eliza.
Imprimir
Páginas: [
1
]
« anterior
próximo »
SoloCodigo
»
Foros
»
Programación General
»
Visual Basic 6.0 e inferiores
(Moderador:
F_Tanori
) »
Boton De Camara Web