Борланд С++ билдер, RichEdit покрасить строки в разные цвета
настроение:Задумчивое
Метки: C++Builder, C++Builder 2007, CodeGear C++Builder 2007, C++
| Написать комментарий | |
23-01-2011 23:22 (ссылка)
| Написать комментарий | ||
procedure RE_ColorLine(ARichEdit: TRichEdit; ARow: Integer; AColor: TColor);
begin
with ARichEdit do
begin
SelStart := SendMessage(Handle, EM_LINEINDEX, ARow - 1, 0);
SelLength := Length(Lines[ARow - 1]);
SelAttributes.Color := AColor;
SelLength := 0;
end;
end;