2015-02-24 5 views
1

Рассмотрим:Как работает 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 дают:

не достаточно ошибки фактических параметров в кодовой странице

ответ

1

Метод ShowVirtualKeyboard ожидает получить один параметр, указывающим, которые управляют клавиатура типа в , Например, чтобы показать клавиатуру для ввода в блокнот:

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