Macapi.Notifications

Macapi.Notifications

Pont de notification macOS simplifié pour Delphi #DelphiCocoaFlavored

Lily Stilson // 2020

---

Usage

Cette unité est destinée à fonctionner avec RAD Studio 10.4. Cela ne fonctionnera pas dans les anciennes versions en raison d'un bug dans Macapi.Foundation. Si votre application n'a pas été signée avec le certificat de développeur Apple, à partir de macOS 10.15, cette unité fonctionnera, mais n'appellera aucune notification en raison des limitations du système d'exploitation.

PlanificationNotification

Planification simplifiée des notifications. Déclenche une notification après à une heure programmée ;

 procedure ScheduleNotification ( const ATitle, ASubtitile, AInformation: String; 
                               const ADeliveryDate: TDateTime; 
                               const UseTimeZone: boolean = True);

• ATitre - Titre de la notification (le nom de l'application sera utilisé s'il est vide)
• ASous-titre – Sous-titre de notification (facultatif)
• AInformation – Organisme de notification (facultatif)
• ADeliveryDate – Date de livraison de la notification
• UseTimeZone - Utiliser le fuseau horaire actuel du PC pour déclencher la notification (par défaut = true)

PrésentNotification

Présentation simplifiée des notifications. Déclenche une notification immédiatement.

 procedure PresentNotification ( const ATitle, ASubtitile, AInformation: String);

• ATitre - Titre de la notification (le nom de l'application sera utilisé s'il est vide)
• ASous-titre – Sous-titre de notification (facultatif)
• AInformation – Organisme de notification (facultatif)

Exemples

 // SceduleNotification // Form contains TButton.
procedure TNSNotificationsTestForm.SceduleNotificationButtonClick (Sender: TObject);
begin
  SceduleNotification( ' Notification Title ' , ' Foo Bar ' , ' Very Informative. Such Notification! ' , 
                      Now + EncodeTime( 0 , 0 , 5 , 0 ));
end ;

 // NSSavePanel // Form contains TButton and TEdit
procedure TNSNotificationsTestForm.PresentNotificationButtonClick (Sender: TObject);
begin
  PresentNotification( ' Notification Title ' , ' Foo Bar ' , ' Very Informative. Such Notification! ' );
end ;

Feuille de route

• Gestionnaire de clics de notification