Messagedlg in Delphi xe7 android

Ich versuche nur, ein Beispiel auszuführen, das während der Installation von Delphi xe7, den MessageAlerts auf der Android-Plattform, angegeben wurde. Leider funktioniert es nicht. Es wird die folgende Fehlermeldung angezeigt:

Blocking Dialoge, die auf dieser Plattform nicht implementiert sind

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;

Eine Idee, wie man es löst?