AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Cross-Platform-Entwicklung Notifications mit individuellem Sound

Notifications mit individuellem Sound

Ein Thema von bcvs · begonnen am 8. Mär 2024 · letzter Beitrag vom 14. Mai 2024
Antwort Antwort
Seite 2 von 3     12 3   
Kai_in_HH

Registriert seit: 25. Jun 2008
Ort: Hamburg
57 Beiträge
 
Delphi 11 Alexandria
 
#11

AW: Notifications mit individuellem Sound

  Alt 10. Mai 2024, 12:32
Also unter windows würde ich sagen, dass kein mp3 für solche Sounds verwendet wird, sonden halt wav. Bei Android hab ich da aber keine Ahnung.
Ich weiß nicht mehr seit welcher Version, aber Windows unterstützt schon länger MP3s für alle möglichen Events....

Unter Android ist MP3 auch kein Problem, ich habe viele eigene kleine MP3s auf meinem Handy und als Ping für SMS, WhatsApp, Mail.....name it, you got it....eingestellt.
Kai
formerly known as linus_wildcat
  Mit Zitat antworten Zitat
Kai_in_HH

Registriert seit: 25. Jun 2008
Ort: Hamburg
57 Beiträge
 
Delphi 11 Alexandria
 
#12

AW: Notifications mit individuellem Sound

  Alt 10. Mai 2024, 12:36
Nee. Falls du aber ein kleines Demo Programm zusammen hast welches das Problem zeigt kannst du gerne
hier ein Ticket erstellen:

https://qp.embarcadero.com/

Dann sollte sich EMBT mal irgendwann des Themas annehmen.
Dazu muss ich noch nicht mal eine Demo-App klöppeln, wie es geht - bzw. gehen soll steht auf deren eigener Seite http://docwiki.embarcadero.com/RADSt...S_and_Android)
Kai
formerly known as linus_wildcat
  Mit Zitat antworten Zitat
Kai_in_HH

Registriert seit: 25. Jun 2008
Ort: Hamburg
57 Beiträge
 
Delphi 11 Alexandria
 
#13

AW: Notifications mit individuellem Sound

  Alt 10. Mai 2024, 12:56
Anzeige ist raus ... ach Quatsch, ich meine Ticket ist eröffnet.
Kai
formerly known as linus_wildcat
  Mit Zitat antworten Zitat
Kai_in_HH

Registriert seit: 25. Jun 2008
Ort: Hamburg
57 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Notifications mit individuellem Sound

  Alt 10. Mai 2024, 17:49
UPDATE:
Habe meine Anwendung mal wieder für Windows kompiliert und auch hier kommt die Notification (unten rechts am Bildschirm), aber auch nicht mit meinem Ton, sondern das Standard-Palimpalim.
Kai
formerly known as linus_wildcat
  Mit Zitat antworten Zitat
TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
2.856 Beiträge
 
Delphi 12 Athens
 
#15

AW: Notifications mit individuellem Sound

  Alt 11. Mai 2024, 08:57
Anzeige ist raus ... ach Quatsch, ich meine Ticket ist eröffnet.
Es wäre schön, wenn du den Link zum Ticket hier posten könntest.
Dann können wir es ggf. verfolgen, kommentieren (falls uns noch was hilfreiches dazu einfällt) usw...
Grüße
TurboMagic
  Mit Zitat antworten Zitat
Kai_in_HH

Registriert seit: 25. Jun 2008
Ort: Hamburg
57 Beiträge
 
Delphi 11 Alexandria
 
#16

AW: Notifications mit individuellem Sound

  Alt 11. Mai 2024, 10:32
Es wäre schön, wenn du den Link zum Ticket hier posten könntest.
Dann können wir es ggf. verfolgen, kommentieren (falls uns noch was hilfreiches dazu einfällt) usw...
Gute Idee...in der Hoffnung, dass das Ticket "öffentlich lesbar" ist.

https://embt.atlassian.net/servicede...rtal/1/RSS-887
Kai
formerly known as linus_wildcat
  Mit Zitat antworten Zitat
bcvs

Registriert seit: 16. Jun 2011
674 Beiträge
 
Delphi 12 Athens
 
#17

AW: Notifications mit individuellem Sound

  Alt 13. Mai 2024, 16:37
Sorry, ich hatte vergessen, meine Lösung hier zu posten.

Man muss das über einen Channel machen. Ich hatte dazu ein Ticket im Customer Support Portal eröffnet. Die Antwort:

Zitat:
I must stay there isn't a lot of information on this either in the Android documentation or online so here are the important points.

1) sound needs to be from presented as "content://" it be to make is shareable with the external OS to play the notification sound., because the notification is set up using an Intent and that means the it has to be a shareable URI.

