Macapi.Notifications

Macapi.Notifications

Jembatan pemberitahuan macOS yang disederhanakan untuk Delphi #DelphiCocoaFlavored

Lily Stilson // 2020

---

Penggunaan

Unit ini dimaksudkan untuk bekerja dengan RAD Studio 10.4. Ini tidak akan berfungsi di versi lama karena bug di Macapi.Foundation. Jika aplikasi Anda tidak ditandatangani dengan Sertifikat Pengembang Apple, maka mulai dari macOS 10.15 unit ini akan berfungsi, namun tidak akan memanggil pemberitahuan apa pun karena keterbatasan dalam OS.

Pemberitahuan Jadwal

Penjadwalan notifikasi yang disederhanakan. Pemberitahuan kebakaran setelah waktu yang dijadwalkan;

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

• ATitle - Judul pemberitahuan (Nama aplikasi akan digunakan, jika kosong)
• ASubtitile - Subjudul pemberitahuan (Opsional)
• AInformation - Badan notifikasi (Opsional)
• ADliveryDate - Tanggal pengiriman notifikasi
• UseTimeZone - Gunakan zona waktu PC saat ini untuk mengaktifkan notifikasi (default = true)

Pemberitahuan Saat Ini

Penyajian notifikasi yang disederhanakan. Pemberitahuan kebakaran segera.

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

• ATitle - Judul pemberitahuan (Nama aplikasi akan digunakan, jika kosong)
• ASubtitile - Subjudul pemberitahuan (Opsional)
• AInformation - Badan notifikasi (Opsional)

Contoh

 // 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 ;

Peta jalan

• Pengendali klik notifikasi