Einzelnen Beitrag anzeigen

tdeck

Registriert seit: 26. Jun 2006
Ort: Obertshausen
67 Beiträge
 
Delphi 11 Alexandria
 
#1

FMX Android TDialogService mit mbYesAllNoAllCancel läuft nicht

  Alt 27. Okt 2022, 20:19
Hallo Leute,

ich baue mir gerade eine Dialog-Abfrage als Function, die unter Windows und Android laufen soll.

Unter Windows funktioniert alles so wie es soll, aber unter Android leider nicht.
Unter Android habe ich nur 3 Auswahlmöglichkeiten "Abbrechen", "NEIN" und "JA".
Ebenfalls erhalte ich immer nur -1 als Rückgabe.

Gibt es so einen Dialog unter Android nicht oder habe ich es falsch aufgebaut?

Und warum stimmt unter Android der Rückgabewert nicht?

Code:
// Android komforme Abfrage
//
function AbfrageJaNeinJaAlleNeinAlle( strText : string ) : integer;
var
  iReturn : integer;
begin
   iReturn := -1;
  TDialogService.MessageDialog(strText,
                TMsgDlgType.mtWarning,
                FMX.Dialogs.mbYesAllNoAllCancel,
                TMsgDlgBtn.mbNo,
                0,
      procedure (const AResult: System.UITypes.TModalResult)
      begin
       case AResult of
          mrYES          : iReturn := 1;
          mrYesToAll     : iReturn := 11;
          mrNo           : iReturn := 2;
          mrNoToAll      : iReturn := 22;
       else
         iReturn := -1;
       end;
      end);

   AbfrageJaNeinJaAlleNeinAlle := iReturn;
end;
Gruß
Thorsten
Miniaturansicht angehängter Grafiken
27-10-2022_21-10-36.png   27-10-2022_21-11-26.png  
Thorsten
  Mit Zitat antworten Zitat