Перейти к содержанию
Fire Monkey от А до Я
  • 0

[TButton] Как изменить размер шрифта в рантайме?


Shagrid

Вопрос

разработка для Android, Delphi XE7.

Проблема следующая:

На форме есть пара кнопок, при помощи компонента TButton, а так же множество кнопок, созданных динамически.

В кнопках, созданных компонентом, изменениеразмера рифта текста решается банальной строчкой:

TButton(obj).TextSettings.Font.Size := 40;

В кнопках, динамически созданых, изменение шрифта подобным образом не помогает, при этом само свойство меняется.

Фрагмент кода создания кнопки:

      btn := TButton.Create(PanelNew);
      btn.Parent := Self;
      btn.Position.X := (i - 1) * (w) + 10;
      btn.Position.Y := (j - 1) * (h) + 60;
      btn.Width := (w);
      btn.Height := (h);
      btn.Enabled := true;
      btn.Name := 'btn1';
      btn.TextSettings.Font.Size := 40;
      btn.text := FloatToStr(btn.TextSettings.Font.Size);
      btn.OnClick := clickbtn;
      btn.TintColor := TAlphaColorRec.Null;

это баг среды разработки, баг моих мозгов или чего-то не хватает?

 

Проверил подобное на C++. Видимо баг в среде. Присутствует в кнопках, созданых любым способом.

Заключается в следующем:

В TButton.TextSetting.Font.Size по умолчанию прописано (Default)

Пока это значение присутствует, любые изменения с размером шрифта игнорируются. Если в настройках визуального компонента поменять на любую цифру, то тогда вся работа со шрифтом коде будет работать.

Вот только теперь не могу придумать, как изменить значение без визуального компонента.

Ссылка на комментарий

Рекомендуемые сообщения

  • 0
  • Администраторы

Добрый день

 

Нет, не баг. Ответ для кнопки и аналогичных компонентов с текстом аналогичен:

Ссылка на комментарий
Гость
Эта тема закрыта для публикации ответов.
×
×
  • Создать...