Delphi FireMonkey应用程序中显示时隐藏虚拟键盘
uses FMX.VirtualKeyboard;
var
Keyboard: IFMXVirtualKeyboardService;
begin
if TPlatformServices.Current.SupportsPlatformService (IFMXVirtualKeyboardService, IInterface(Keyboard)) then
begin
Keyboard.HideVirtualKeyboard;
end;
end;