Изменить высоту и ширину MagnifierGlass

Когда я создаю приложение FireMonkey и удаляю компонент MagnifierGlass, я вижу свойства Object Inspector Height и Width компонента MagnifierGlass, но не могу изменить эти свойства. Итак:

  • Почему мы не можем изменить properties высоту и ширину?

  • Если мне нужно сделать его больше или меньше, как я могу это сделать?

    Примечание. Я использую Delphi 10 Seattle.


delphi delphi-10-seattle
person Ilyes    schedule 24.12.2016    source источник

Ответы (1)


arrow_upward
1
arrow_downward

Похоже, что в стиле по умолчанию в Delphi 10 Seattle для MagnifierGlass есть ошибка, но только если LoupeMode установлен для Circle, поэтому проще всего изменить LoupeMode для 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 в редакторе стилей.

Обновить

Я создал отчет об ошибке по этой проблеме.

person EugeneK    schedule 24.12.2016