Search found 712 matches

by Lena
Fri Dec 04, 2020 4:06 am
Forum: Technical
Topic: Build BASS library
Replies: 0
Views: 1

Build BASS library

Hi. Delphi 10.3 / Delphi 10.4.1 When I use the Developmen t mode everything works perfectly. When I switch to Application Store mode I get the error when Build: [DCC Error] E2597 C:\Users\Public\Documents\Embarcadero\Studio\20.0\PlatformSDKs\android-ndk-r17b\toolchains\arm-linux-androideabi-4.9\preb...
by Lena
Wed Dec 02, 2020 10:26 am
Forum: Technical
Topic: Android 7 the application crashes
Replies: 2
Views: 173

Re: Android 7 the application crashes

Crashes HOW exactly? Please be more specific. Debager does not work. I think I have found a solution. It looks like it works: function TDM.AndroidServiceStartCommand(const Sender: TObject; const Intent: JIntent; Flags, StartId: Integer): Integer; var //Android 8.1 ServiceChannel: JNotificationChann...
by Lena
Fri Nov 27, 2020 8:54 am
Forum: Technical
Topic: Android 7 the application crashes
Replies: 2
Views: 173

Android 7 the application crashes

Hello. There is a foreground service code that works great on Android 8.1. In Android 7 the application crashes after a splash screen (I sent my apk). I don't have an Android 7 phone. What's missing for Android 7? RAD 10.3 Thanks. interface uses System.SysUtils, System.Classes, System.Android.Servic...
by Lena
Wed Nov 25, 2020 4:55 am
Forum: Technical
Topic: [Android]BASS
Replies: 31
Views: 7167

Re: [Android]BASS

I understand that in Androidapi.JNI.App the method needs to be rewritten as follows:

Code: Select all

procedure startForeground(id: Integer; notification: JNotification; foregroundServiceType: Integer); cdecl;
What are the next steps for the service code to see this update? Thanks.
Or is it not the right way.
by Lena
Wed Nov 25, 2020 4:40 am
Forum: Technical
Topic: Image Update
Replies: 8
Views: 295

Re: Image Update

Code: Select all

Image1->Picture->Bitmap->FreeImage();
Image1->Picture->Bitmap = NULL; 
?
by Lena
Tue Nov 24, 2020 6:55 am
Forum: Technical
Topic: [Android]BASS
Replies: 31
Views: 7167

Re: [Android]BASS

I found for API 29 need more parametrs FOREGROUND_SERVICE_TYPE_MEDIA_PLAYBACK public final void startForeground (int id, Notification notification, int foregroundServiceType) JavaService.startForeground(StartId, ntf, 2);//too many actual parameters But no version with three parametrs. :( serv.jpg
by Lena
Thu Nov 12, 2020 9:40 am
Forum: Technical
Topic: [Android]BASS
Replies: 31
Views: 7167

Re: [Android]BASS

It is necessary to re-set the foreground service permission in the project options.
I can see in the running applications that the service is running. However, there is no service icon in the tray. In 10.3.3, the service icon was in the tray. :o
by Lena
Thu Nov 12, 2020 9:34 am
Forum: Technical
Topic: Implicit string cast from 'AnsiChar' to 'string'
Replies: 3
Views: 790

Re: Implicit string cast from 'AnsiChar' to 'string'

Sorry I fix. Change to ReadStringAsUtf8.
by Lena
Thu Nov 12, 2020 7:26 am
Forum: Technical
Topic: Implicit string cast from 'AnsiChar' to 'string'
Replies: 3
Views: 790

Re: Implicit string cast from 'AnsiChar' to 'string'

Hi, rlebeau. Where is my mistake now? All Russian characters are unreadable. RAD10.4.1 procedure DoMeta(); var meta: MarshaledAString; metaPtr: TPtrWrapper; metaStr, songName: String; startPos, endPos: Integer; begin meta := BASS_ChannelGetTags(str, BASS_TAG_META); if (meta <> nil) then begin metaPt...
by Lena
Thu Nov 12, 2020 4:38 am
Forum: Technical
Topic: [Android]BASS
Replies: 31
Views: 7167

Re: [Android]BASS

I am trying to use now 10.4.1 Debugger still doesn't work. The application starts normally but the service does not start. :( In manifest: <uses-sdk android:minSdkVersion="23" android:targetSdkVersion="29" /> <service android:exported="false" android:name="com.embarcadero.services.serPublic" /> Some...
by Lena
Wed Nov 11, 2020 1:58 am
Forum: Technical
Topic: [Android]BASS
Replies: 31
Views: 7167

Re: [Android]BASS

Hi. Not all phones start the service. Everything is fine on my Android 8.1. I took a phone with Android 7. The service does not start. There is no service icon in the tray. Maybe need to add something to the service code? If someone has a phone with Android 9, please check or the service starts ther...
by Lena
Wed Nov 11, 2020 1:02 am
Forum: Technical
Topic: Update Progressbar
Replies: 14
Views: 2355

Re: Update Progressbar

Thanks a lot for the detailed explanation! I removed from the code BASS_SampleFree. My code contains three buttons PLAY, STOP, CLOSE //STOP play procedure TForm1.Button2Click(Sender: TObject); begin BASS_ChannelStop(str); //BASS_StreamFree(str); //BASS_SampleFree (smp); Text1.Text := ''; //title son...
by Lena
Tue Nov 10, 2020 10:22 am
Forum: Technical
Topic: Update Progressbar
Replies: 14
Views: 2355

Re: Update Progressbar

Also I use this code from BASS for stop music: var Form1: TForm1; smp: HSAMPLE; str: HSTREAM; //************** procedure TForm1.Button2Click(Sender: TObject); begin BASS_ChannelStop(str); BASS_SampleFree (smp); end; But I am not initializing anywhere smp ! Why does it work and how is it correct for ...
by Lena
Tue Nov 10, 2020 10:02 am
Forum: Technical
Topic: Update Progressbar
Replies: 14
Views: 2355

Re: Update Progressbar

Thank you very much rlebeau! Everything looks right now. I also discovered my mistake. Before using CreateAnonymousThread, I was checking the Internet using my custom function. This is a mistake that did not allow to see AniIndicator1 when internet connection bad. I removed my function of checking t...
by Lena
Sat Nov 07, 2020 8:33 am
Forum: Technical
Topic: Update Progressbar
Replies: 14
Views: 2355

Re: Update Progressbar

I try this: var ercode: DWORD; //*** ercode := 100; TThread.CreateAnonymousThread(procedure () begin TThread.Synchronize (nil, procedure () begin AniIndicator1.Enabled := True; AniIndicator1.Visible := True; end); BASS_StreamFree(str); str := BASS_StreamCreateURL(PChar('http://91.199.194.34:8000'), ...