注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

鑫淼梦园的博客

圆你的梦想 从这里开始

 
 
 

日志

 
 

Delphi XE5 for Android (十一)  

2013-10-24 12:48:34|  分类: android |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |

以下内容是根据Delphi的帮助文件进行试验的,主要测试Android下的消息提醒。

首先建立一个空白的Android工程,然后在窗体中加入一个TNotificationCenter控件,如下图:

image

再在uses中引用文件,如下:

uses
  FMX.Platform;
 
窗体上控件放置如下图:
image
 
发送消息的代码如下:

procedure TForm2.Button2Click(Sender: TObject);
var
  MyNotification: TNotification;
begin
  //通过消息中心创建消息
  MyNotification := NotificationCenter1.CreateNotification;
  try
    //设置消息的名称
    MyNotification.Name := 'Schedule Notification';
    //设置消息的内容
    MyNotification.AlertBody := 'Schedule Notification:' + edtSchedule.Text;
    //设置图标标号
    MyNotification.Number := 18;

    //设置10秒后触发消息
    MyNotification.FireDate := Now + EncodeTime(0, 0, 10, 0);
    //将消息提交消息中心,并于指定时间触发,直接发送用PresentNotification
    NotificationCenter1.ScheduleNotification(MyNotification);
  finally
    //释放消息接口
    MyNotification.DisposeOf;
  end;
end;

运行后,点击Schedule按钮10秒后看到消息提示,如下图:

image

当用户点击消息时,触发onReceiveLocalNotification事件,通过ANotification参数了解到客户点击的是哪条消息并作出处理。代码如下:

procedure TForm2.NotificationCenter1ReceiveLocalNotification(Sender: TObject;
  ANotification: TNotification);
begin
  //收到用户对消息的操作
  Label1.Text := '收到' + ANotification.Name + '的消息';
end;

执行结果如下图:

image

注意:不要按照Help中的例子在onReceiveLocalNotification事件使用ShowMessage,在Android下不仅不能显示,由于弹出的对话框被覆盖,会导致整个程序假死。


  评论这张
 
阅读(332)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017