XE7 Android 中使用 MessageDlg 范例 _message

【XE7 Android 中使用 MessageDlg 范例】青春须早为，岂能长少年。这篇文章主要讲述XE7 Android 中使用 MessageDlg 范例相关的知识，希望能为你提供帮助。
XE7 Android 中使用 MessageDlg 范例

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);

InputQuery(\'Input\', [\'Name\'], [\'\'], procedure(const AResult: TModalResult; const AValues: array of string) begin if AResult = mrOk then Showmessage(AValues[0]); 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);