Question

有人已经找到了使用DEPHI XE 5和Android OS编程闹钟的正确方法吗？

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

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此属性不存在

Answer 1

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

您似乎忘记删除表单上的TNotificationCenter组件（在Component Palette的服务页面上可用），并将其命名为NotificationC。完成后，您的代码编译得很好。

如果您在此处提及问题中出现“编译错误”，则包含错误消息非常重要。我们无法从我们所在的位置看到您的屏幕。 :-)你有正确的信息在你面前，所以没有理由不包括它。如果右键单击错误行，消息窗口甚至会将确切的消息复制到剪贴板以供您粘贴。

闹钟使用DELPHI XE5和Android

1 个答案: