Primero creamos un nuevo proyecto, despues vamos a componentes y tildamos
gb.sdl2.audio. En este ejemplo el archivo de audio esta dentro del proyecto en la carpeta datos.
' gambas class file
' by postapase
Public Sub Form_Open()
Me.Center 'centramos el formulario
End
Public Sub Button1_Click()
Dim misonido As Sound 'declaramos la variable de sonido llamada misonido
' misonido = Sound.Load("/home/prueba1/Escritorio/camara.ogg") 'una ruta X
misonido = Sound.Load("camara.ogg") 'Asignamos el sonido a la variable
' que se encuentra en la carpeta Datos del proyecto.
misonido.Play 'reproducimos el sonido
End
Sonido-0.0.1.tar.gz
FMain.SonidoTantos = New Sound("Sonidos/Kopete_send.ogg") 'vieja linea
FMain.SonidoTantos = Sound.Load("Sonidos/Kopete_send.ogg")'Linea actualizada
y un video
ResponderBorrarEn la Granja de Gambas hay un ejemplo llamado "VERY Simple video player" de Charlie Ogier
ResponderBorrarTambién en la Granja hay un programa llamado VisorRV1960 que usa un visor de videos.
Saludos