Вопрос по компоненту RadioGroup

← →
Бэтман (2007-11-25 01:30) [0]

Необходимо подпись к одной из радиокнопок сделать в несколько строк. Подскажите как это сделать ?

← →
Германн © (2007-11-25 01:40) [1]

Имхо, никак без написания наследника. (Отвечаю только за Д6).

← →
KilkennyCat © (2007-11-25 01:57) [2]

TRadioButton(RadioGroup1[n].Components[n]).WordWrap:=true;

← →
Бэтман (2007-11-25 02:08) [3]

Большое спасибо )

← →
Германн © (2007-11-25 02:12) [4]

> KilkennyCat © (25.11.07 01:57) [2]

В Д6 у TRadioButton нет свойства WordWrap. В Д7 оно появилось?

← →
Бэтман (2007-11-25 02:19) [5]

В седьмой тоже походу нету, я использую альтернативные компоненты там есть такое свойвство.

← →
KilkennyCat © (2007-11-25 02:27) [6]

ну тогда так:

const BS_MULTILINE = $2000; type TMyRadioButton = class(TRadioButton) protected procedure CreateParams(var Params: TCreateParams); override; public constructor Create(AOwner: TComponent); override; end; constructor TMyRadioButton.Create(AOwner: TComponent); begin inherited Create(AOwner); end; procedure TMyRadioButton.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.Style:=Params.Style or BS_MULTILINE; end; end.

← →
Германн © (2007-11-25 02:33) [7]

> Бэтман (25.11.07 02:19) [5]
>
> В седьмой тоже походу нету,

Юра, будешь возникать?
:-)
Очевидно не будешь. И я с тобой согласен.
Русский в письме и русский в и-нете - это две большие разницы.
Хотя и жаль, что наши детки родной язык не знают.

> TRadioButton(RadioGroup1[n].Components[n]).WordWrap:=true;

Так, кажется, было бы проще:
RadioGroup1.Buttons[n].WordWrap := True;

← →
{RASkov} (2007-11-25 11:04) [10]

> не уверен... в таком варианте, (как мне помнится) WordWrap не доступен.

Доступен.... так как
property Buttons[Index: Integer]: TRadioButton read GetButtons;
т.е. все свойства TRadioButton доступны, а в D7 у данного контрола появилось таки свойство WordWrap.

Вопрос по компоненту RadioGroup Найти похожие ветки