How to select numeric keypad in InputQueryAsync firemonkey android?

0

I'm using InputQueryAsync as a text input, it's all working, however it opens the default keyboard, I'd like you to open the numeric keypad.

Remembering what I'm using on android.

    if TPlatformServices.Current.SupportsPlatformService(IFMXDialogServiceAsync, IInterface(Service)) then
    begin
      Service.InputQueryAsync('Valor dos Juros', [''],  [list_action.Items[ItemIndex].Data['valor'].AsString],
        procedure(const AResult: TModalResult; const AValues: array of string)
        begin

          case AResult of
            mrOk:
            begin

              if StrToFloatDef(AValues[0], 0) > 0 then
              begin
                list_action.Items[ItemIndex].Data['valor']:= FormatFloat('0.00', StrToFloatDef(AValues[0], 0));
                calculaparcela;
              end
              else
                Toast('Valor inserido não é válido!');

            end
          end;

        end);
    end;
    
asked by anonymous 11.05.2018 / 13:30

0 answers