Notificação

Top  Previous  Next

1 - Coloque 1 TNotificationCenter na tela
 

2 - Crie a função:

 
var
  Notification: TNotification;
begin
  { verify if the service is actually supported }
  if NotificationCenter1.Supported then
  begin
    Notification := NotificationCenter1.CreateNotification;
    Notification.Name := 'Background Test';
    Notification.AlertBody := 'Prime Numbers Computed';
    Notification.FireDate := Now;
 
    { Send notification in Notification Center }
    NotificationCenter1.ScheduleNotification(Notification);
  end
end;

 

noti1     noti2