kolory w memo

mam jaki text w memo, ma powiedzmy 10 linii i teraz chcialbym zmienic kolor czcionki w jednej, wybranej linii. czy da sie cos takiego zrobic?.

Przypuszczalnie sie da, ale znacznie łatwiej jest zastosowac RichEdit.

Z tego co wiem "standardowo" nie da się tego zrobić zastosuj RichEdit jest bardziej "profesjonalny".

no dobra, to jak to zrobic w richedit?

:-[
Tak z ciekawosci:
szukales na forum, w FAQ ???

Wiele razy to juz pisalem... no ale napisze raz jeszcze :)

function TForm1.CurrText: TTextAttributes; {zadeklaruj}
begin
  with activemdichild as tchild do
  if richedit1.SelLength > 0 then Result := richedit1.SelAttributes
  else Result := richedit1.DefAttributes;
end;

{W jakims buttonie, zaznacz linie}
CurrText.Style := CurrText.Style - [fsBold]; //usuwa pogrubienie
{lub}
CurrText.Style := CurrText.Style + [fsBold]; //dodaje pogrubienie