Messagedlg в Delphi Xe7 Android

Я просто пытаюсь выполнить пример, данный во время установки Delphi xe7, MessageAlerts на платформе Android, к сожалению, он не работает, он выдает следующее сообщение об ошибке:

Блокирующие диалоги не реализованы на этой платформе

procedure TMessageAlertsForm.btnMultiButtonAlertClick(Sender: TObject);
begin
  { Show a multiple-button alert that triggers different code blocks according to
    your input }
  case MessageDlg('Choose a button:', System.UITypes.TMsgDlgType.mtInformation,
    [
      System.UITypes.TMsgDlgBtn.mbYes,
      System.UITypes.TMsgDlgBtn.mbNo,
      System.UITypes.TMsgDlgBtn.mbCancel
    ], 0) of
    { Detect which button was pushed and show a different message }
    mrYES:
      ShowMessage('You chose Yes');
    mrNo:
      ShowMessage('You chose No');
    mrCancel:
      ShowMessage('You chose Cancel');
  end;
end;

Есть идеи, как это решить?