ShowVirtualKeyboard如何在Delphi FireMonkey Android平台上运行?
考虑:ShowVirtualKeyboard如何在Delphi FireMonkey Android平台上运行?,android,delphi,firemonkey,delphi-xe6,virtual-keyboard,Android,Delphi,Firemonkey,Delphi Xe6,Virtual Keyboard,考虑: Uses FMX.VirtualKeyboard, FMX.Platform; procedure TForm1.Button1Click(Sender: TObject); var Keyboard: IFMXVirtualKeyboardService; begin keyboard := TPlatformServices.Current.GetPlatformService(IFMXVirtualKeyboardService) as IFMXV
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使用此代码运行,但ShowVirtualKeyboard如何在Android平台上运行
因为对于相同的代码,ShowVirtualKeyboard给出:
代码页中没有足够的实际参数错误
该方法希望收到一个参数,指示键盘将键入哪个控件。例如,要显示用于在备忘录控件中键入内容的键盘,请执行以下操作:
procedure TForm1.Button1Click(Sender: TObject);
begin
keyboard := TPlatformServices.Current.GetPlatformService(IFMXVirtualKeyboardService) as IFMXVirtualKeyboardService;
keyboard.showVirtualKeyboard(memo1);
end;