Usando BASS Library para el sonido Mp3 en nuestros programas

[Snaked]

Hace tiempo consegui esta libreria, (la que usaré aqui es una version de hace algun tiempo, la version 2.0, no la ultima version)

lo primero que tenemos que hacer es añadir el Bass.lib a nuestro proyecto mediante la opcion Project->Add to Project del menu

después en el código fuente..... en el constructor de Form1 emplazamos la inicializacion que seria asi:


Unit1.cpp

Código PHP:

__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{

    if (BASS_GetVersion() != MAKELONG(2,0))
        throw Exception("No se pudo cargar la versión 2 de BASS");

    if (!BASS_Init(1, 44100, 0, Handle, 0))
        throw Exception("Error inicializando audio");

}
//--------------------------------------------------------------------------- 


en el fichero de cabecera, declararemos como HSTREAM una variable que será la que almacene la cancion mp3


Unit1.h

Código PHP:

private:

    HSTREAM stream;
    bool reproduciendo; 


y finalmente, llamaremos desde cualquier lugar del codigo, a la funcion que carga y reproduce el fichero mp3 por ejemplo
aqui la llamamos al crear el Form1

Código PHP:

//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
       stream=BASS_StreamCreateFile(FALSE,"music1.mp3",0,0,0);
      reproduciendo = BASS_StreamPlay(stream, false, BASS_SAMPLE_LOOP);  
             //BASS_SAMPLE_LOOP repite en modo loop continuamente la cancion
      

           BASS_SetVolume(100);     //ajustamos el volumen



    // Cambia el volumen del stream al volumen actual
        // trkbVolumen es un componente trackbar (min=0 :: Max=100)

    trkbVolumen->Position = 0;
    trkbVolumenChange(this);
}
//--------------------------------------------------------------------------- 


y tambien, no olvidemos liberar la memoria al final

Código PHP:

void __fastcall TForm1::StopStream(void)
{
    if (stream)
        BASS_StreamFree(stream);   //si stream tiene cancion, la liberamos
  
    stream = 0;
    reproduciendo = false;  //variable para controlar la reproduccion
    BASS_Free();    // liberamos el interface de audio

} 


Aqui tenéis los archivos necesarios: (el DLL debe acompañar al deployment del EXE)
http://www.qualinost.tk/descargas/bass_2_files.rar