怎样改变Richedit中某一行的字体或某一行的颜色

最新推荐文章于 2022-08-18 18:58:26 发布

weixin_30869099

最新推荐文章于 2022-08-18 18:58:26 发布

阅读量642

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/lzj1981/archive/2013/04/29/3050554.html

本文介绍使用 Delphi 中的 RichEdit 控件进行文本高亮显示的方法。通过设置 CaretPos 和 SelLength 属性定位到指定行，并将该行文字颜色设置为红色。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

var
Y: Integer;
begin
Y := 1;
// if Y < 0 then Exit;//安全检查
// if Y >= RichEdit1.Lines.Count then Exit;//安全检查
RichEdit1.CaretPos := Point(0, Y);
RichEdit1.SelLength := Length(RichEdit1.Lines[Y]);
RichEdit1.SelAttributes.Color := clRed;
end;

转载于:https://www.cnblogs.com/lzj1981/archive/2013/04/29/3050554.html