使用 IFMXVirtualKeyboardService 隐藏虚拟键盘后丢失

Question

我的表单上有一个TEdit 和一个TTMSFMXWebGMaps。在我编辑的OnKeyUp() 事件中，我有这段代码来隐藏 iPhone 4 的虚拟键盘：

if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService) then
      (TPlatformServices.Current.GetPlatformService(IFMXVirtualKeyboardService) as IFMXVirtualKeyboardService).HideVirtualKeyboard;

问题是，如果不将焦点更改为另一个控件，我就无法再次显示键盘。我在我的编辑OnTap() 中尝试了这个，但它并没有把键盘带回来：

  if TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService) then
    (TPlatformServices.Current.GetPlatformService(IFMXVirtualKeyboardService) as IFMXVirtualKeyboardService).ShowVirtualKeyboard(edSearch);

由于我的表单只包含一个TEdit，因此除非用户导航到另一个表单并返回，否则键盘将永远丢失。有什么想法吗？

Answer 1

有一个非常简单的方法可以隐藏虚拟键盘。

uses
{$IFDEF IOS}
  FMX.Forms
{$ENDIF}
{$IFDEF Android}
  Androidapi.JNI.Embarcadero,
  FMX.Platform.Android,
  FMX.Helpers.Android
{$ENDIF};

procedure HideVirtualKeyboard;
{$IFDEF IOS}
begin
  try
    Screen.ActiveForm.Focused := nil;
  except
  end;
end;
{$ENDIF}
{$IFDEF Android}    
var
  TextView: JFMXTextEditorProxy;
begin
  try
    begin
      TextView := MainActivity.getTextEditorProxy;
      CallInUIThread(
        procedure
        begin
          TextView.setFocusable(false);
          TextView.setFocusableInTouchMode(false);
          TextView.showSoftInput(false);
          TextView.clearFocus;
          TextView.setFocusable(true);
          TextView.setFocusableInTouchMode(true);
        end);
    end
  except
  end;
end;
{$ENDIF}