Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

RichEdit.SelAttributes [D6, Win95/98]


AL2002 ©   (2002-10-14 14:57:00) 

Надо:
RichEdit2.SelAttributes.Style:=[fsBold];
RichEdit2.Text:="TEXTBOLDSTYLE";
RichEdit2.SelAttributes.Style:=[];
RichEdit2.Text:="TEXTNOSTYLE";

Чё-то оно не делается. Полужирный стиль не убирается.


AL2002   (2002-10-14 17:45:00) [1]

Делаю:
RStart:=Length(RichEdit2.Text);
RichEdit2.Text:=RichEdit2.Text+"FontName");
RichEdit2.SelStart:=RStart;
RichEdit2.SelLength:=Length("FontName");
RichEdit2.SelAttributes.Style:=[];
RichEdit2.SelAttributes.Style:=[fsBold];

RStart:=Length(RichEdit2.Text);
RichEdit2.Text:=RichEdit2.Text+" installed as ";
RichEdit2.SelStart:=RStart;
RichEdit2.SelLength:=Length(" installed as ");
RichEdit2.SelAttributes.Style:=[];
RichEdit2.SelAttributes.Style:=[fsUnderLine];

По идее, должно получиться вот так:
FontName installed as

а нифига.
В цикле полная лажа получается.


AL2002   (2002-10-14 16:31:00) [2]

>MBo © (14.10.02 16:22)
Because.
Я хочу в одной строке несколько начертаний.
придётся в любом случае MBo © (14.10.02 16:04)


AL2002   (2002-10-14 16:27:00) [3]

Раз такая непруха, буду делать сетленгтш, добавлять, а уже после добавления менять атрибуты добавленного.
Хм. :((


MBo   (2002-10-14 16:22:00) [4]

>Richedit2.Lines.Add() однозначно не подходит.
Why????


AL2002   (2002-10-14 16:14:00) [5]

>MBo © (14.10.02 16:04)
А добавить-то как?
Richedit2.Lines.Add() однозначно не подходит.


MBo   (2002-10-14 16:04:00) [6]

добавляешь, по очереди ставишь selstart, sellength, selatrributes для каждого нестандартного кусочка


AL2002   (2002-10-14 16:01:00) [7]

>MBo © (14.10.02 15:25)
Мне нужнов ричэдит добавитьчто-то типавот этого.


MBo   (2002-10-14 15:25:00) [8]

не пойму я, что ты хочешь
RichEdit1.SelAttributes.Style:=[fsBold];
RichEdit1.Lines.Add("BOLD");
RichEdit1.SelAttributes.Style:=[];
RichEdit1.Lines.Add("Simple");


AL2002   (2002-10-14 15:20:00) [9]

>MBo © (14.10.02 15:01)
RichEdit2.SelAttributes.Style:=[fsBold];
RichEdit2.Lines.Add("Text");
Добавляет с изменённым стилем.
Может как-то по-другому добавлять надо?


MBo   (2002-10-14 15:01:00) [10]

Применяется к ВЫДЕЛЕННОМУ тексту


Наверх

Титульная страница Поиск, карта сайта Написать письмо