如何在richedit中一行字显示不同的颜色

mygodsos 2003-12-08 10:10:45
比如:
richedit1.line.add('赤橙黄绿青蓝紫');
如何分别显示他们的颜色,“赤”是红色的,“橙”是橙色的......
如果不行,有什么第三方控键可以做到。
如何安装?
...全文
163 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
zyq_123 2003-12-09
  • 打赏
  • 举报
回复
楼上的动作很快!
zyq_123 2003-12-09
  • 打赏
  • 举报
回复
RichEdit1.SelStart:=0;
RichEdit1.SelLength:=5;
RichEdit1.SelAttributes.Color:=clRed;
RichEdit1.SelLength:=0;
xyc189 2003-12-09
  • 打赏
  • 举报
回复
RichEdit1.Clear;
RichEdit1.Lines.Add('赤橙黄绿青蓝紫');
with richedit1 do
begin
SelStart :=0;
SelLength := 2;
SelAttributes.Color := clRed;
SelStart :=2;
SelLength := 2;
SelAttributes.Color := clYellow;//自己找橙色
SelStart :=4;
SelLength := 2;
SelAttributes.Color := clYellow;
SelStart :=6;
SelLength := 2;
SelAttributes.Color := clGreen;
SelStart :=8;
SelLength := 2;
SelAttributes.Color := clTeal;
SelStart :=10;
SelLength := 2;
SelAttributes.Color := clBlue;
SelStart :=8;
SelLength := 2;
SelAttributes.Color := clFuchsia;
end;
jxc163 2003-12-09
  • 打赏
  • 举报
回复
用Riched20.dll生写richedit控件吧。
还可以看盾rxLib2.75里面的东西怎么样。

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