2) the sound can only be set at the channel level AND when the channel is created, so the default channel will always have the default sound. So to have new sound you have to set it at when a new channel is created.
3) Setting the sound at the notification level has been deprecated in Android 7 or 8, that sound is not used at all. (I learnt this from the looking at the Android source)
4) I have modified your code so I could figure out how the notifications work, but it all boils down to a simple function to get the file URI, and to use the file URI you need to need to specify secure file sharing in the entitlements list, in the project options, this will give you the ability to use the file provider.
So läuft's bei mir:
Delphi-Quellcode:
{$ifdef ANDROID}

const
    sChannelID = 'MyChannelID'; // to have a custom sound you HAVE to use custom channel
                                // as the channel's sound is set at creation

//this is crucial bit...
// to use fileprovider you need to specify secure file sharing in the entitlements list
function GetFileUriStr(const AFileName: string): string;
var
  LFile: JFile;
begin
  LFile := TJFile.JavaClass.init(StringToJString(AFileName));
  Result := JStringToString(TAndroidHelper.JFileToJURI(LFile).toString);
end;

{$endif}

procedure TdmNotification.CreateDefaultNotificationChannel;
// wird vorab aufgerufen, z.B. im Create
var
 NotificationChannel: TChannel;
begin
 NotificationChannel := NotificationCenter.CreateChannel;
 NotificationChannel.Id := sChannelID;
 NotificationChannel.Title := 'Custom notification channel';
 NotificationChannel.Description := 'Notification channel to test sound';
 NotificationChannel.Importance := TImportance.High; // NOTE: This is a 'heads-up notification'.
 //the CONTENT URI string needs to be set here and will be used for the all THIS channel notifications
 NotificationChannel.SoundName:= GetFileUriStr(GetSoundFileName);
 NotificationCenter.CreateOrUpdateChannel(NotificationChannel);
end;


function TdmNotification.GetSoundFileName: string;
begin
{$IFDEF IOS}
  Result := 'mixkit-bell-notification-933.caf';
{$ELSE}
  Result := IncludeTrailingPathDelimiter(TPath.GetDocumentsPath) + 'mixkit-bell-notification-933.mp3';
{$ENDIF}
end;

procedure TdmNotification.CreateNotification(AlarmTime);
var Notification: TNotification;
begin
  Notification := NotificationCenter.CreateNotification;
  try
    Notification.Name :='MyNotification';
    Notification.Title :='Test Notification Title';
    Notification.AlertBody:='Test Notification with individual sound';
    {$ifdef ANDROID}
    Notification.ChannelId := sChannelID;
    {$else}
    Notification.EnableSound:=true;
    Notification.SoundName:= GetSoundFileName;
    {$endif}

    Notification.FireDate:= AlarmTime;

    NotificationCenter.ScheduleNotification(Notification);
  finally
    Notification.Free;
  end;
end;
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.202 Beiträge
 
Delphi 12 Athens
 
#18

AW: Notifications mit individuellem Sound

  Alt 13. Mai 2024, 17:23
Wenn man schon TPath benutzt, dann kann man auch gleich Weiteres davon verwenden.
Delphi-Quellcode:
Result := IncludeTrailingPathDelimiter(TPath.GetDocumentsPath) + 'mixkit-bell-notification-933.mp3';

Result := TPath.Combine(TPath.GetDocumentsPath, 'mixkit-bell-notification-933.mp3');
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Kai_in_HH

Registriert seit: 25. Jun 2008
Ort: Hamburg
57 Beiträge
 
Delphi 11 Alexandria
 
#19

AW: Notifications mit individuellem Sound

  Alt 13. Mai 2024, 20:34
@bcvs
Das wäre eigentlich genau das Beispiel, wonach ich gesucht habe, da gibts echt nicht viel, aber leider bekomme ich in der Zeile

Code:
  NotificationChannel.SoundName:= GetFileUriStr(TPath.Combine(TPath.GetDocumentsPath, 'bell.mp3'));
der Prozedur CreateDefaultNotificationChannel die Fehlermeldung, dass es die Funktion im Objekt TChannel nicht gibt.

Kommentiere ich diese Zeile aus, lässt sich die App natürlich kompilieren, löst aber nicht das Problem.
Und für Windows wird es gar nicht gelöst, da ja einige Funktionen / Befehle eh nur unter Android verfügbar sind.

Und nu? Liegt es vielleicht daran, dass ich Delphi 11 CE verwende und nicht die Vollversion 12?
Kai
formerly known as linus_wildcat

Geändert von Kai_in_HH (13. Mai 2024 um 21:26 Uhr)
  Mit Zitat antworten Zitat
bcvs

Registriert seit: 16. Jun 2011
674 Beiträge
 
Delphi 12 Athens
 
#20

AW: Notifications mit individuellem Sound

  Alt 14. Mai 2024, 07:33
Was gibt es bei dir nicht? Das Feld Soundname? Würde mich schon sehr wundern.
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:42 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz