Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: pungados en 7 Octubre 2007, 00:13 am



Título: Reproductor de video en vb6
Publicado por: pungados en 7 Octubre 2007, 00:13 am
estuve buscando en internet como hacer un reproductor de video con vb6 pero no encontre nada...
Lo que queria saber era como hacer la barra que indica el tiempo que transcurre del video, para pausarlo, o para buscar otro.Si alguien me puede ayudar estaria muy agradecido.
Salu2
PD: Gracias a todos los que me ayudaron hoy   ;D


Título: Re: Reproductor de video en vb6
Publicado por: nhaalclkiemr en 7 Octubre 2007, 06:02 am
A ver si esto te sirve


Para que aparezca el video en el Form

Código
  1. Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
  2.  
  3. Private Sub Form_Load()
  4. Dim CmdStr As String
  5. Dim ReturnVal As Long
  6. CmdStr = "play " & Chr(34) & "e:\media\avi\nombre.avi" & Chr(34)
  7. ReturnVal = mciSendString(CmdStr, 0&, 0, 0&)
  8. End Sub

Para pantalla completa

Código
  1. Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
  2.  
  3. Private Sub Form_Load()
  4. Dim CmdStr As String
  5. Dim ReturnVal As Long
  6. CmdStr = "play " & Chr(34) & "e:\media\avi\nombre.avi" & Chr(34) " fullscreen"
  7. ReturnVal = mciSendString(CmdStr, 0&, 0, 0&)
  8. End Sub

Saludos  ;)


Título: Re: Reproductor de video en vb6
Publicado por: ranslsad en 7 Octubre 2007, 15:35 pm
Por lo pronto ami no, hay que agregar algun control o algo (supongo que no)
Porke no me abre nada :S
Explica mejor como usarlo o algo..
PD: si, cambie el link del video ^^


Salu2

Ranslsad


Título: Re: Reproductor de video en vb6
Publicado por: nhaalclkiemr en 7 Octubre 2007, 16:10 pm
No necesita ningun control, solo usa una API, lo que necesitas es "winmm.dll" pero eso pienso que viene en todos los XP...

Corregí arriba un poco el code...prueva ahora a ver si te va...

Saludos ;)