Question

当我创建FireMonkey应用并删除MagnifierGlass组件时，我可以在Object Inspector 高度和宽度属性中看到MagnifierGlass，但我无法更改这些属性，所以：

为什么我们无法更改properties 高度和宽度？
如果我需要更大或更小，我该怎么做？

注意：我正在使用Delphi 10 Seattle。

Answer 1

看起来Delphi 10 Seattle for MagnifierGlass中的默认样式存在错误，但只有在为Circle设置了LoupeMode时，最简单的方法是将RectpeMode更改为Rectangle，然后您才能在表单上调整它的大小。如果要将其与LoupeMode = Circle一起使用，则可以修复其中一个自定义样式，例如，如下所示

在此文件C:\Program Files (x86)\Embarcadero\Studio\17.0\Redist\styles\Fmx\Win10Modern.Style中找到以下行

  object TLayout
    StyleName = 'magnifierglassstyle'
    FixedWidth = 150
    FixedHeight = 150

替换为

  object TLayout
    StyleName = 'magnifierglassstyle'
    Size.Width = 50.000000000000000000
    Size.Height = 50.000000000000000000
    Size.PlatformDefault = False

现在在表单上删除StyleBook组件并将FileName属性设置为C:\Program Files (x86)\Embarcadero\Studio\17.0\Redist\styles\Fmx\Win10Modern.Style

将表单的StyleBook属性设置为StyleBook1

现在，如果您在表单上删除MagnifierGlass，则可以调整其大小。

在Delphi 10.1 Berlin中不需要这样做，因为你可以在那里的样式编辑器中编辑FixedHeight和FixedWidth属性。

<强>更新

我已就此问题创建bug report

更改MagnifierGlass高度和宽度

1 个答案: