Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.07.11;
Скачать: [xml.tar.bz2];

Вниз

Цвет текста в 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.029 c
1-1118444356
gans_2
2005-06-11 02:59
2005.07.11
как запретить редактирование отдельной ячейки StringGrid


6-1112964584
greg_us
2005-04-08 16:49
2005.07.11
WSA error 10047 !


8-1111054283
X-Disa
2005-03-17 13:11
2005.07.11
Цветовой диалог - система HSB


14-1118043518
Андрей Жук
2005-06-06 11:38
2005.07.11
Никто не подскажет, чему соответствует __leave в Borland C++?


3-1117703774
Леонид
2005-06-02 13:16
2005.07.11
Неполучается сделать update записи.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский