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

Вниз

Цвет текста в 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]

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


 
Alexander Panov ©   (2005-06-11 21:38) [13]

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))
И мне нужно, чтобы только время было красным цветом, а всё остальное чёрным. Как это воплотить в жизнь?


 
Anatoly Podgoretsky ©   (2005-06-12 11:42) [15]

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



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

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

Наверх




Память: 0.49 MB
Время: 0.062 c
14-1118320625
Piter
2005-06-09 16:37
2005.07.11
Когда там у нас GTA: San Andreas появится?


1-1118817893
sachem
2005-06-15 10:44
2005.07.11
Как узнать функции и их параметры чужой dll-ки


3-1117201369
Lex_!
2005-05-27 17:42
2005.07.11
SQL - запрос с параметрами


14-1118405259
kaif
2005-06-10 16:07
2005.07.11
Опрос: Имеете ли Вы автомобиль?


8-1110699990
Tirex
2005-03-13 10:46
2005.07.11
Сглаживание изображения (tbitmap)