Показать сообщение отдельно
  #7  
Старый 23.01.2012, 09:30
stakado stakado вне форума
Прохожий
 
Регистрация: 20.01.2012
Сообщения: 3
Репутация: 10
По умолчанию

Цитата:
Сообщение от dr. F.I.N.
Радиогруппа (TRaduoGroup) по сути и есть Групбокс (TGroupBox). Можете даже исходник глянуть. Если не хочется сочинять решение с компонентами самому, то:
1. У Радиогруппы есть св-во Controls[Index:Integer] в котором хранятся все пункты (а-ля TRadioButton).
2. При добавлении новой - высота каждой РадиоКнопки равна (Высота клиентской области Радиогруппы)/(Количество радиокнопок)
3. С этими кнопками можно работать через Controls - выставить высоту компонента и указать TOP.
Например (в радиогруппе 2 элемента):
Код:
RadioGroup1.Controls[0].Height := Canvas.TextHeight('0');
  RadioGroup1.Controls[1].Height := Canvas.TextHeight('0');
  RadioGroup1.Controls[1].Top := RadioGroup1.Controls[0].Top + RadioGroup1.Controls[0].Height;


Спасибо большое, предложенное Вами решение - то, что мне было нужно!
Ответить с цитированием