Einzelnen Beitrag anzeigen

Achim Kalwa

Registriert seit: 2. Apr 2005
Ort: Lienen
110 Beiträge
 
Delphi 12 Athens
 
#3

AW: Toast Notification in Windows 10/11 mit Eventhandler

  Alt 16. Okt 2023, 16:52
Bisher nutzte ich dafür folgendes:
[...]
Code:
procedure TWindowsBenachrichtigung.SendeBenachrichtigung(ASender: TObject; ABenachrichtigungstitel, AVorschauText: String);
begin
     try
        FNachricht.EnableSound := True;
        FNachricht.AlertBody := AVorschautext;
        FNachricht.Title := ABenachrichtigungstitel;
        FNachrichtCenter.OnReceiveLocalNotification := DoReceiveLocalNotification;
        FNachrichtCenter.PresentNotification(FNachricht);
     finally
     end;
end;
Dies hat aber ein großes Problem. Die erste Notification des Tages hat einen cryptischen Titel wie Embarcadero.Toasts.######### (siehe First Note.png)
und alle danach folgenden immer nur den Exe-Namen (Next Notes.png).

Sie soll aber gezielte Bezeichnungen enthalten. [...]
Der kryptische Titel taucht bei mir auch auf mit dem Beispielcode von Embarcadero:
Code:
C:\Users\Public\Documents\Embarcadero\Studio\22.0\Samples\Object Pascal\VCL\Windows 10 Notifications\NotificationsProject.dpr
Im Embarcadero Quality Center gibt es dazu einen Bug-Report: RSP-32375, also "Lösung" wird angeraten, rechtzeitig vor dem Erzeugen der ersten Notification eine Initialisierung durchzuführen, z.B. in FormCreate():
Code:
NotificationCenter1.PlatformInitialize;
Das ist auch im DocWiki beschrieben:
https://docwiki.embarcadero.com/Libr...formInitialize

HTH
Achim

Geändert von Achim Kalwa (16. Okt 2023 um 16:54 Uhr) Grund: RSP-Link korrigiert
  Mit Zitat antworten Zitat