NotificationCenter und deren Funktion

[Ghostwalker]

Hi,

ich experimentiere grad ein wenig mit dem TNotificationCenter rum und stosse dabei auf folgende Probleme:

Basiscode sieht so aus (direkt aus der Demo geholt):

Delphi-Quellcode:

var
  MyNotification: TNotification;
begin
  MyNotification := NotificationCenter1.CreateNotification;
  try
    MyNotification.Name := 'Windows Notification';
    MyNotification.Title := 'My first Notification';
    MyNotification.AlertBody := 'Notification send by my application.';
    MyNotification.FireDate := Now()+EncodeTime(0,0,10,0);
    NotificationCenter1.PresentNotification(MyNotification);
  finally
    MyNotification.Free;
  end;
end;

Soweit funktionierts auch, die Nachricht wird sofort angezeigt.

mach ich nun aus

Delphi-Quellcode:

    
NotificationCenter1.PresentNotification(MyNotification);

    NotificationCenter1.ScheduleNotification(MyNotification); wars das. Die Nachricht wird nicht angezeigt (nach 10 Sekunden sollte sie das eigentlich).

Auch einen eigenen Sound bekomme ich nicht ans laufen, obwohl ich mich hier
an diese Tut gehalten hab: http://docwiki.embarcadero.com/RADSt...fication_Sound

Weder mit mp3 noch mit wav, egal was ich für einen Pfad angebe.....

Hat jemand hier evtl. den ein oder anderen Tip ?

[haentschman]

Moin...

Zitat:

NotificationCenter1.ScheduleNotification(MyNotific ation)

...Vieleicht vor dem finally deines Beispieles und du räumst dann die Notification weg?
Zeig mal den kompletten Zusammenhang...

[himitsu]

Zitat von haentschman:

und du räumst dann die Notification weg?

MyNotification.Free;
Daran hätte ich auch als Erstes gedacht.

Einfach mal nicht löschen und schauen was passiert.

[haentschman]

In der Dokumentation habe ich nichts finden können, wie mit der Freigabe der Objekte umgegangen wird. Im Emba Beispiel wird die Notification (PresentNotification) weggeräumt.
Gefühlt sollte sich die NotificationCenter Liste selbst um die Freigabe kümmern.

[himitsu]

Es kommt halt drauf an.

Wird das auch bei Windows deregistriert, wenn man das Objekt löscht, dann ist es ja wieder weg und kann nicht mehr angezeigt werden.
Es wäre ja auch praktisch, wenn man weiterhin eine Verbindung zum Windows hat, um die Notification abbrechen zu können, wenn man sie dann doch nicht mehr anzeigen will.

Würde dagegen durch ScheduleNotification in Windows nur ein neuer Eintrag (Kopie ) gemacht und der wird nicht gelöscht/entfernt/Cancel/..., wenn man das Objekt freigibt, dann kann man das Free auch machen.

Drum ja einfach mal ausprobieren, ob es schon hilft, wenn man nicht löscht.



Das MyNotification.Name := 'Windows Notification'; ist schonmal kein TComponent.Name ? (wegen dem Leerzeichen, was da nicht erlaubt wäre)
Da könnte man nun auf die Idee kommen, dass es sowas wie eine ID sein könnte, mit der man später nochmal drauf zugreifen könnte, wenn man das Objekt zwischendurch gelöscht hätte und ein Neues erstellt.

[haentschman]

Im Emba FMX Beispiel wird auch beim Schedule das Objekt weggeräumt (über die Referenzzählung)...

Delphi-Quellcode:

procedure TNotificationsForm.btnSendScheduledNotificationClick(Sender: TObject);
var
  Notification: TNotification;
begin

{ verify if the service is actually supported }
  Notification := NotificationC.CreateNotification;
  try
    Notification.Name := 'MyNotification';
    Notification.AlertBody := 'Delphi for Mobile is here!';

    { Fired in 10 second }
    Notification.FireDate := Now + EncodeTime(0,0,10,0);

    { Send notification in Notification Center }
    NotificationC.ScheduleNotification(Notification);
  finally
    Notification.DisposeOf;
  end;
end;

...dann ich bin hier leider raus.

[ZYLAGON]

Zitat:

Delphi-Quellcode:

Delphi-Quellcode:

var
  MyNotification: TNotification;
begin
  MyNotification := NotificationCenter1.CreateNotification;
  try
    MyNotification.Name := 'Windows Notification';
    MyNotification.Title := 'My first Notification';
    MyNotification.AlertBody := 'Notification send by my application.';
    MyNotification.FireDate := Now()+EncodeTime(0,0,10,0);
    NotificationCenter1.PresentNotification(MyNotification);
  finally
    MyNotification.Free;
  end;
end;

Dieser Code erzeugt ein Speicherleck.
Weiß vielleicht jemand, wie das ohne Speicherleck geht?

ZYL

[himitsu]

5 Jahre später und diese Komponente funktioniert immernoch nicht.
https://www.delphipraxis.net/209875-...-reaktion.html

Anzeigen tut es was, egal ob mit oder ohne Freigeben (wenn man sofort anzeigt und nicht über einen Zeitstempel)

Aber beim Schließen der Anwendung knallt es dann öfters mal in einem TDictionary<>.

Das Event reagiert nur, wenn man auf das PopupFenster kickt, aber nicht wenn in der Sidebar.

Und programmseitig aufräumen kann man Notifications auch noch nicht.