изменить свойства SelAttributes.Style в одном из Richedit 'ов ,созданых в runtime

RDIce
Дата: 16.05.2011 13:49:25
На форме Pagecontroll , 2 Button.
При нажатии первой кнопки создается Tabsheet и Richedit, расположеный на Tabsheet 'е.
Кнопкой можно создать множество таких закладок.


Кнопка создания вкладки c Richedit 'ом:
+

procedure TForm1.Button1Click(Sender: TObject);
var
ts: TTabSheet;
re: TRichedit;
begin
ts := TTabSheet.Create(Self);

ts.PageControl := PageControl1;

re :=TRichEdit.Create(self);
re.Parent:=ts;

end;


Как сделать , что бы вторая кнопка меняла шрифт (+fsbold/-fsbold) в Richedit'е выбраного Tabsheet 'а ?
Мимопроходящий
Дата: 16.05.2011 13:53:06

Hello, RDIce!
You wrote on 16 мая 2011 г. 10:49:25:

RDIce
> Как сделать , что бы вторая кнопка меняла шрифт
(+fsbold/-fsbold) в Richedit'е выбраного Tabsheet 'а ?

нужно почитать F1.
там это есть.
я точно знаю.

--
With best regards, Мимопроходящий.

Posted via ActualForum NNTP Server 1.4

Evgen2010
Дата: 16.05.2011 14:41:58
Например так:
TRichEdit(PageControl1.ActivePage.FindChildControl('RichEdit1')).Color := clRed;
FlyD
Дата: 16.05.2011 14:49:38
Evgen2010
Например так:
TRichEdit(PageControl1.ActivePage.FindChildControl('RichEdit1')).Color := clRed;
если это про шрифт, то... молодец, садись - два
Evgen2010
Дата: 16.05.2011 14:55:33
FlyD
если это про шрифт, то... молодец, садись - два

Это про концепцию.
FlyD
Дата: 16.05.2011 15:01:54
Evgen2010
FlyD
если это про шрифт, то... молодец, садись - два

Это про концепцию.
концепция тоже хромает, получить AV - это на раз-два