Wyciek pamięci w Windows 10 TNotification w Delphi Seattle?

Question

Wdrażam Windows 10 Notification w mojej aplikacji. Jednak poniższy kod (który działa dobrze) najwyraźniej dać przeciek notatki z 1 TNotification obiektów i 2 strun, ale ja uwolnić obiekt na końcu bloku:

aNotification := NotificationCenter.CreateNotification; 

//-- If not assigned then must be Win 8.1 or below 
if not assigned(aNotification) then 
    exit; 

try 
    aNotification.Title := AlignMixVersionName + ' License'; 
    aNotification.AlertBody := aText; 

    NotificationCenter.PresentNotification(aNotification); 

finally 
    aNotification.Free; 
end; 

robię coś głupiego czy istnieje wyciek pamięci w implementacji powiadomień?

• Steve

Answer 1

To jest rzeczywiście wyciek spowodowany TNotificationCenterDelegateActivated. W jego numerze Create jest tworzona kopia parametru TNotification, ale nigdy nie została zwolniona.

Wygląda na to, że niektórzy programiści odpowiedzialni za ten kod nie są biegli w środowiskach innych niż ARC.