Перейти к содержанию
  • 0
Hevard

Высота RadioButton

Вопросы

Доброго дня!

Для вывода вариантов ответов на вопрос, в 6 шт. RadioBatton выводятся ответы из БД.

Длина компонент фиксированная, а вот что делать с высотой? Ответы могут быть как в одно-два слова, так и в 7-10 предложений. Намёков хоть на какой-то AutoSize не нашёл.

В итоге, текст центруется обрезаясь сверху и снизу. 🤔 

Поделиться сообщением


Ссылка на сообщение

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

  • 0

В общем, сам спросил - сам ответил. 
Нашёл некий пример, проверил - работает.

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
  
 var
  r: TRectF;
  s: string; 
 begin
     RadioButton1.Canvas.Font.Size := RadioButton1.TextSettings.Font.Size;
     r := RectF(0, 0, RadioButton1.Size.Width-24, 10000); // не понял, что за 10000, но ни на что не повлияло
     s := FDQuery1.FieldByName('ANS1').AsString; // строчная переменная, в моём случае - текст из БД 
     RadioButton1.Canvas.MeasureText(r, s, True, [], TTextAlign.Leading, TTextAlign.Leading);
     RadioButton1.Size.Height := r.Bottom;
     RadioButton1.Text := s;
end

Возможно, кому-то должно пригодиться.

Отредактировал Hevard

Поделиться сообщением


Ссылка на сообщение

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.

Гость
Ответить на вопрос...

×   Вставлено с форматированием.   Вставить как обычный текст

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.


  • Похожий контент

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу

×
×
  • Создать...