Topic: BASS(Android) and Delphi XE5

[sayadallel]

Hi everybody

on Android 4.4.2 KitKat and Delphi XE7 :
the application Crashes when i try to Init Bass library :

Code: [Select]

BASS_Init(-1,44100, BASS_DEVICE_DEFAULT,Handle,nil);
now if i use device 0 instead of -1 then its stop crashing :
 But i can't play any stream !! and i get error 5 and error 37 when using BASS_StreamCreateURL .

rem: NetRadio.apk is not working in KitKat too

seems like the libbass.so is not compatible with the Android 4.4.2 or some thing ??

Any Ideas ?


Regards
and thanks for your Great Job on this Library

[sayadallel]

well
i tried  to use Device "0" (no device) , and decoded chanel.
spending a long time to change the code from: C Style to Delphi Style , .

it is working now ,

 But i have this problem:
it is playing the stream Very Fast (2X or 4X time)

snip :

Code: [Select]

BASS_StreamFree(uStream); // close old stream
 BASS_SetDevice(0);
 uStream:=BASS_StreamCreateURL(Pchar(URL),0,BASS_STREAM_DECODE or BASS_UNICODE ,nil,nil);

 track := TJAudioTrack.JavaClass.init(3,44100,3,2, TJAudioTrack.JavaClass.getMinBufferSize(44100,3,2),1);
 track.play;

 jbuffer:=  TJavaArray<SmallInt>.Create(20000);

 res:=BASS_ChannelGetData(uStream, @buffer[1],Length( buffer));
 while (res <> -1)  do
   begin
      if res > 0 then
      begin
...

some code here

...
        track.write( jbuffer,0,res ) ;
      end
      else    try
          Sleep(250);
       except        end;

      res:=BASS_ChannelGetData( uStream, @buffer[1], Length( buffer)); // decode some data
    end;

[Ionut Cristea]

TJAudioTrack.JavaClass.init(3,44100,3,2, TJAudioTrack.JavaClass.getMinBufferSize(44100,3,2),1);

Use here the values for freq, channels retrieved from BASS_ChannelGetInfo function

[sayadallel]

thanks Ionut .

Done ..

the problem was using STEREO instead of MONO :
the new Code will be :

Code: [Select]

track := TJAudioTrack.JavaClass.init(TJAudioManager.JavaClass.STREAM_MUSIC,
                                       info.freq,
                                       TJAudioFormat.JavaClass.CHANNEL_CONFIGURATION_MONO ,
                                       TJAudioFormat.JavaClass.ENCODING_PCM_16BIT,
                                      TJAudioTrack.JavaClass.getMinBufferSize(info.freq,
                                                               TJAudioFormat.JavaClass.CHANNEL_CONFIGURATION_MONO,
                                                               TJAudioFormat.JavaClass.ENCODING_PCM_16BIT),
                                                               TJAudioTrack.JavaClass.MODE_STREAM);


i still have glitchesin the  Stream ,it makes regular cuts like this :
3 sec sound then 3 sec off  again and again !!



any idea ?

Regards

[Ionut Cristea]

 Create a thread that will use BASS_ChannelGetData and track.write function. Also you may want to try without that Sleep to see what it happen.

[sayadallel]

i already did that ...

it still cut's !!

it play sounds for 3 sec then stop playing for 3 sec while GetData(..);

i guess there must be a variable to set some buffer or some thing!!

[Polywick Studio]

I got similar error for speed too fast.

When you load, make sure you * 2 (sizeof) as you are loading Unicode, and have BASS_UNICODE for Delphi/Android, Delphi/iOS for filenames.

Hello,
Could anybody please tell me where could I find the libbass.so file so I can put it in the Library directory?

Thanks.

It's in the Bass-Android.ZIP file. under /Lib/*

[Polywick Studio]

Hi everybody

on Android 4.4.2 KitKat and Delphi XE7 :
the application Crashes when i try to Init Bass library :

Code: [Select]

BASS_Init(-1,44100, BASS_DEVICE_DEFAULT,Handle,nil);
now if i use device 0 instead of -1 then its stop crashing :
 But i can't play any stream !! and i get error 5 and error 37 when using BASS_StreamCreateURL .

rem: NetRadio.apk is not working in KitKat too

seems like the libbass.so is not compatible with the Android 4.4.2 or some thing ??

Check if you have populated the 3 different bass libraries to:

/libs/x86/*
/libs/armeabi/*
/libs/armabii-v7a/*

No crashes with Android 4.4.2, Android 4.5 here.

[Polywick Studio]

help me how to make Cyrillic a meta

In order to use Cyrillic, you need to encode the URLs you use. Use UTF8Encode to encode the Russian/Hungarian/French URLs to normal escaped URLs.

[pkklovezp]

  ;D谢谢，感谢大家，我是一名来自中国的业余delphi爱好者...

[drama22]

is this unit is up to date ?

i can see a plugins that not exist in current bass version

    BASS_PluginLoad(PChar(DocDir + 'libbass_aac.so'), BASS_UNICODE);
    BASS_PluginLoad(PChar(DocDir + 'libbass_alac.so'), BASS_UNICODE);
    BASS_PluginLoad(PChar(DocDir + 'libbass_ape.so'), BASS_UNICODE);
    BASS_PluginLoad(PChar(DocDir + 'libbass_mpc.so'), BASS_UNICODE);

[drama22]

trying to play from memory stream but no sound

Stream.Position := 0;
while Stream.Position < Stream.Size do
begin

AudioDataSize := BASS_StreamCreateFile(True,Stream.Memory,0,Stream.Size, 0);
try

BASS_ChannelPlay(AudioDataSize, False);
except
//log any exception
end;