Рассмотрим:Как работает ShowVirtualKeyboard на платформе Android для Delphi FireMonkey?
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 бег на DelphiFireMonkey Android платформы?
Потому что для того же кода, ShowVirtualKeyboard дают:
не достаточно ошибки фактических параметров в кодовой странице