Foros Club Delphi - BASS Library 2.4 en App C++ Builder Windows

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - BASS Library 2.4 en App C++ Builder Windows (https://www.clubdelphi.com/foros/showthread.php?t=96853)

BASS Library 2.4 en App C++ Builder Windows

Primero el include:

Código:

#include "bass.h"

segundo, habiendo convertido el DLL con IMPLIB del Rad Studio, generamos el LIB de libreria dinamica que agregaremos al Proyecto
(de esta forma el codigo reconocera las llamadas a funciones de la Bass)

tercero, en el constructor del Form por ejemplo, las 2 o 3 llamadas a funciones para inicializarla

Código:

if (HIWORD(BASS_GetVersion()) != BASSVERSION)

                throw Exception("No se pudo cargar la versión " BASSVERSIONTEXT " de BASS");



        if (!BASS_Init(-1, 44100, 0, Handle, 0))

                throw Exception("Error inicializando audio");



        BASS_SetConfig(BASS_CONFIG_NET_PLAYLIST, 1);



  BASS_SetConfig(BASS_CONFIG_NET_BUFFER, 12000);



  BASS_Start();

y por ultimo ya por ejemplo las llamadas a funciones aqui pondre por ejemplo como cargar una emisora de radio con BASS_StreamCreateURL()

Código:

   stream = BASS_StreamCreateURL("http://server1.chilltrax.com:9000/", 0, 0, NULL, 0);



   if (stream) {



                reproduciendo = BASS_ChannelPlay(stream, false);

                //BASS_SetVolume(100);

                //ShowMessage("Reproduciendo radio en linea...");

        } else {

                // Obtener y mostrar el código de error de BASS

                int errorCode = BASS_ErrorGetCode();

                ShowMessage("Error al cargar la URL de la radio. Código de error: " + IntToStr(errorCode));

        }

stream esta definido como HSTREAM stream; en el fichero .h del Unit1.cpp

recordad que si distribuimos la app a terceros (otras maquinas) debe llevar el fichero bass.dll acompañando al EXE

os pongo tambien algunos significados de los codigos de Error de la BASS Library (esto puede sernos util)

0: Result := 'BASS_OK';
1: Result := 'BASS_ERROR_MEM';
2: Result := 'BASS_ERROR_FILEOPEN';
3: Result := 'BASS_ERROR_DRIVER';
4: Result := 'BASS_ERROR_BUFLOST';
5: Result := 'BASS_ERROR_HANDLE';
6: Result := 'BASS_ERROR_FORMAT';
7: Result := 'BASS_ERROR_POSITION';
8: Result := 'BASS_ERROR_INIT';
9: Result := 'BASS_ERROR_START';
14: Result := 'BASS_ERROR_ALREADY';
18: Result := 'BASS_ERROR_NOCHAN';
19: Result := 'BASS_ERROR_ILLTYPE';
20: Result := 'BASS_ERROR_ILLPARAM';
21: Result := 'BASS_ERROR_NO3D';
22: Result := 'BASS_ERROR_NOEAX';
23: Result := 'BASS_ERROR_DEVICE';
24: Result := 'BASS_ERROR_NOPLAY';
25: Result := 'BASS_ERROR_FREQ';
27: Result := 'BASS_ERROR_NOTFILE';
29: Result := 'BASS_ERROR_NOHW';
31: Result := 'BASS_ERROR_EMPTY';
32: Result := 'BASS_ERROR_NONET';
33: Result := 'BASS_ERROR_CREATE';
34: Result := 'BASS_ERROR_NOFX';
37: Result := 'BASS_ERROR_NOTAVAIL';
38: Result := 'BASS_ERROR_DECODE';
39: Result := 'BASS_ERROR_DX';
40: Result := 'BASS_ERROR_TIMEOUT';
41: Result := 'BASS_ERROR_FILEFORM';
42: Result := 'BASS_ERROR_SPEAKER';
43: Result := 'BASS_ERROR_VERSION';
44: Result := 'BASS_ERROR_CODEC';
45: Result := 'BASS_ERROR_ENDED';
46: Result := 'BASS_ERROR_BUSY';