Цвет текста в RichEdit

← →
Earth (2005-06-10 11:01) [0]

Как программно изменить цвет кусочека текста, ну допустим весь текст чёрный, а одно слово, красное?

← →
TUser © (2005-06-10 11:13) [1]

SelStart
SelLength
SellAttributes

← →
Earth (2005-06-10 16:34) [2]

А можно показать это на конкретном примере, а то я с Delphi не так уж давно работаю.

← →
TUser © (2005-06-10 16:38) [3]

Неужели в хелпе нет примера?

← →
Earth (2005-06-10 19:21) [4]

Наверное, я по крайней мере не нашёл!

← →
Eraser © (2005-06-10 19:26) [5]

Earth (10.06.05 19:21) [4]

каталог_с_делфи\Demos\RichEdit

← →
Earth (2005-06-11 11:08) [6]

Я там ничего такого не нашёл. Если не трудно, то покажите пример кода.

← →
Virgo_Style © (2005-06-11 11:23) [7]

Earth (10.06.05 19:21) [4]
Плохо искал.

procedure TForm1.Button1Click(Sender: TObject); begin with RichEdit1.SelAttributes do begin Color := clRed; Height := Height + 5; end; RichEdit1.Lines.Add("This line of text will be red."); end; procedure TForm1.Button2Click(Sender: TObject); begin RichEdit1.DefAttributes.Color := clBlue; RichEdit1.DefAttributes.Style := [fsBold, fsItalic]; end;

← →
Earth (2005-06-11 17:20) [8]

Да нет, это-то я нашёл.
В моём случае допустим имеется строчка "F3 Pressed 12:34:56" и только время должно быть красным, а всё остальное чёрным.

← →
Shuric © (2005-06-11 17:36) [9]

[1] + [7] Все уже нашептали :)

← →
Galiaf (2005-06-11 20:52) [10]

Выделяешь кусок текста и перекрашиваешь:
richedit1.SelStart:=начало выделения; richedit1.SelLength:=длинна выделения; richedit1.SelAttributes.Color:=цвет;

← →
Galiaf (2005-06-11 20:53) [11]

Я сам с такой проблемой встречался, так и не получил ответа.

← →
Earth (2005-06-11 21:15) [12]

А там где начало выделения и длина, укказывать слова или что?

Earth (11.06.05 21:15) [12]
А там где начало выделения и длина, укказывать слова или что?

А помощь в Delphi почитать видимо не удается.

Read SelStart to determine the position of the first selected character, where 0 indicates the first character.

← →
Earth (2005-06-12 10:16) [14]

Нет, это не подходит!
У меня есть:
Form4.RichEdit1.Lines.Add("Time"+TimeToStr(Time))
И мне нужно, чтобы только время было красным цветом, а всё остальное чёрным. Как это воплотить в жизнь?

Или по очереди заполнять, или после заполнения выделять время и его подкрашивать.

Цвет текста в RichEdit Найти похожие ветки