Скачать: CL | DM;

Вопрос по компоненту 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]
>
> В седьмой тоже походу нету,


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

---

← →
Loginov Dmitry ©   (2007-11-25 07:56) [8]

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


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

---

← →
KilkennyCat ©   (2007-11-25 09:08) [9]

> Loginov Dmitry ©   (25.11.07 07:56) [8]


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

---

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

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.011 c