MessageDlg('Choose a button:', System.UITypes.TMsgDlgType.mtInformation,    [      System.UITypes.TMsgDlgBtn.mbYes,      System.UITypes.TMsgDlgBtn.mbNo,      System.UITypes.TMsgDlgBtn.mbCancel    ], 0,    procedure(const AResult: TModalResult)    begin      if AResult = mrYES then         ShowMessage('You chose Yes') else      if AResult = mrNo then         ShowMessage('You chose No') else      if AResult = mrCancel then         ShowMessage('You chose Cancel');    end);

更新：

下面代码 Android 实机没问题，但在 iOS 实机没有动作。

MessageDlg('Choose a button:', System.UITypes.TMsgDlgType.mtInformation, mbOKCancel, 0,  procedure(const AResult: TModalResult)  begin       if AResult = mrOk then          ShowShareSheetAction1.ExecuteTarget(Sender); // iOS 实机没有动作 (没有当机)  end);

更多相关文章

1. Error:Could not find com.android.tools.build:gradle:4.1. Sea
2. android设备上视频只有声音没有图像
3. 安装好android的adt以后重启eclipse，但是没有创建AVD的图标
4. 解决Eclipse New菜单没有Android(安卓)Project
5. 解决Eclipse New菜单没有Android(安卓)Project
6. Android计算器布局
7. android百问（更新中）
8. 2013.12.23 ——— android assents文件路径
9. 【转】Android(安卓)Intent Action 大全

随机推荐

1. Android入门教程 xutils框架入门教程
2. Android应用之基本的组件（一）
3. android adb常用指令
4. android 蓝牙hfp client实现简介
5. Android：销毁所有的Activity退出应用程序
6. 浅析Android沙箱模型
7. Android(安卓)Runnable运行在哪个线程
8. ubuntu 10.04 CTS 环境搭建
9. 在Android中使用实时调度（real-time）
10. 解决AndroidStudio中AVD虚拟机设备空间不