Macapi.Notifications
v1.0.0
Delphi 用の簡素化された macOS 通知ブリッジ #DelphiCocoaFlavored
リリー・スティルソン // 2020
このユニットは RAD Studio 10.4 で動作するように設計されています。 Macapi.Foundation のバグのため、古いバージョンでは動作しません。アプリが Apple Developer Certificate で署名されていない場合、macOS 10.15 以降、このユニットは動作しますが、OS の制限により通知は呼び出されません。
通知スケジュールの簡素化。スケジュールされた時間の後に通知を発行します。
procedure ScheduleNotification ( const ATitle, ASubtitile, AInformation: String;
const ADeliveryDate: TDateTime;
const UseTimeZone: boolean = True);
簡素化された通知の表示。すぐに通知を発行します。
procedure PresentNotification ( const ATitle, ASubtitile, AInformation: String);
// 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 ;