Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];




Вниз

Как поменять цвет шрифта в 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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.17;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.73 MB
Время: 0.046 c
1-52581           ASV                   2001-12-29 00:14  2002.01.17  
PDF Russian fonts


3-52456           ЧП                    2001-12-13 15:32  2002.01.17  
Мужики у кого есть FR_class.pas для FastReport 2.45 под Delphi 6


14-52647          gone                  2001-11-22 16:25  2002.01.17  
Киньте пару ссылок pls


1-52621           programmer1           2001-12-28 22:51  2002.01.17  
Динамическая плдгрузка dll-библиотеки


3-52494           Alex22                2001-12-15 11:12  2002.01.17  
BDE