高考问答有形的翅膀自创MV:有关delphi里richedit的问题 如何改变部分字的颜色
来源：百度文库 编辑：高考问答 时间：2024/04/29 01:26:55
想在richedit里实现：分两种颜色来显示不同的信息
如：
一个聊天工具里，系统信息一种颜色
客户端发送的信息一种颜色
在同一个richedit里要怎么来实现啊
如：
一个聊天工具里，系统信息一种颜色
客户端发送的信息一种颜色
在同一个richedit里要怎么来实现啊
RichEdit.font属性可以设置字体（字符集，颜色，字体，大小，效果，字型）；
RichEdit.color属性可以设置背景色；
Richedit1.Paragraph.Alignment属性可以设置段落的
居左（taLeftJustify），居右（taRightJustify）、居中（taCenter）；
RichEdit.ScrollBars:=ssBoth;文字不满框时滚动条消失，满框时滚动条出现。
Richedit.Paragraph.FirstIndent //段落首行缩进
Richedit.Paragraph.LeftIndent //段落左缩进
Richedit.Paragraph.RightIndent //段落右缩进
Richedit.MaxLength //输入字数的限制
行距好像没有现成的属性
设定背景颜色:
SendMessage(RichEdit1.Handle, EM_SETBKGNDCOLOR, 0, clYellow);
or:
RichEdit1.Color:=clYellow;
richedit1.SelAttributes.Color:=clRed;
就是把richedit里选中的部分变成红色
如果是聊天工具的话，接收到消息时可以这样写
richedit1.SelStart:=length(richedit1.Text);
richedit1.Text:=richedit1.Text+你收到的消息;
richedit1.SelLength:=length(你收到的消息);
richedit1.SelAttributes.Color:=clred;