delphi - 如何将RTF字符串添加到RichEdit？

Question

我正在使用RichEdit，并向其中添加线条，其中包含各种颜色。现在，我使用这种方法：

LogRichEdit.Lines.Add(someText);
...
LogRichEdit.SelStart:=res+8;
LogRichEdit.SelLength:=4;
LogRichEdit.SelAttributes.Color:=clSilver;

其中 res是要格式化的文本的位置。不要管那个。我的问题是，当我添加此行然后对其进行编辑时，它会闪烁（通过选择和取消选择文本）。
如何更好地使用它？我以为我可以有某种rtf-string变量，用它做我的事，然后将它 .add到RichEdit。要么？

Answer 1

通过使用BeginUpdate / EndUpdate，您应该能够避免闪烁。

RichEdit.Lines.BeginUpdate;
try
  // make modifications to RichEdit.Lines
finally
  RichEdit.Lines.EndUpdate;
end;

对BeginUpdate的调用会抑制UI更新，直到调用EndUpdate。