Delphi 11.2的一个问题
https://quality.embarcadero.com/browse/RSP-39499
function TAndroidVirtualKeyboard.DefineNativeView(const AObject: TFmxObject): JView; function IsNativeControl: Boolean; begin Result := (AObject is TPresentedControl) and (TPresentedControl(AObject).ControlType = TControlType.Platform); end; //这段代码,需要改写成下面这样: function TAndroidVirtualKeyboard.DefineNativeView(const AObject: TFmxObject): JView; function IsNativeControl: Boolean; var ControlTypeSupportable: IControlTypeSupportable; begin Result := Supports(AControl, IControlTypeSupportable, ControlTypeSupportable) and (ControlTypeSupportable.ControlType = TControlType.Platform); end;