我将Delphi更新到东京10.2.1,然后重新编译并安装我的iOS应用程序,发现现在破坏了弹出模式下的MultiView组件。我还在Samples文件夹(Samples \ Object Pascal \ Multi-Device Samples \ User Interface \ MultiView)中运行了MultiViewDemo项目,发现了同样的问题。第二次尝试选择MasterButton时发生访问冲突。如果有人遇到同样的错误并找到了某种解决方法,我将非常感谢您的解决方案。
答案 0 :(得分:3)
将FMX.Controls.pas复制到您的项目目录并修改如下:
function TControl.GetHeight : Single;
begin
Result := 0;
if FSize <> nil
then begin
if FSize.PlatformDefault
then Result := FSize.DefaultValue.Height
else Result := FSize.Height;
end;
end;
function TControl.GetWidth : Single;
begin
Result := 0;
if FSize <> nil
then begin
if FSize.PlatformDefault
then Result := FSize.DefaultValue.Width
else Result := FSize.Width;
end;
end;