如何将一行中的前4个字符添加为粗体?
例:

richedit1.Lines.Add('Test123');

我希望Test为大胆,但保持123正常。

有人能帮我吗?

===============>>#1 票数:1 已采纳

尝试这样的事情:

procedure TForm1.AddFormattedText(const AText: string; AStyle: TFontStyles);
begin
  RichEdit1.SelStart := RichEdit1.GetTextLen;
  RichEdit1.SelLength := 0;
  RichEdit1.SelAttributes.Style := AStyle;
  RichEdit1.SelText := AText;
end;

AddFormattedText('Test', [fsBold]);
AddFormattedText('123'+sLineBreak, []);

  ask by jwz104 translate from so

未解决问题?本站智能推荐:

关注微信公众号