NotificationCenter und deren Funktion

[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