Delphi FireMonkeyアプリケーションで仮想キーボードが表示中の時には非表示にする
uses FMX.VirtualKeyboard;
var
Keyboard: IFMXVirtualKeyboardService;
begin
if TPlatformServices.Current.SupportsPlatformService
(IFMXVirtualKeyboardService, IInterface(Keyboard)) then
begin
Keyboard.HideVirtualKeyboard;
end;
end;