Notifications mit individuellem Sound

[TurboMagic]

Zitat von Kai_in_HH:

Weiß ich doch, dass Android ohne Java(-Sch*ss) nicht geht.
Aber mögen muss ich es deswegen nicht.

Ich nehme halt Delphi damit ich mit dem Schrott nicht in Verbindung kommen muss.
Aber erlebe halt immer wieder Hindernisse. Wobei ich nicht weiß, ob Embarcadero in einer nicht sauberen Implementierung daran Schuld ist, oder etwas anderes.

Aber die Diskussion darüber löst nicht unser Problem...

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.

[Kai_in_HH]

Zitat von TurboMagic:

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_in_HH]

Anzeige ist raus ... ach Quatsch, ich meine Ticket ist eröffnet.

[Kai_in_HH]

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.

[TurboMagic]

Zitat von Kai_in_HH:

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...

[Kai_in_HH]

Zitat von TurboMagic:

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

[bcvs]

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;

[himitsu]

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');

[Kai_in_HH]

Zitat von Kai_in_HH:

Zitat von TurboMagic:

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

Folks,

hat jemand Erfahrung damit, ob und wenn überhaupt, wie schnell die reagieren?
Seit 10. Mai steht das Ticket auf "Ready for validation".
Sprich: angekommen im Bug-Tracker, hat aber noch keiner angesehen.

Also als ich noch bei Borland (ja, so hießen die 1988) gearbeitet habe, ging das schneller.
Ein Anruf von einem Kunden, Problem nachgestellt und 2 Stunden später war die Mail an USA raus.

Auf was warten die? Auf günstige Sonnenwinde oder das der Supportleiter bei Vollmond ein Einhorn melken konnte?

[TurboMagic]

Hallo,

das erfassen eines Bugreports ist schon mal ein guter erster Schritt.
Mal wird da schneller drauf reagiert, mal langsamer.
Nur: über diesen Weg gibt's meist keine schnellen Lösungen.

Aber: wenn du eine laufende Subskription hast, steht dir normalerweise
noch ein weiterer Weg offen, bei dem sich jemand von EMBT dann tatsächlich
persönlich bei dir meldet. Das führt auch immer wieder zu Fixes noch bevor
diese im Produkt selbst drin sind. Zumindest hab' ich auch dem Weg schon
Code erhalten und ein anderes mal noch Ideen was zu untersuchen wäre die dann
zu einem Workaround geführt haben der für mich gangbar war.

Der Weg ist hier zu erreichen:
https://www.embarcadero.com/support