delphi IOS 通知 TNotification

http://blogs.embarcadero.com/ao/2013/05/01/39450

TNotification

http://docwiki.embarcadero.com/CodeExamples/Seattle/en/FMX.Notification.Mac_%28Delphi%29

http://docwiki.embarcadero.com/RADStudio/Seattle/en/Mobile_Tutorial:_Using_Notifications_%28iOS_and_Android%29

unit Unit1;interfaceusesSystem.SysUtils, System.Classes, FMX.Forms, FMX.Platform;typeTForm1 = class(TForm)procedure FormCreate(Sender: TObject);private{ Private declarations }public{ Public declarations }function AppEvent(AAppEvent: TApplicationEvent; AContext: TObject) : Boolean;end;varForm1: TForm1;implementation{$R *.fmx}usesFMX.Notification;procedure SendNotification;
varNotificationService: IFMXNotificationCenter;Notification: TNotification;
beginif TPlatformServices.Current.SupportsPlatformService(IFMXNotificationCenter) thenNotificationService := TPlatformServices.Current.GetPlatformService(IFMXNotificationCenter) as IFMXNotificationCenter;if Assigned(NotificationService) then beginNotification := TNotification.Create;tryNotification.Name := 'MyLocalNotification';Notification.AlertBody := 'Hello from the Delphi XE4 iOS app that you used 5 seconds ago!';Notification.FireDate := Now + EncodeTime(0,0,5,0);NotificationService.ScheduleNotification(Notification);finallyNotification.DisposeOf;end;end
end;function TForm1.AppEvent(AAppEvent: TApplicationEvent; AContext: TObject) : Boolean;
beginif AAppEvent = TApplicationEvent.aeEnteredBackground thenSendNotification;
end;procedure TForm1.FormCreate(Sender: TObject);
varAppEventSvc: IFMXApplicationEventService;
beginif TPlatformServices.Current.SupportsPlatformService(IFMXApplicationEventService, IInterface(AppEventSvc)) thenAppEventSvc.SetApplicationEventHandler(AppEvent);
end;end.

TNotification

delphi

Notification:= notificationcenter1.createnotification;

c++

TNotification *not=NotificationCenter1->createNotification();

转载于:https://www.cnblogs.com/cb168/p/5112892.html

delphi IOS 通知 TNotification相关推荐

iOS 通知观察者的被调函数不一定运行在主线程
Tony in iOS | 08/08/2013 iOS 通知观察者的被调函数不一定运行在主线程今天修复Bug时候发现的一个小细节,记录下. 问题描述事情是这样的:我在A视图(UITableVie ...
iOS通知的整理笔记
iOS通知用于高耦合界面的传值确实方便快捷. 需要实现模态弹出的视图控制器上,有一个视图控制器可以导航.这必定要将这个视图控制器的导航视图控制器naVC.view添加到模态弹出的视图控制器presen ...
ios3怎么取消长按弹出菜单_iPhone一直跳出通知好烦？教你如何关闭/管理iOS通知...
原标题:iPhone一直跳出通知好烦?教你如何关闭/管理iOS通知如果不特别留意iPhone 的通知,你会发现的屏幕画面不知不觉被一大堆有的没的App 占据了,每次解锁前都会被讯息轰炸一次-而且用手 ...
Bark iOS 通知配置说明
Bark 仅限于 iOS,不支持 Android 一.下载安装 Bark App 在 App Store 搜索 Bark 进行安装二.获取 Bark SCKEY 打开 Bark App,截图中粉红色 ...
Java推送IOS通知消息
Java推送IOS通知消息公司需要做IOS消息推送,我负责后台代码的实现.写这篇文章也是将我踩坑得来的结果记录一下,分享一下. APN介绍 Apple 推送通知服务(APNs) 是远程通知功能的核心 ...
Delphi iOS 开启文件共享 UIFileSharingEnabled
Apple 在 iOS 提供了文件共享(FileSharing)功能,让 App 有一个对外窗口的目录,透过 iTunes 可以任意管理这个目录的文档内容(可拖入文档,也能将文档拖出备份). 如果 A ...
ios 按时间排序_如何按应用而不是时间对iOS通知进行排序
ios 按时间排序 By default, iOS shows notifications in the order you received them. That can be handy, of ...
html中%3ch3%3e有颜色吗,在增强 iOS 通知系统这件事上，IFTTT 和 Pushover 谁做得更好？...
这篇是<玩转 IFTTT,互联网自动化也可以很简单>的番外篇,主要介绍了 Pushover 这个服务,在与 IFTTT 的关联中,它有着不可替代的作用. 通知系统带来的麻烦通知系统对于智 ...
ios 通知接收两次_iOS Push Notification Banner一次显示两次
iOS Push Notification Banner一次显示两次我注意到发送推送通知会导致以下行为: 看到广告在短暂的延迟后又如何显示? 起初我以为我们的后端错误地发送了2个推送通知,一个接一个 ...

delphi IOS 通知 TNotification

delphi IOS 通知 TNotification相关推荐

最新文章

热门文章