Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.06.20;
Скачать: CL | DM;

Вниз

TRichEdit. Добавление строки, слова которой разного цвета.   Найти похожие ветки 

 
AVK   (2004-06-04 11:09) [0]

Добавляется строка RichEdit.Lines.Add("10:12:02 User: Message");
Надо, чтобы слово "User" было другого цвета. Если можно с примером.


 
Valeri   (2004-06-04 11:17) [1]

посмотри http://delphimaster.net/view/1-1086256131/


 
AVK   (2004-06-04 12:05) [2]

Нашел такой выход:

procedure TForm1.Button1Click(Sender: TObject);
var l:integer;
begin
  l := length(RichEdit1.Text);//Длина всего текста до добавления строки
  RichEdit1.Lines.Add("10:12:02 User: Message");
  RichEdit1.SelStart := l+9;//Начало выделяемого слова
  RichEdit1.SelLength := 4;//Его длина
  RichEdit1.SelAttributes.Color := clRed;
end;

Вроде бы все работает.



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

Текущий архив: 2004.06.20;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.038 c
1-1086335884
r9000
2004-06-04 11:58
2004.06.20
Работа с компонентом ListView


1-1086340572
Uran
2004-06-04 13:16
2004.06.20
Отображение документа msword


1-1086361437
Kair
2004-06-04 19:03
2004.06.20


1-1086295793
NeVIP.
2004-06-04 00:49
2004.06.20
ExcelApplication 2


1-1086332382
FragMan
2004-06-04 10:59
2004.06.20
Как мне нескольким Tbutton одним описанием присвоть событие OnCli