Jak zmienic kolor lub czcionke WYBRANYCH lini?

0

Hello,

Nie wiem w jaki spsob zmienic kolor lub czcionke poszczegolnych lini w komponencie Memo.

Pozdrawiam

0

Nie da się. Użyj TRichEdit.

0

to w takim razie jak to zrobic w richedit??

0
procedure KolorAktualnejlLinii(kolor:TColor;var RE:TRichEdit);
var
   y:Integer;//nr linii
begin
   with RE do
   begin
      y:=CaretPos.y;
      SelStart:=Perform(EM_LINEINDEX,y,0);
      SelLength:=Length(Lines[y]);
      SelAttributes.Color:=kolor;
   end;
end;

//linie numerowane od 0
procedure KolorWskazanejLinii(kolor:TColor;nr_linii:Integer;var RE:TRichEdit);
begin
   with RE do
   begin
      SelStart:=Perform(EM_LINEINDEX,nr_linii,0);
      SelLength:=Length(Lines[nr_linii]);
      SelAttributes.Color:=kolor;
   end;
end;
0

Dzięki za pomoc, bardzo mi sie te procedury przydaly. W koncu bede mogła skonczyc moj programik.

Pozdrawiam

1 użytkowników online, w tym zalogowanych: 0, gości: 1