使用DELPHI XE5和Android的闹钟

是否有人已经找到了使用DEPHI XE 5和Android操作系统编程闹钟的正确方法

我找到了这段代码，但它根本不工作/编译：

procedure TNotificationsForm.btnSendScheduledNotificationClick(Sender: TObject);
var
  Notification: TNotification;
  begin

  { verify if the service is actually supported }
  if NotificationC.Supported then     //  compile error here 
  begin.Supported
    Notification := NotificationC.CreateNotification;    //  compile error here
    try
      Notification.Name := 'MyNotification';
     Notification.AlertBody := 'Delphi for Mobile is here!';

     { Fired in 10 second }
      Notification.FireDate := Now + EncodeTime(0,0,10,0);

   { Send notification in Notification Center }
   NotificationC.ScheduleNotification(Notification);
   finally
      Notification.DisposeOf;
    end;
   end
 end;

---

第一个错误是NotificationC.Supported此属性不存在

您应该提到，该代码基于XE5分发的一个示例应用程序。它们可以在XE5的“开始”菜单项下的示例中找到，或者在默认的C:\Users\Public\Documents\RAD Studio\12.0\Samples\MobileCodeSnippets\Notifications文件夹（Windows 7）中找到

您似乎忘记将

t通知中心

组件（可在组件调色板的服务页面上找到）放到表单上，并像演示一样将其命名为

NotificationC

。一旦你完成了，你的代码就可以很好地编译了

---

当您在这里提到问题中出现“编译错误”时，包含错误消息非常重要。从我们所在的位置看不到您的屏幕。：-）你有确切的信息就在眼前，所以没有理由不包括它。如果右键单击错误行，Messages窗口甚至会将准确的消息复制到剪贴板，供您粘贴到此处。

您应该提到，该代码基于XE5分发的一个示例应用程序。它们可以在XE5的“开始”菜单项下的示例中找到，或者在默认的C:\Users\Public\Documents\RAD Studio\12.0\Samples\MobileCodeSnippets\Notifications文件夹（Windows 7）中找到

您似乎忘记将

t通知中心

组件（可在组件调色板的服务页面上找到）放到表单上，并像演示一样将其命名为

NotificationC

。一旦你完成了，你的代码就可以很好地编译了

---

当您在这里提到问题中出现“编译错误”时，包含错误消息非常重要。从我们所在的位置看不到您的屏幕。：-）你有确切的信息就在眼前，所以没有理由不包括它。消息窗口甚至会将准确的消息复制到剪贴板，以便您在此处粘贴，如果您右键单击错误行。

您的“编译错误”没有数字或相关文本？忘记删除组件，我的错误您的“编译错误”没有数字或相关文本？忘记删除组件，我的错