Правя нещо от рода на чат програмите.
Искам репликите на чатърите да изилизат със различен цвят. Преди съм го правил със TRichEdit като се маркирваше част (даден ред примерно) от текста и му се сменяха атрибутите. Проблема ми е, че немога да се сетя как точно ставаше и опитите ми да го направя дотук са безуспешни.

Здравей,
това трябва да ти свърши работа

var
reChat:TRichEdit;
.
.
reChat.SelStart := Length(reChat.Text);
reChat.SelAttributes.Color := Functions.UserColor;
reChat.SelAttributes.Name := Functions.FontName;
reChat.SelAttributes.Size := Functions.FontSize;
reChat.SelAttributes.Charset := Functions.FontCharset;
reChat.SelText := TextToSend + #13#10;

AquilaX

____________

Съдържаниет е скрито
Влезте за да го видите

RichEdit1.SelAttributes.Color := clred;
RichEdit1.Lines.add('Text');

Един съвет - ползвай TWebBrowser (Internet Exploder) компонентата вместо TRichEdit. Тогава форматирането на текста е много по-добро чрез HTML.

чети и дишай по-леко