android - 类分割错误(11)

Question

请按照以下步骤操作:

1. 创建新的 Firemonkey 移动应用程序
2. 在表单中添加TGeustureManager组件

3. 在窗体中添加2个TButton组件

   • Button1.Text:“Button1:做某事……”
   • Button2.Text:“Button2:退出应用程序...”

   

4. 双击 Button2 组件并为 OnClick 事件编写以下代码:

   procedure TForm1.Button2Click(Sender: TObject);
   begin
     if MessageDlg('Are you sure you want to Exit?', TMsgDlgType.mtWarning,
             [TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], 0) = mrYes then
       SharedActivity.finish;
   end;
   

5. 在 Debug模式下运行应用程序。

6. 在设备上，单击按钮 2，然后在弹出的消息中单击是。会出现异常:

   

为什么会引发此异常？

我认为这与未使用的 TGeustureManager 组件有关。但不，它不是不是:

1. 如果打开Delphi xe5自带的LocationDemo工程。
2. 在Location标签中添加TButton组件，如下图所示:
3. 将与上面相同的代码添加到 OnClick 事件。
4. 运行应用程序，点击 Button5，你会得到同样的异常。

这是我应该报告的错误吗？还是我做错了什么？

Answer 1

您可能在其执行流耗尽之前终止正在运行的 Activity ，从而导致问题。很像在表单方法中释放表单....

如果你替换会发生什么:

SharedActivity.finish

与:

uses
  FMX.Helpers.Android;
...
CallOnUIThread(procedure begin SharedActivity.finish end);

[凭内存输入，所以可能需要一些调整]