Delphi XE8,我通过json向GCM发送消息。单击消息后,我通过...阅读它:

var
  LNotification: TPushServiceNotification;
begin
  for LNotification in AServiceConnection.Service.StartupNotifications do
  begin
    if Assigned(LNotification) and (LNotification.Json.ToString<>'') then
    begin
      Memo1.Lines.Add('Enter by Notification Click: ' +     LNotification.Json.ToString);
    end;
  end;
end;


您能帮我清除“推送”面板中的“消息”吗?

最佳答案

据我所知,您不能删除一个特定的推送通知,但要删除所有通知,请添加TNotificationCenter组件并使用CancelAll方法。

附言:如果在收到推送时应用程序正在运行,则单击它将删除。

08-15 18:11