Hi!!I need a confirmation box (Yes and No options) in Android, but in Delphi 10.3 dont work, the app crash... In the Delphi 10.1 work fine...
Function TForm1.mensagemConfirmacao(pMensagem: String): TModalResult;
Var
MR: TModalResult;
Begin
MR := mrNone;
TDialogService.MessageDialog(pMensagem, TMsgDlgType.mtConfirmation,
[TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], TMsgDlgBtn.mbYes, 0,
Procedure(Const AResult: TModalResult)
Begin
MR := AResult;
End);
While MR = mrNone Do
begin
Application.ProcessMessages;
end;
result := MR;
End;
Help me please!!