如何在没有振动的情况下在delphi XE10西雅图中发出通知

Question

在Android应用中，当应用进入后台时，代码会触发静音通知。在Delphi XE8中它工作正常 - 没有声音，没有振动，但它在Delphi XE10中表现不同 - 没有声音，但有振动[振动在用户权限中关闭]。我怎么能消除振动？

begin
 MyNotification := NotificationCtr.CreateNotification;
try
 MyNotification.Name := ' Name';
 MyNotification.AlertBody := 'AlertBody';
 MyNotification.Number := 0;
 MyNotification.EnableSound := false;
 MyNotification.FireDate := Now;
 NotificationCtr.ScheduleNotification(MyNotification);
finally
 MyNotification.DisposeOf;
end; 
end;

Answer 1

这被报告为错误RSP-12396。它在本周发布的西雅图10 Update 1中得到修复。