delphi - Delphi 西雅图的 Windows 10 TNotification 内存泄漏？

Question

我正在我的应用程序中实现 Windows 10 通知。然而，下面的代码(运行良好)显然给出了 1 个 TNotification 对象和 2 个字符串的备忘录泄漏，但我在 block 末尾释放了该对象:

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;

我是在做一些愚蠢的事情还是在通知的实现中存在内存泄漏？

• 史蒂夫

Answer 1

这确实是由TNotificationCenterDelegateActivated引起的泄漏。在其 Create 中，创建了 TNotification 参数的副本，但从未释放。

似乎负责此代码的一些开发人员不太熟悉非 ARC 环境。