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

Вниз

Как поменять цвет шрифта в Memo?   Найти похожие ветки 

 
sergant   (2001-12-28 16:32) [0]

Простенький вопрос: как поменять цвет шрифта в Memo, но не у всего, а только у определенных строк? А то когда меняешь Font.Color, цвет меняется у вего текста в Memo. В RichEdit это можно сделать легко, а в Memo?


 
la   (2001-12-28 16:49) [1]

У Memo - никак.
Для этих целей следует все-таки использовать RichEdit


 
Alx2 ©   (2001-12-29 08:27) [2]

sergeant, лови!

type
TMyMemo = class(TMemo)
property Font;
end; // Это "рассекречивает" свойство Font
procedure TForm1.Button1Click(Sender: TObject);
begin
TMyMemo(Memo1).font.Color := clRed;
end;


 
Alx2 ©   (2001-12-29 08:28) [3]

Ребята, прошу прощения, это задачи не решает, конечно!
Сколько раз себе говорил: "читай вопрос полностью"


 
MBo ©   (2001-12-29 09:39) [4]

попробуй
http://www.lmc-mediaagentur.de/dpool/tips04/0360.htm


 
Fellomena   (2001-12-29 12:04) [5]

Привет всем 8)
У меня вопрос по теме:
я в RichEdit-e могу изменять цвет каждой строки и фона, но вот проблема :
как сделать одну часть строки одного цвета, а другую другого ?
Делала так:

RichEdit1.SelAttributes.Color := clRed;
//RichEdit1.Lines.Add(Name + ": ");

При добавлении строки способом RichEdit1.Lines.Add в её конец ставится нуль-терминатор, от которого избавиться, использую метод Add, нельзя... ну то есть у строки его убрать можно наверное, но при следующем RichEdit1.Lines.Add(str); str всё равно будет на след. строке.
Я пробовала изголяться следующим образом:

function TForm1.test(col: integer; str1: string): string;
begin
RichEdit1.SelAttributes.Color := Col;
Result:=str1;
end;

...
RichEdit1.Lines.Add(test(NameCol, Name) + ": " + test(MessageCol, Message1));
...

Но, как я и ожидала, строка всё равно приобретает один цвет. 8(
Что делать ?



 
MBo ©   (2001-12-29 13:23) [6]

но ты ведь можешь выделять любой кусок строки через SelStart и SelLength и устанавливать для него SelAttributes



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
1-52577
Стас
2001-12-28 08:33
2002.01.17
QReport


1-52573
Lamok (real)
2001-12-28 23:23
2002.01.17
EStringlistError


1-52616
Brand
2001-12-30 23:49
2002.01.17
Цвет формы и всего остальнлго


1-52556
saviola
2001-12-28 14:51
2002.01.17
Работа с компонентами страницы Dialogs


3-52496
Шавлюк Евгений
2001-12-13 00:27
2002.01.17
Использование ClientDataSet