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
方法。
附言:如果在收到推送时应用程序正在运行,则单击它将删除。