Libvlc.dll Working

[danielmaximiliano]

Hola a todos: hice unas mejoras (cambio de nombres a los .prg) creación de una nueva clase para manejar la LibVLC llamada tRtspVlc dentro de Class_tRtsp_VLC.prg para no tener que lidiar con tRtsp dentro de Class_tRtsp.prg las 2 clases manejan LibVLC dentro de Bridge_VLC.prg mas simple.

Code: Select all

   METHOD New( cRtspUrl )                     //   oCam := tRTSP():New( "192.168.100.16", 554 )
   METHOD Play()
   METHOD PlayInFrame( hWndFrame )
   METHOD Pause()
   METHOD Stop()
   METHOD Close()  
   METHOD GetState()                                        // devuelve texto legible del estado actual
   METHOD SetVolume( nVol )                            // 0 a 100
   METHOD GetVolume()
   METHOD Snapshot( cFileName )                    // guarda imagen JPG/PNG

solo falta mejoras en los botones ,ocultamiento y activacion de los mismos, limpieza de codigo usado y descartado.

manejo de multiples canales de audio/video dentro de un FRAME definido ( PlayInFrame( hWndFrame )) mi caso son 2 camaras, cada camara tiene 2 canales de audio/video en en direcciones IP fijas designadas por DHCP ( MACADDRESS).

Falta agregar (ahora esta inhabilitado) el Usuario y Contraseña en caso que la URL tenga de tener Autentificación.
Automatico :

Code: Select all

IF ! ":" $ cSrc .AND. ! "@" $ cSrc
   cSrc := "rtsp://admin:12345@" + SubStr( cSrc, 8 )
ENDIF

que es lo mismo que:

Code: Select all

cSrc := "rtsp://admin:12345@192.168.1.50:554/22992e47b611dde40dde83b803ca1ab0_0"

dejo el enlace https://drive.google.com/drive/folders/ ... drive_link

[danielmaximiliano]

Hola a todos : Encontré que al colocar una nueva cámara no se que dirección ocupa dentro de mi red, para mejorar la aplicación sin tener que modificar el código (Pronto estaré modificando para que funcione como un "CCTV DVR") esto es crear un frame para cada cámara ( si existiera) para ello tengo que valerme de una nueva función llamada BuscarCamara() (para pruebas simple hice este pequeño .exe)

Captura de pantalla 2025-10-29 152747.png (11.19 KiB) Viewed 577 times

les dejo el enlace (pueden decirme en que mejorar) : https://drive.google.com/drive/folders/ ... sp=sharing

[danielmaximiliano]

Mejoras visuales incorporadas

Captura de pantalla 2025-10-29 164234.png (14.61 KiB) Viewed 575 times

Enlace : https://drive.google.com/drive/folders/ ... sp=sharing

[danielmaximiliano]

Hola a todos : Mejoras para mi aplicacion Camara (Camara9) , se elimino codigo redundante, se agrego busqueda de camaras por puertos ( 80 HTTP, 554 y otros (TCP-RTSP)
Funcional Clase tVLC ( Boton 'Play Cannel 0' y 'Play Cannel 1')
Funcional boton 'buscar camaras'
Funcional boton 'Archivos'

Se agrego nuevo HTML 'tVLC_documentation_interactive.html' en ingles y español sobre Bridge LIBVLC y las clases tVLC y tRTSP

recuerden que estoy trabajando sobre como recuperar el Resource disponible en la camara, asi como agregar las Credenciales (user/pass) de la misma a la clase RTSP.
saludos a todos !!!
enlace de descarga https://drive.google.com/drive/folders/ ... drive_link

[mol]

My cam doesn't support tvlc...

[danielmaximiliano]

Hola Mol : que tipo de camara IP?

haz probado Wireshark antes de conectar la camara, ver las peticiones HTTP o TCP desde tu PC hacia la Ip de la camara ?

mi aplicacion de pc llamada HRS v1.2 hacia la camara deja esta huella en Wireshark :

Code: Select all

1	0.000000	192.168.100.17	192.168.100.16	TCP	66	    63424 → 554 [SYN] Seq=0 Win=65535 Len=0 MSS=1460 WS=256 SACK_PERM
2	0.000249	192.168.100.16	192.168.100.17	TCP	66	    554 → 63424 [SYN, ACK] Seq=0 Ack=1 Win=14600 Len=0 MSS=1460 SACK_PERM WS=4
3	0.000519	192.168.100.17	192.168.100.16	TCP	54	    63424 → 554 [ACK] Seq=1 Ack=1 Win=65280 Len=0
4	0.001293	192.168.100.17	192.168.100.16	RTSP	    194	DESCRIBE rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0 RTSP/1.0
5	0.001500	192.168.100.16	192.168.100.17	TCP	60	    554 → 63424 [ACK] Seq=1 Ack=141 Win=15672 Len=0
6	0.017779	192.168.100.16	192.168.100.17	RTSP/SDP	671	Reply: RTSP/1.0 200 OK
7	0.018521	192.168.100.17	192.168.100.16	RTSP	    222	SETUP rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/trackID=0 RTSP/1.0
8	0.020995	192.168.100.16	192.168.100.17	RTSP	   	Reply: RTSP/1.0 200 OK
9	0.021564	192.168.100.17	192.168.100.16	RTSP	    249	SETUP rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/trackID=1 RTSP/1.0
10	0.022046	192.168.100.16	192.168.100.17	RTSP	    200	Reply: RTSP/1.0 200 OK
11	0.022423	192.168.100.17	192.168.100.16	RTSP	    211	PLAY rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0 RTSP/1.0
12	0.023137	192.168.100.16	192.168.100.17	RTSP	    370	Reply: RTSP/1.0 200 OK
13	0.067928	192.168.100.17	192.168.100.16	TCP	54	    63424 → 554 [ACK] Seq=661 Ack=1226 Win=64256 Len=0
14	0.114435	192.168.100.16	192.168.100.17	RTP	1514	PT=DynamicRTP-Type-96, SSRC=0x76712AA5, Seq=0, Time=0, 

de esta forma rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/ saco el Resource que es /22992e47b611dde40dde83b803ca1ab0_0

[mol]

I'll try with another CAM

[danielmaximiliano]

Hola a todos : despues de luchar 2 semanas con LibVLC ejecutando desde el cmd en una ventana independiente ( no usado HMG) LibVLC siempre creaba una ventana Direct3D11 y no en un ventana propia... lo que no sabia es que hay que registrar las ventanas por eso llevo tiempo este ejemplo.
LibVLC en CMD

en Windows "Buscar", escribir "CMD" , "ejecutar"
en ventana CMD : CD "Ruta del ejemplo"
escribir "pat" este .bat agrega Path de la ruta de HMG ... Mi caso: "c:\hmg.3.6"
compilar con "Compilar*.bat*"
ejecuta el ejemplo con "Cliente"

Nota : Faltan afinar detalles!!

Enlace de descarga Drive : https://drive.google.com/drive/folders/ ... sp=sharing