软键盘，德尔福东京

Question

我在我的应用程序编辑框中，当用户进入编辑框时弹出键盘（没关系），但是当我想隐藏键盘时 我单击硬件返回按钮或我单击外部编辑框应用程序返回上一个表单。

我尝试使用此代码，此代码返回上一个表单

var
  FService : IFMXVirtualKeyboardService;
begin
  if Key = vkHardwareBack then
  begin
    TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(FService));
    if (FService <> nil) and (TVirtualKeyboardState.Visible in FService.VirtualKeyBoardState) then
    begin
      // Back button pressed, keyboard visible, so do nothing...
      Key := 0;
      FService.HideVirtualKeyboard;
    end else
    begin
      Key := 0;
    end;
  end;

谢谢