Delphi FireMonkey Android 平台上的 ShowVirtualKeyboard 运行 怎么样？

Question

考虑：

Uses FMX.VirtualKeyboard, FMX.Platform;

procedure TForm1.Button1Click(Sender: TObject);
    var Keyboard: IFMXVirtualKeyboardService;
    begin
        keyboard := TPlatformServices.Current.GetPlatformService(IFMXVirtualKeyboardService) as IFMXVirtualKeyboardService;
        if  TVirtualKeyboardState.Visible in keyboard.VirtualKeyBoardState then
        begin
            Keyboard.HideVirtualKeyboard;
        end;
    end;

HideVirtualKeyboard是运行这段代码，但是Delphi FireMonkeyAndroid平台上的ShowVirtualKeyboard运行如何呢？

因为对于相同的代码，ShowVirtualKeyboard 给出：

not enough actual parameters error in code page

Answer 1

ShowVirtualKeyboard 方法需要接收一个参数，指示键盘将输入到哪个控件。例如，要显示用于输入备忘录控件的键盘：

procedure TForm1.Button1Click(Sender: TObject);
begin
  keyboard := TPlatformServices.Current.GetPlatformService(IFMXVirtualKeyboardService) as IFMXVirtualKeyboardService;
  keyboard.showVirtualKeyboard(memo1);
end;